编写如下程序: Private Sub Command1_Click() Dim a(3,3) As Integer Dim b(3,3) As Integer For i=1 To 3 For j =1 To 3 a(i,

admin2019-06-20  33

问题 编写如下程序:
Private Sub Command1_Click()
  Dim a(3,3) As Integer
  Dim b(3,3) As Integer
  For i=1 To 3
    For j =1 To 3
      a(i,j)=i+j
      b(i,j)=a(i,j)+i*(j-1)
    Next j
  Next i
  For i=1 To 3
    For j=1 To 3
    Print b(i,j);
    Next j
    Print
  Next i
End Sub
程序运行后,单击命令按钮Command1,输出结果为(    )。

选项 A、2  3  4
3  4  5
3  6  9
B、2  4  6
4  5  6
4  8  12
C、3  5  7
5  8  11
7  10  13
D、4  6  8
7  11  15
10  14  18

答案B

解析 第一个For循环对数组a和数组b的元素赋初值。第二个For循环实现打印。嵌套循环先执行内循环,条件不满足时退出执行外循环。直到外循环也不满足条件时结束。选B。
转载请注明原文地址:https://jikaoti.com/ti/F1N0FFFM
0

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