命令按钮Command1的单击事件过程如下: Private Sub Commandl_Click() Dim a(10,10)As Integer x=0 For i=1 To 3 For j=1 To 3

admin2016-06-30  18

问题 命令按钮Command1的单击事件过程如下:
    Private Sub Commandl_Click()
    Dim a(10,10)As Integer
    x=0
    For i=1 To 3
    For j=1 To 3
    a(i,j)=i*2 Mod j
    If x<a(i,j)Then x=a(i,j)
    Next
    Next
    Print x
    End Sub
    执行上述事件过程后,窗体上显示的是(    )。

选项 A、1
B、2
C、3
D、4

答案B

解析 题目中定义了一个二维数组,为数组赋初值并找出这些值中最大的值输出。数组中的值为:
    a(1,1)=1*2 mod 1=0a(1,2)=1*2 mod 2=0a(1,3)=1*2 mod 3=2
    a(2,1)=2*2 mod 1=0a(2,2)=2*2 mod 2=0a(2,3)=2*2 mod 3=1
    a(3,1)=3*2 mod 1=0a(3,2)=3*2 mod 2=0a(3,3)=3*2 mod 3=0
    显然最大值为2,因此Print x语句将在窗体上显示2。
转载请注明原文地址:https://kaotiyun.com/show/2qLp777K
0

最新回复(0)