首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读程序: Option Base1 Private Sub Form_Click() Dim Arr(3,3)As Integer For i=1To3 For i=1To3 If j=i Or j=3-i+1 Then Arr(i,j)=1 Else
阅读程序: Option Base1 Private Sub Form_Click() Dim Arr(3,3)As Integer For i=1To3 For i=1To3 If j=i Or j=3-i+1 Then Arr(i,j)=1 Else
admin
2019-03-08
57
问题
阅读程序:
Option Base1
Private Sub Form_Click()
Dim Arr(3,3)As Integer
For i=1To3
For i=1To3
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=1To3
For j=1To3
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
解析
本题是用一个二重循环为二维数组赋值,只有满足下标j=i或者j=3-i+1才将其设置为1,否则设置为0,如果写出这个二维数组可以看出,两个对角线的元素被设置成1。
转载请注明原文地址:https://kaotiyun.com/show/ziFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
已知文本框Text1中输入了一篇英文短文,并编写了如下程序段:Str_x=Text1.Textn=Len(Str_x)m=0t=0Fori=1Tonw=UCase(Mid(
以下程序段中,执行结果与其他3个选项不同的是
下列各语句中,正确的是
在窗体上画2个名称分别为Text1和Text2的文本框,然后编写如下事件过程:PrivateSubForm_Load()ShowText1.Text="ChinaBeijing"Text1.SetFocusEnd
当窗体上有多个控件时,为了在程序运行后使得焦点位于某个控件上,应对该控件进行的设置是
设窗体上有一个文本框Text1,程序代码中有以下赋值语句(假定用到的控件和变量都存在),其中错误的是()。
窗体上有一个名称为Text1的文本框,要求在获得焦点时选中文本框中所有内容,以下能实现该功能的事件过程是
假定编写了如下通用过程:SubSp(x,y)y=1Fori=1Toxy=y*iNextiEndSub在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
随机试题
胸外按压时,应使胸骨压下______cm,频率为______次/分。
在Access中模块对象有两种,即______和标准模块。
下列账户中,与“在途物资”账户相对应的账户有()
1999年9月,某铁合金厂与某铁路分局签订了年度货运合同。合同规定,由铁路分局将20万吨钢材,逐月从甲站发至乙站,收货人为某机械厂。合同还载明了违约责任和双方约定的其他事项。同年10月,铁合金厂将6000吨钢材运至甲站,交付该铁路分局承运。交运货物过程中,
随着社会的发展,社会成员会分化成许多阶层或群体,不同的群体可能持有不同的价值观,而他们各自也会有不同的心理诉求。电视剧内容和题材的多样性决定了体现多元价值观的可能性.而在这个过程中,会使不同群体的人对其他的价值观念有所了解,在电视剧的观看中进行价值观的参照
有46名球迷参加世界杯足球竞猜活动,其中24人支持德国队夺冠,20人支持西班牙队,支持巴西队的人数是既支持德国队又支持巴西队人数的3.5倍,又是三支球队都支持人数的7倍,既支持巴西队又支持西班牙队的人数相当于三支球队都支持人数的2倍,既支持德围队又支持西班
“有法可依、有法必依、执法必严、违法必究”是法制四个缺一不可的要素,这四个要素的实质是()。
Inaninitiativetospeedtreatmentsforwoundedsoldiers,theU.S.DepartmentofDefense(DOD)isenteringthefast-growingfield
设关系模式R<U,F>,其中U={A,B,C,D,E),F={A→BC,C→D,BC→E,E→A},则分解ρ={R1(ABCE),R2(CD))满足______。A.具有无损连接性、保持函数依赖B.不具有无损连接性、保持函数依赖C.具有无损连接性、不
Itispossiblethatyourcompanyisfacingdifficultiesofwhichwearenotaware.
最新回复
(
0
)