首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读程序: Option Base 1 Private Sub Form_Click() Dim Arr(3, 3) As Integer For i = 1 To 3 For j = 1 To 3
阅读程序: Option Base 1 Private Sub Form_Click() Dim Arr(3, 3) As Integer For i = 1 To 3 For j = 1 To 3
admin
2020-07-22
83
问题
阅读程序:
Option Base 1
Private Sub Form_Click()
Dim Arr(3, 3) As Integer
For i = 1 To 3
For j = 1 To 3
If j = i Or j = 3 - i + 1 Then
Arr(i, j) = 1
Else
Arr(i, j) = 0
End If
Next j
Next i
For i = 1 To 3
For j = 1 To 3
Print Arr(i, j);
Next j
Print
Next i
End Sub
程序运行后,如果单击窗体,则输出结果为
选项
A、 1 1 1
1 1 1
1 1 1
B、0 0 0
0 0 0
0 0 0
C、1 0 0
0 1 0
0 0 1
D、1 0 1
0 1 0
1 0 1
答案
D
解析
第一个For循环给数组Arr赋值。第二个For循环打印数组各元素的值。在第一个For循环中,数组的下标用变量i表示,上标用变量j表示。If…Else语句对两种情况进行判断,在i等于j的时候或者i和j满足j = 3 - i + 1关系的时候,Arr数组元素被赋值为1,其它情况被赋值为0。可以根据循环语句的执行,代入各变量值算得各元素的值。选D)。
转载请注明原文地址:https://kaotiyun.com/show/i8Hp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
耦合性和内聚性是对模块独立性度量的两个标准。下列叙述中正确的是( )。
下面关于数据库三级模式结构的叙述中,正确的是()。
设窗体上有1个水平滚动条,已经通过属性窗口把它的Max属性设置为1,Min属性设置为100。下面叙述中正确的是()。
以下关于菜单的叙述中,错误的是
设a、b都是自然数,为求a除以b的余数,某人编写了以下函数:Functionfun(aAsInteger,bAsInteger)Whilea>ba=a—bWendfun=aEndFu
判断复选框是否被选中的属性为
如果列表框List1中有一个项目被用户选定,则执行Debug.PrintList1.Selected(List1.ListIndex)语句后的输出结果是
下面程序的执行结果是( )。PrivateSubCommand1_Click() a=0 k=1 DoWhilek
组合框是文本框和()特性的组合。
随机试题
Flyer2000/aFlyer2000注意题目要求不超过三个词和一个数字,或一个数字,故此处冠词a可填可不填。
放大电路中引入电流串联负反馈,将使放大电路的()。
治疗药物检测的英文缩写是
图示结构EI为常数,用力矩分配法计算时,分配系数μBA为()。
对承租人而言,与购买设备相比,租赁设备的优越性在于()。
在融资租赁合同中,承租人占有租赁物期间,租赁物造成第三人的人身伤害或财产损害的,出租人不承担责任。()
五个各不相等的自然数分别两两相加,10种相加组合共得到8个不同的结果,分别是17、22、25、28、31、33、36与39,则五个数中最大的数与最小的数之和为:
消防工作的内容主要包括()。
HowdoestheTelephoneReassuranceServiceofferhelptopeopleinneed?
Whendidpeoplebeginridinganewkindofbike?______.
最新回复
(
0
)