首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
阅读程序: 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
20
问题
阅读程序:
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(
在窗体上画2个名称分别为Text1和Text2的文本框,然后编写如下事件过程:PrivateSubForm_Load()ShowText1.Text="ChinaBeijing"Text1.SetFocusEnd
设窗体上有一个列表框控件List1,含有若干列表项。以下能表示当前被选中的列表项内容的是()
设窗体上有一个List1列表框,其中的列表项如图所示。又编写了下面的程序代码:PrivateSubList1_Click()n=List1.ListIndexList1.RemoveItemnm=nIfn=List1.ListCoun
窗体上有一个名称为Text1的文本框,要求在获得焦点时选中文本框中所有内容,以下能实现该功能的事件过程是
在窗体上画一个名称为Command1的命令按钮,然后编写以下程序代码:OptionBase1PrivateSubCommand1_Click()DimdataAsVariant,mAsInteger,nAsInteger
有如下事件过程:PrivateSubForm_Load()ShowDimArr()AsVariantArr=Array(1,3,5,7,9,11,13,15)Callconverse(
如果窗体模块A中有一个过程:PrivateSubProc()……EndSub则下面叙述中错误的是
假定在标准模块中的声明部分有如下语句:PublicVarAAsInteger而在窗体模块的声明部分有如下语句:PublicVarBAsInteger则以下叙述中正确的是
在窗体上画2个名称分别为Label1和Label2的标签,然后编写如下程序代码:SubS(LAsLabel,ByValaAsInteger)L.Caption="1234"a=a*aEndSubPriv
随机试题
根据外汇管理法律制度的规定,下列关于合格境外机构投资者(简称QFII)制度的管理环节中,属于中国证监会职责范围的有()。
金融寡头在经济上的统治是通过()
以下IP地址中,属于B类地址的是______________。
用是企业经营理念、经营责任和()的集中体现。
下列选项中,既是结算业务又带有融资功能的是()。
安徽沿淮菜菜品讲究咸中带辣,汤汁味重色浓,并习惯用()佐味和配色。
个体克服障碍、施展才华、力求又快又好地解决某一问题的愿望和趋势的内在动力称为______。
甲6周岁,一起故意杀人案件中,他目睹了整个过程并告诉了承办案件的警察,我国法律规定,以下对于甲可否作为本案的证人的判断中,正确的是()。
从所给的四个选项中,选择最合适的一个填入问号处,使之呈现一定的规律性。
以下不是“智者”在教育史上的贡献的是()
最新回复
(
0
)