[单项选择题] 当发生Form_Click事件时,窗体上显示的第三行是( )。 Option Base 1 Private Sub Form_Click()Dim i As Integer,j

20 查阅

[单项选择题] 当发生Form_Click事件时,窗体上显示的第三行是( )。

Option Base 1

Private Sub Form_Click()

Dim i As Integer,j As Integer,k As Integer

Dim a(5,5)As Integer

For i=1 To 5

k=1

For i=1 To 5

If(i<=j)Then

a(i,j)=k

k=k+2

Else

a(i,j)=k+1

End If

Next j

Next i

For i=1 To 5

For j=1 To 5

Print a(i,j);

Next j

Print

Next i

End Sub

A.1 3 5 7 9

B.2 1 3 5 7

C.2 2 2 1 3

D.2 2 1 3 5

参考答案:

D

本题首先通过一个两层循环给5行5列的二维数组a的各个元素赋值,通过计算,不难得出二维数组各行的值。第一行的值为:1 3 5 7 9:第二行的值为:2 1 3 5 7;第三行的值为:2 2 1 3 5;第四行的值为:2 2 2 1 3;第五行的值为:2 2 2 2 1。然后再通过一个双层循环按行输出该数组,所以输出的第三行为:2 2 1 3 5。

计算机考试