首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读程序: Option Base 1 Private Sub Form_Click() Dim Arr(3,3)As Integer For i=1 To 3 For j=1 To 3 ifj=i Or j=3-i+1 Then Arr(i
阅读程序: Option Base 1 Private Sub Form_Click() Dim Arr(3,3)As Integer For i=1 To 3 For j=1 To 3 ifj=i Or j=3-i+1 Then Arr(i
admin
2015-05-29
47
问题
阅读程序:
Option Base 1
Private Sub Form_Click()
Dim Arr(3,3)As Integer
For i=1 To 3
For j=1 To 3
ifj=i Or j=3-i+1 Then
Arr(i,j)=1
Else
Arr(i,j)=0
End If
Next i
Next i
For i=1 To 3
Forj=1 To 3
PrintArr(i,j);
Next i
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
解析
本题是用一个二重循环为二维数组赋值,只有满足下标j=i或者j=3-i+1才将其设置为1,否则设置为0,如果写出这个二维数组可以看出,两个对角线的元素被设置成1。
转载请注明原文地址:https://kaotiyun.com/show/uRQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下关于窗体的描述正确的是
在窗体上画一个名称为Command1的命令按钮,再画两个名称分别为Label1、Label2的标签,然后编写如下程序代码:PrivateXAsIntegerPrivateSubCommand1_Click()X=
在窗体上添加一个文本框,名为Textl,然后编写如下的Load事件过程,则程序的运行结果是PrivateSubForm_Load()Text1.Text=""Text1.Setfocust=1Fork=10
程序运行后,在窗体上单击鼠标,此时窗体不会接收到的事件是
对长度为n的线性表进行顺序查找,在最坏情况下所需要的比较次数为
有如下程序,该程序的执行结果是【】。PrivateSubCommand1_lick()Fori=1To4x=4Forj=1To3
在长度为n的顺序表的第i(1≤i≤n+1)个位置上插入一个元素,元素的移动次数为【】。
以下用户自定义函数FunctionFunc(aAsInteger,bAsInteger)AsIntegerStaticmAsInteger,iAsIntegerm=0:i=2
下列事件过程运行后输出结果是PrivateSubCommand1_Click()PrintFormats(123,456,"###,##%")EndSub
随机试题
总的来说,文学传播的发展所经历的阶段包括【】
患儿,7岁。8月10日发病出现高热、头痛、呕吐1次,次日排稀便2次,精神不振,晚间开始抽搐、神志不清。体检:体温39.5℃,急性病容,脉充实有力,颈有抵抗,克氏征阳性,布氏征阳性,肌张力高,血白细胞15×109/L,粪镜检白细胞每高倍视野0~2个,脑脊液检
很少引起AIDS患者机会性感染的病原体是
下列各项中,不属于汇总记账凭证会计核算程序特点的有()。
下列各项说法中,不正确的是()。
已知复数集{zn}成等比数列,其首项和公比均为1-i,则z3=().
甲拥有一辆“福特”汽车,以10万元出让给乙,但是,双方同时约定,甲在购买到“丰田”汽车之后,再正式向乙交付“福特”汽车。甲、乙之间买卖“福特”汽车的合同是()的合同。
下列说法不正确的是()。
Wheredoourfavoritefoodscomefrom?Thetruthmay(31)you.Didyouknowcurry(咖喱)isn’tIndian?DidyouknowAmericanswe
Forthispart,youareallowed30minutestowriteacompositiononthetopic"MyIdealJob".Youshouldwriteinnolessthan1
最新回复
(
0
)