首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读程序: Option Base 1 Private Sub Form Click() DimArr(3,3)As Integer For i=1 To 3 For i=1 To 3 Ifj=i Or j=3一i+1 Then Arr(i,j)=
阅读程序: Option Base 1 Private Sub Form Click() DimArr(3,3)As Integer For i=1 To 3 For i=1 To 3 Ifj=i Or j=3一i+1 Then Arr(i,j)=
admin
2019-04-29
31
问题
阅读程序:
Option Base 1
Private Sub Form Click()
DimArr(3,3)As Integer
For i=1 To 3
For i=1 To 3
Ifj=i Or j=3一i+1 Then
Arr(i,j)=1
Else
Arr(i,j)=0
End If
Next i
Next i
For i=l To 3
For i=1 To 3
Print Arr(i,j);
Next i
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
解析
本题是用一个二重循环为二维数组赋值,只有满足下标j=i或者j=3.i+1才将其设置为1,否则设置为0,如果写出这个二维数组可以看出,两个对角线的元素被设置成1.
转载请注明原文地址:https://jikaoti.com/ti/Y8N0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设a=10,b=5,c=1,执行语句Printa>b>c窗体上显示的是
设X为一整型变量,且语句的开始为:SelectCaseX,则不符合语法规则的Case子句是
编写如下程序:PrivateSubCommandlClick()DimscoreAsIntegerscore=86Ifscore>85Thenr=1ElseIfscore>60Thenr=2Elser=0EndIfP
现有如下语句:x=IIf(a>50,Int(a\3),aMod2)当a=52时,x的值是
设Labell、Commandl、Textl、Checkl分别为标签、命令按钮、文本框、复选框的名称,则以下属性设置语句中,运行时不会出错的是
下列叙述中正确的是
产生100以内(不含100)2位随机整数的VisualBasic表达式是
在考生目录下有一个工程文件vbsj3.vbp,窗体上有一个命令按钮cmdNext(标题为“下一个”)。要求:在窗体上建立一个单选按钮数组optItem,含4个单选按钮,标题分别为“A”、“B”、“C”、“D”,初始状态下,“A”为选中状态。如图3
下列数据结构中,属于非线性结构的是
下列数据结构中,不能采用顺序存储结构的是()。
随机试题
A)Thepollutionoftheenvironmenthasgivenrisetomanyserioussocialproblems.B)Heleftveryearlyforfearofmissingth
直肠癌最主要的转移途径是
(三)[背景资料]建设单位就某工程项目与甲施工单位签订了施工总承包合同。经建设单位同意,甲施工单位选择了乙施工单位作为分包单位。在合同履行中,发生了如下事件:事件1:在合同约定的工程开工日前,建设单位收到甲施工单位报送的“工程开工报审
按照各类基金风险特征由高到低排序,下列排序正确的是()。
宝灵公司是一家牙膏生产企业。目前牙膏行业的销售额达到前所未有的规模,各个企业生产的不同品牌的牙膏在质量和功效等方面差别不大.价格竞争十分激烈。在上述情况下,宝灵公司的战略重点应是()。
ABC会计师事务所某审计小组正在举行异常项目审计小组讨论会,在会中就审计证据的充分性和适当性的有关问题进行了讨论。甲注册会计师提出一种观点:审计证据的质量越高,需要的审计证据数量越少,可以得出审计证据的质量和审计证据的数量是呈反比的,所以审计证据质量越低,
2014年12月4日是国家首个宪法日,据一项社会调查显示,公众对宪法的了解程度并不乐观。84.3%的受访者没有完整地读过《宪法》。其中33.2%的人完全没有读过,51.1%的人没有读完过,仅有15.7%的人完整读完。对此你怎么看?
简述严复的德智体兼备的真国民教育观。
已知极坐标下的累次积分,其中a>0为常数,则I在直角坐标系下可表示成______。
A、Theyweretoocasual.B、Theyweretoodressy.C、Theywerenotcharmingenough.D、Theywereuncomfortable.D
最新回复
(
0
)