首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读程序: 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
46
问题
阅读程序:
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全国计算机二级
相关试题推荐
以下关于窗体的描述正确的是
在窗体上添加一个文本框,名为Textl,然后编写如下的Load事件过程,则程序的运行结果是PrivateSubForm_Load()Text1.Text=""Text1.Setfocust=1Fork=10
有以下函数过程:FunctionGys(ByValxAsInteger,ByValyAsInteger)AsIntegerDoWhiley<>0Reminder=
设已经在“菜单编辑器”中设计了窗体的快捷菜单,其顶级菜单为Bs,取消其“可见”属性,运行时,在以下事件过程中,可以使快捷菜单响应鼠标右键菜单的是
在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:PrivateSubCommand1_Click()Dima(5,5)Fori=1To3
在窗体上画一个列表框和一个命令按钮,其名称分别为List1和Command1,然后编写如下事件过程。PrivateSubForm_Load()List1.AddItem"Item1"List1.AddItem"
下列事件过程运行后输出结果是PrivateSubCommand1_Click()PrintFormats(123,456,"###,##%")EndSub
随机试题
甲公司采用配股方式进行融资,每10股配2股,配股前股价为6.2元,配股价为5元。如果除权日股价为5.85元,所有股东都参加了配股,除权日股价下跌()。
______是一个能复制一个对象的动画,并应用到其他对象的动画工具。
《医疗机构药事管理暂行规定》的颁布时间为
张某,女,45岁。因胃脘痞闷不适3个月就诊,患者近3个月来经常脘腹痞闷,重时满闷如塞,但不疼痛,饮食减少,恶心嗳气,大便不爽,喜长叹息,有时心烦易怒,胸胁胀满,每因生气恼怒而使症状加重,苔薄白,脉弦。其证型为
可行性研究必须坚持()等原则。
农业税减免包括()、()和()三种形式。
对于证券投资基金来说,其市场参与者有()
基金的流动性风险表现在()。
特别重视强化作用的教学理论流派有()
Archaeologyasaprofessionfacestwomajorproblems.First,itisthepoorestofthepoor.Onlypaltrysumsareavailablefore
最新回复
(
0
)