首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读程序: 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
2018-07-11
44
问题
阅读程序:
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 0
0 1 0
0 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/SOGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
对于循环队列,下列叙述中正确的是()。
窗体上有一个菜单编辑器设计的菜单。运行程序,并在窗体上单击鼠标右键,则弹出一个快捷菜单,如图所示。
(1)在名称为Forml的窗体上添加一个二级下拉菜单(菜单项见下表),程序运行时的窗体如图所示。注意:存盘时必须存放在考生文件夹下,工程文件名为sjtl.vbp,窗体文件名为sitl.frm。(2)在名称为Forml的窗体上添加两个文本
窗体上有名称为Commandl的命令按钮和名称为Textl的文本框PrivateSubCommandl—Click()Textl.Text=“程序设计”Text1.SetFocusEndSubPri
把数学表达式表示为正确的VB表达式应该是()。
耦合性和内聚性是对模块独立性度量的两个标准。下列叙述中正确的是()。
在窗体上画两个标签和一个命令按钮,其名称分别为Labell、Label2和Commandl,然后编写如下程序:PrivateSubfunc(LAsLabel)L.Caption=“1234”EndSubPr
以下关于过程及过程参数的描述中,错误的是()。
设x=4,y=8,z=7,则以下表达式的运算结果是()。 xz)Orz
当数据库中数据总体逻辑结构发生变化,而应用程序不受影响,称为数据的
随机试题
在某一操作条件下,管线的计算理论输气量为30×104m3/d,该管线的输送效率为96%,则该管线的实际输气量为()m3/d。
简述新中国初期国民经济迅速恢复的原因。
地区政策的限制,决定了房地产市场是一个区域性的市场。()
DDN节点类型从组网功能上分可分为()几种类型。
假设MT公司有关收益质量的现金流量补充资料如下表所示:要求:计算非经营净收益;
下列情形中,纳税人应当办理税务登记的有()。
根据下列资料,回答下列问题。2014年“进料加工贸易”出口额约占全市货物出口额的:
下周末你们班准备去彩虹社区开展志愿服务,你需要招募15名志愿者,请你用90~110个英语单词写一篇招募通知,要求写明:*志愿服务的时间、地点;*具体服务项目;*参加服务人员需做的准备;*在哪里报名,报名时间、地点和联
TheUnitedStatesCivilRightsmovement,whichbeganinthe1950sandgainedmomentuminthe1960sand1970s,owedaheavydebt
Itseemsindividualcancercellssendoutthesamedistresssignalsaswounds,trickingimmunecellsintohelpingthemgrowinto
最新回复
(
0
)