首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读程序: Option Base 1 Private Sub Form_Click() Dim Arr(3, 3) As Integer For i = 1 To 3 For j = 1 To 3
阅读程序: Option Base 1 Private Sub Form_Click() Dim Arr(3, 3) As Integer For i = 1 To 3 For j = 1 To 3
admin
2015-08-28
37
问题
阅读程序:
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/m6Lp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列说法中错误的是()。
窗体中有图片框(Picture1)和计时器(Timer1)两个控件。程序运行时,将图片加载到图片框中,然后图片框以每秒一次的速度向窗体的右下角移动,每次向左、向右移动300twip。请填空。PrivateSubForm_Load0Picture1.
Text文本框接受的最长字符数由文本框的______属性确定。
下列程序段的输出结果为()。DimM(5,5),S(5)Fori=1To5S(i)=0Forj=1To5M(i,j)=i+j
下列程序的运行结果是()。PrivateFunctionmyfun(m,n)DoWhilem>nDoWhilem>n:m=m-n:LoopDo
下列程序的输出图形是()。Fork=0To360cr=Int(160*Rnd)ang=-3.1415926/180*kCircle(2000,2000),500,cr,0,angNext
对于长度为n的线性表,在最坏情况下,下列各种排序法所对应的比较次数中正确的是()。
下列四个关于DoEvents语句的叙述中,正确的是______。
在数据的存储结构中,不仅需要存储各数据元素的信息,还要存放各元素之间______的信息。
希尔排序法属于哪一种类型的排序法?______。
随机试题
患者,男性,42岁。CT示颅内肿物,近日神志恍惚、有时出现四肢抽搐、语无伦次、躁动不安、出现幻觉、答非所问,此情况属
艺术想象的特征是什么?
求同存异在人际交往中体现了()原则
根据计划的明确性,可以把计划分类为()
下列病毒中,能引起潜伏感染的是A.甲型肝炎病毒B.狂犬病病毒C.单纯疱疹病毒D.流感病毒E.腮腺炎病毒
下列风险管理技术与方法中,能够对风险进行定量分析的是()。
现代学校教育制度的核心是校长负责制。()
(2011年真题)根据法律的规定,定金的种类包括
Eachworkday,theworkersfollowedthesameschedulesandrarely______fromthisroutine.
Acompletelynewsituationwill______whentheexaminationsystemcomeintoexistence.
最新回复
(
0
)