首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读程序: 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 asr(i,j)=1 El
阅读程序: 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 asr(i,j)=1 El
admin
2020-04-18
26
问题
阅读程序:
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
asr(i,j)=1
Else
arr(i,j)=0
End If
Nextj
Next i
For i=1 To 3
For i=1 To 3
Printarr(i,j);
Nextj
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
解析
本题是用一个二重循环为二维数组赋值,只有满足下标i=i或者j=3.i+1才将其设置为1,否则设置为0,如果写出这个二维数组可以看出,两个对角线的元素被设置成1.
转载请注明原文地址:https://kaotiyun.com/show/PyTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
为了读取数据,需打开顺序文件"D:\data5.txt",以下正确的命令是
文件d:\city.txt的内容如下:BeiJingTianJinShangHaiChongQing编写如下事件过程:PrivateSubForm_Click()DimInDOpen"d:\city.txt"For
在窗体上画一个命令按钮,其名称为Command1,然后编写如下代码:OptionBase1PrivateSubCommandl_Click()Dimaa=Array(1,2,3,4)j=1
窗体上有一个名称为Command1的命令按钮,一个名称为Text1的文本框,其Text属性值为"VBProgramming"。运行程序后,选中其中的"VB",并执行如下事件过程:PrivateSubCommand1_Click()
有下面事件过程:PrivateSubForm_MouseMove(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSi
下列不能打开工具箱窗口的操作是()。
计算下面分段函数的正确语句是( )。
有两个关系R、S如下:由关系R通过运算得到关系S,则所使用的运算为()。
以下关于注释语句的叙述中,错误的是
在DoUntil…Loop循环中,判断循环结束的方法是
随机试题
资信评级机构从事对公司债券的资信评级业务,应当向()申请取得证券评级业务许可。
影响心室肌细胞0期去极化幅度和速度的因素有
关于慢性肺心病的病因的描述哪项正确
治疗马颜面神经麻痹可选用的处方是
封闭的空气层有良好的绝热作用,外围护结构中的空气层的厚度一般多少为宜?[2001年第068题]
在地质灾害易发区内进行工程建设应当在______进行地质灾害危险性评估,并将评估结果作为可行性研究报告的组成部分。
施工机具设备在使用中要尽量避免发生故障,尤其是预防( )。
根据组织形式的不同,可以将证券投资基金分为:()。
按照个体活动的独立性程度,可把人的性格分为()。
“譬如一只手,如果从身体上割下来,名虽可叫手,实已不是手了。”“只有作为有机体的一部分,手才获得它的地位。”这两句话说明了()
最新回复
(
0
)