2. 计算机
  3. 在窗体上画1个命令按钮，并编写如下事件过程： Private Sub Command 1 Click() Dim a(3，3) For m=1 To 3 For n=1 To 3 Ifn=m Or n=4-mThen a(m，n)--m+n Else a(

在窗体上画1个命令按钮，并编写如下事件过程： Private Sub Command 1 Click() Dim a(3，3) For m=1 To 3 For n=1 To 3 Ifn=m Or n=4-mThen a(m，n)--m+n Else a(

admin2018-10-18  37
问题 在窗体上画1个命令按钮，并编写如下事件过程：
Private Sub Command 1 Click()
Dim a(3，3)
For m=1 To 3
For n=1 To 3
Ifn=m Or n=4-mThen
a(m，n)--m+n
Else
a(m，n)=0
End If
Prim a(m，n)；
Next n
Print
Next m
End Sub
运行程序，单击命令按钮，窗体上显示的内容为
选项 A、2 0 0 0 4 0 0 0 6
B、2 0 4 0 4 0 4 0 6
C、2 3 0 3 4 0 0 0 6
D、2 0 0 0 4 5 0 5 6
答案B
解析 本题通过一个嵌套的For循环为二维数组a的各元素赋值，该二维数组对应矩阵的主对角线上的元素(即满足条件m=n)和副对角线上的元素(即满足条件m+n=4)其值为m+n，即主对角线上的元素从左上至右下依次为2、4、6，副对角线上的元素均为4，而其它元素均为0。
转载请注明原文地址:https://kaotiyun.com/show/fRFp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)