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

在窗体上画1个命令按钮，并编写如下事件过程i Private Sub Commandl—Click() Dim a(3，3) For m=1 T0 3 F0r n=1 To 3 If n=m Or n=4-m Then a(m，n)=m+n Else a(

admin2010-04-08  57
问题 在窗体上画1个命令按钮，并编写如下事件过程i
Private Sub Commandl—Click()
Dim a(3，3)
For m=1 T0 3
F0r n=1 To 3
If n=m Or n=4-m Then
a(m，n)=m+n
Else
a(m，n)：0
End If
Print a(m，n)；
Next n
Prim
Next m
End Sub
运行程序，单击命令按钮，窗体上显示的内容为
选项 A、2 0 0
B、2 0 4
C、2 3 0
D、2 0 0
答案B
解析 当m；1时，如果n=1，满足条件m=n，执行Then语句a(1，1)：m+n=2；当n=2时，不满足Ⅱ语句中的条件，执行Else语句a(1，2)=0；当n=3时，满足If条件n=4-m，执行Then语句a(1，3)=m+n=4。同理可得，当m；2时，得到的结果为0，4，0；当m=3时，结果为4，0，6。
转载请注明原文地址:https://kaotiyun.com/show/DQmp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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