首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读程序: 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-
阅读程序: 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-
admin
2019-08-22
45
问题
阅读程序:
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 i=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+l关系的时候,Arr数组元素被赋值为1,其他情况被赋值为0。可以根据循环语句的执行,代入各变量值算得各元素的值。选D。
转载请注明原文地址:https://kaotiyun.com/show/tzTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画一个名称为CD1的通用对话框,通过属性窗口设置CD1的初始路径为C:\,默认的文件名为None,标题为“保存等级考试”,如图2所示。注意:存
在窗体上画一个命令按钮(名称为Command1),并编写如下代码:FunctionFun1(ByValaAsInteger,bAsInteger)AsIntegerDimtAsIntegert=a—b
以下叙述中正确的是()。
用来设置文字字体是否为粗体的属性是()。
(1)在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。其功能是随机产生20个0~1000的整数,将其放入一个数组中,然后输出这20个整数的平均值。程序运行后,单击命令按钮(名称为Command1,标题为“输出平均值”),即可
以下叙述中错误的是()。
已知二叉树后序遍历序列是CDABE,中序遍历序列是CADEB,它的前序遍历序列是()。
某带链的队列初始状态为front=rear=NULL。经过一系列正常的入队与退队操作后,front=rear=10。该队列中的元素个数为()。
软件测试用例包括()。
下面不属于软件测试实施步骤的是
随机试题
A.以健康人或病人作为受试对象B.试验时使用对照和双盲法C.不选择弱势人群作为受试者D.试验中受试者得到专家的允许后可自由决定是否退出E.弱势人群若参加试验,需要监护人的签字能体现人体试验科学原则的是
激发较大范围内瞬间出现大量滑坡的重要因素是()。
下列科目中,按照《2018年政府收支分类科目》规定,属于支出经济分类的是()。
(2016年真题)下列对古代科技著作的表述,不正确的是()。
材料三:阅读下面的短文。完成71—75题。织袜机是英国牧师李.维利亚1593年发明的。关于这项发明还有一段有趣的插曲。当年这位发明家为了向织袜女工梅丽求婚,苦思冥想,别出心裁地发明了能帮助梅丽摆脱繁重劳动的织袜机,并以此作为奉献给心上人的结婚礼物
根据我国《刑事诉讼法》的规定,某居民小区的老白发现常在这一带推销小商品的黑子有盗窃行为,他可以向下列哪些专门机关进行报案,举报()。
A.Don’tleavetheaudienceout.B.Makeitsimpletounderstand.C.Bepreparedandpractice.D.Complementyourspeechwithvi
下列信用形式属于银行信用的是()。[中央财经大学2012研]
测试的目的是暴露错误,评价程序的可靠性;而【】的目的是发现错误的位置并改正错误。
Readthetextbelowaboutfoodindustry.Inmostofthelines(34-45),thereisoneextraword.Iteitherisgrammaticallyin
最新回复
(
0
)