2. 计算机
  3. 窗体上有一个名称为Command1的命令按钮，并有如下程序代码： Option Base 1 Private Sub Command1_Click() Dim a%(3, 3) For i = 1 To 3 For j =

窗体上有一个名称为Command1的命令按钮，并有如下程序代码： Option Base 1 Private Sub Command1_Click() Dim a%(3, 3) For i = 1 To 3 For j =

admin2015-08-28  29
问题 窗体上有一个名称为Command1的命令按钮，并有如下程序代码：
Option Base 1
Private Sub Command1_Click()
    Dim a%(3, 3)
    For i = 1 To 3
        For j = 1 To 3
            If i > 1 And j > 1 Then
                a(i, j) = a(a(i - 1, j - 1), a(i, j - 1)) + 1
            Else
                a(i, j) = i * j
            End If
        Next
    Next
    Print a(2, 2); a(3, 3)
End Sub
运行程序，单击命令按钮，窗体上显示的是
选项 A、1  3
B、2  1
C、2  2
D、3  3
答案D
解析 a是个整形的二维数组。通过For循环给数组a元素赋值。i > 1 并且 j > 1时执行a(i, j) = a(a(i - 1, j - 1), a(i, j - 1)) + 1语句，否则执行a(i, j) = i * j，因此执行完第一个大循环后，数组a中的元素值分别是：a（1,1）= 1，a（1,2）= 2，a（1,3）= 3。以此类推，可知a（2,2）=3，a（3,3）=3。选D）。
转载请注明原文地址:https://jikaoti.com/ti/z360FFFM
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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