首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读程序: 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 =
阅读程序: 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 =
admin
2018-09-19
21
问题
阅读程序:
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/FnFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画1个名称为Command1的命令按钮,1个名称为Label1的标签,然后编写如下事件过程:PrivateSubCommand1_Click()DimiAsInteger,jAsIntegerDimsAsIn
编写如下程序:PrivateSubCommand1_Click() DimmAsInteger,nAsInteger n=2 Form=1To3 Printproc(n); NextmEndSubF
下列叙述中正确的是
在窗体上画2个名称分别为Text1和Text2的文本框,然后编写如下事件过程:PrivateSubForm_Load()ShowText1.Text="ChinaBeijing"Text1.SetFocusEnd
在窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Command1的命令按钮。运行后的窗体外观如图所示。设有如下的类型和变量声明:PrivateTypePerson nameAsString*8 majorAsSt
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()Dims1AsString,s2AsStringOpen"D:\data.txt"ForInput
窗体上有一个名称为Combo1的组合框,为了引用Combo1中最后一个列表项,应使用的表达式是
表达式5*Sqr(25)+Sgn(4^4)的值是
在考生文件夹下有一个工程文件sjt5.vbp,窗体上有两个命令按钮,标题分别是“读数据”和“统计”,请添加两个标签,名称分别为Label1和Label2,标题分别为“出现次数最多的字母是”和“它出现的次数为”;再添加两个名称分别为Text1和Text2,初
某二叉树共有13个结点,其中有4个度为1的结点,则叶子结点数为
随机试题
叙述语言中对叙事有重要影响的性质是()
社会运动的物质基础主要是()
男性,55岁,2周前X线检查,发现左肺上叶边缘部肿块,直径约3cm,边界不清,肺穿刺活体组织检查,肿瘤由异型性明显的上皮细胞组成,形成腺腔结构。核分裂多见。下列诊断中,符合本病的是
关于宫颈糜烂,说法正确的是
A.裂片B.黏冲C.片重差异超限D.均匀度不合格E.崩解超限产生原因是片剂的弹性复原的是()
下列选项中,有关光学水准仪的表述正确的有()。
我国商业银行普遍重视未来()时段内的流动性缺口分析与管理。
(三) 1995年10月6日,吴某到厂长办公室要求分房。厂长刘某以要开会为由令吴某离开。吴某不从,刘某遂不耐烦,向外推吴某。吴某在后退中不慎将办公桌撞倒,打破茶杯。刘某见状大怒,向公安机关报警。公安干警赶到后,不容吴某分辩将其带到北桥派出所。第
使用白盒测试方法时,确定测试数据应根据______ 和指定的覆盖标准。
下列选项中,不属于DNS服务器资源记录的是()。
最新回复
(
0
)