首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读程序: Option Base1 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+1Then Arr(i,j)=1 El
阅读程序: Option Base1 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+1Then Arr(i,j)=1 El
admin
2016-12-13
45
问题
阅读程序:
Option Base1
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+1Then
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
Nex ti
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或者i=3-i+1才将其设置为1,否则设置为0,如果写出这个二维数组可以看出,两个对角线的元素被设置成1。
转载请注明原文地址:https://kaotiyun.com/show/xIGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列程序要求用户输入一个年份,并能够判断用户输入的年份是否是闰年,横线处应填()。SubEnSure()DimyearAsIntegeryear=Val(InputBox(”请输入年份:”))If(
使用ReDimPreserve语句,可以()。
在用通用对话框控件建立“保存”文件对话框时,如果需要指定文件列表框所列出的文件类型是文本文件(即.txt文件),则正确的描述格式是()。
在面向对象方法中,类之间共享属性和操作的机制称为__________。
下述关于数据库系统的叙述中,正确的是()。
在用通用对话框控件建立“保存”文件对话框时,如果需要指定文件列表框所列出的文件类型是文本文件(即.txt文件),则正确的描述格式是()。
下面的控件可作为其他控件容器的是()。
以下程序的功能是从随机产生的20个20~200(含20和200)的整数中,找出能够同时被3和5整除的数的最大值,并显示出来,请填空。OptionBaselPrivateSubCommandlClick()Dima(2
鼠标移动经过控件时,将触发控件的______事件。
如果一个变量未经定义就直接使用,则该变量的类型为()。
随机试题
甲与乙准备进行一个游戏:向空中扔三枚硬币,如果它们落地后全是正面向上或全是反面向上,乙就给甲钱;但若出现两正面一反面或两反面一正面的情况,则由甲给乙钱。乙要求甲每次给10元,那么,从长远来看,甲应该要求乙每次至少给()元才可考虑参加这个
采用一个字节表示,128原码为_______。
下列关于腱反射的描述,正确的是
工程变更支付的方式为()。
()可办理转账结算和存人现金,但不能支取现金。
假定某2年期零息债券的面值为:100元,发行价格为85元,某投资者买入后持至到期,则其到期收益率是()。
家长在子女心目中的地位是重要的,形象是高大的,这充分体现了家庭教育具有()。
历年的黄金周社会各方面都会呈现火爆态势,尤其是在经济方面体现得最为突出,而在黄金周结束后则会出现一个明显的回落,因此有很多人认为黄金周是造成随后月份经济疲软的一大诱因。如果以下各项为真,最能质疑上述观点的是:
防火墙的基本功能是:根据一定的安全规定,检查、过滤网络之间传送的报文分组,以确定这些报文分组的【 】。
在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,把文本框的Text属性设置为空白,然后编写如下事件过程:PrivateSubCommand1_Click()a=InputBox("Enteran
最新回复
(
0
)