首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Option Base 1 Private Sub Command1_Click() Dim a(3, 3) As Integer Dim i As Integer, j As
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Option Base 1 Private Sub Command1_Click() Dim a(3, 3) As Integer Dim i As Integer, j As
admin
2018-09-19
51
问题
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
Option Base 1
Private Sub Command1_Click()
Dim a(3, 3) As Integer
Dim i As Integer, j As Integer, s As Integer
s = 0
For i = LBound(a, 1) To UBound(a, 1)
For j = LBound(a, 2) To UBound(a, 2)
a(i, j) = (i - 1) * 3 + j
If i >= j Then
s = s + a(i, j)
End If
Next j, i
Print s
End Sub
程序运行时,单击Command1,则在窗体上输出的结果是
选项
A、15
B、26
C、34
D、19
答案
C
解析
UBound函数返回为指定的数组维可用的最大下标,LBound函数返回为指定的数组维可用的最小下标。程序开头定义了Option Base 1这时定义一维数组下标从1开始;故LBound(A,1)=1,Ubound(A,1)=3; LBound(A,2)=1,Ubound(A,2)=3;外层for循环,循环变量i从1取到3,内层for循环,循环变量j从1取到3,根据a(i,j)=(i-j)*3+j可知,a(1,1)=1;a(1,2)=2;a(1,3)=3;a(2,1)=4;a(2,2)=5;a(2,3)=6;a(3,1)=7;a(3,2)=8;a(3,3)=9; If 条件 Then部分,如果选择的条件为真,则执行then部分;满足i>=j的数组元素有a(1,1),a(2,1),a(2,2),a(3,1),a(3,2),a(3,3),将各项值累加得到s的值,s=34。故正确答案为选项C。
转载请注明原文地址:https://kaotiyun.com/show/U1Fp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在设计阶段,为了设置某控件的Left属性,可使用的方法是
以下可以判断是否在文本框(名称为Text1)内按下了回车键的事件过程是
设有以下过程:PrivateSubproc(xAsInteger,OptionalyAsInteger)Printx,yEndSub针对此过程,下面正确的过程调用语句是
关于随机文件,以下叙述中错误的是( )。
语句PrintString(3,"string")的功能是
VB变量x!的数据类型是
数据流图中带有箭头的线段表示的是( )。
为了读取数据,需打开顺序文件"D:\data5.txt",以下正确的命令是
为了使命令按钮显示为图形形式,要设置一些属性,下列与这些属性无关的是
对下图二叉树进行前序遍历的结果为()。
随机试题
对贾某购买一份伪造的国内某名牌大学学位证的行为,下列说法正确的是()。
七情损伤,首先影响
A.高位结扎术或瓣膜环缩术B.高位结扎加静脉剥脱术C.筋膜下交通支结扎术D.局部注射硬化剂E.非手术治疗小范围静脉曲张或术后残余病变可做
慢性宫颈炎出现腰骶部疼痛时说明
用阀下刺激即可诱发心肌细胞产生期前收缩的兴奋性周期时相是()
药品临床试验方案需经()审议同意并签署批准。
在下列经济行为中,属于货币执行流通手段职能的是
某种零件的尺寸方差为σ2=1.21,对一批这类零件检查6件得尺寸数据(毫米):32.56,29.66,31.64,30.00,21.87,31.03.设零件尺寸服从正态分布,问这批零件的平均尺寸能否认为是32.50毫米(a=0.05).
在考生文件夹下,打开文档WORDl.docx,按照要求完成下列操作并以该文件名(WORD1.docx)保存文档。【文档开始】为什么成年男女的声调不一样?大家都知道,女人的声调一般比男人的“尖高”。可是,为什么会这样呢?人的解剖结构告诉我们,男人和女人的
Youmaysaythatthebusinessofmarkingbooksisgoingtoslowdownyourreading.(31)probablywill.That’soneofthe(32)fo
最新回复
(
0
)