首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Command1的命令按钮,并有如下程序代码: Option Base 1 Private Sub Command1_Click() Dim a(4, 4) As Integer Dim b
窗体上有一个名称为Command1的命令按钮,并有如下程序代码: Option Base 1 Private Sub Command1_Click() Dim a(4, 4) As Integer Dim b
admin
2018-05-08
35
问题
窗体上有一个名称为Command1的命令按钮,并有如下程序代码:
Option Base 1
Private Sub Command1_Click()
Dim a(4, 4) As Integer
Dim b As Integer
Dim i As Integer, j As Integer
For i = 1 To 4
For j = 1 To 4
a(i, j) = i + j
Next j
Next i
Call f(a, b)
Print b
End Sub
Private Sub f(x() As Integer, ByRef y As Integer)
y = 0
For i = 1 To 4
y = y + x(i, i)
Next
End Sub
运行程序,单击命令按钮后,窗体上显示的是
选项
A、0
B、2
C、8
D、20
答案
D
解析
Command1_Click()中通过嵌套循环给数组a元素赋初值,执行完后a(1,1)=2,a(2,2)=4,a(3,3)=6,a(4,4)=8;Call f(a, b)语句调用子函数Sub f(x() As Integer, ByRef y As Integer)。该函数内For循环把a数组中一维下标和二维下标相同的元素值相加。值为20,选D)。
转载请注明原文地址:https://jikaoti.com/ti/UCy0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
软件按功能可以分为应用软件、系统软件和支撑软件(或工具软件)。下面属于应用软件的是
下列叙述中正确的是
(1)在考生文件夹下有一个工程文件sjt3.vbp,请在名称为Forml的窗体上画一个名称为Textl的文本框和一个名称为Cl、标题为”转换”的命令按钮,如图2-8所示。在程序运行时,单击”转换”按钮,可以把。Textl中的大写字母转换为小写,把小写字母转
在E盘当前目录文件夹下建立一个名为”Student.txt”的随机文件,要求用InputBox函数输入5个学生的姓名(SmName)、年级(StuGrade)和年龄(StuAge)。在程序中有以下记录类型和窗体的事件过程,请选择正确的语句完成程序(
有如下函数:Functionfun(aAsInteger,nAsInteger)AsIntegerDimmAsIntegerWhilea>=na=a-n:m=m+1Wendfun=mEndFunction该函数的返回值是
若将变量TestDate声明为Date类型,则下列为变量TestDate赋值的语句中正确的是()。
以下叙述中正确的是()。
设在工程文件中有一个标准模块,其中定义了如下记录类型:TypeBooksNameAsString*10:TelNumAsString*20EndType在窗体上画一个名为Commandl的命令
在考生目录下有一个工程文件sjt3.vbp,窗体上有一个圆和一条直线(直线的名称为Linel)构成一个钟表的图案;有两个命令按钮,名称分别为Commandl、Command2,标题分别为”开始”、”停止”;还有一个名为Timerl的计时器。程序运行时,钟表
在下列模式中,能够给出数据库物理存储结构与物理存取方法的是()。
随机试题
当pH值及标准碳酸氢盐(SB)增高以及PCO2正常或增高时,可能存在下列哪种情况
有利尿、降压作用的药物是
相关系数反映了事物间的
有关心身疾病的发病机制下述哪项是错误的
互感器按用途可分为()。
假定证券A的收益率概率分布如表11-2所示。该证券的方差为( )。
倡导简约适度、绿色低碳的生活方式,反对奢侈浪费和不合理消费,开展创建节约型机关、()等行动。
计算下列反常积分的值:
设职工-社团数据库有3个基本表:职工(职工号,姓名,年龄,性别);社会团体(编号,名称,负责人,活动地点);参加(职工号,编号,参加日期)。其中:1)职工表的主码为职工号。2)社会团体表的主码为编
ThougheverymorningIqueue(排队)atthebusstopveryearly,Iamoften【C1】______forschool.Thereasonisthatthereare【C2】__
最新回复
(
0
)