当Form_Click;事件发生时,窗体上显示的第三行是 ______。Privat

问题单项选择题

当Form_Click;事件发生时,窗体上显示的第三行是 ______。Private Sub Form_Click() Dim i As Integer, j As Integer, k As Integer Dim x(5, 5) As Integer For i = 1 To 5 k = 1 For j = 1 To 5 If i ＜= j Thenx(i, j) = k + 1k=k+2 Else x(i, j) = k + 1 End If Next j Next i For i = 1 To 5 For j = 1 To 5 Print x(i, j) Next j Print Next iEnd Sub

A．22135

B．21357

C．22213

D．13579

答案

参考答案：A

解析：程序首先通过一个双重循环二维数组x的各个元素赋值，通过计算不难得出二维数组各行的值：第一行：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，因此本题选A。