阅读程序: Option Base1 Private Sub Form_Click() Dim a(3,3)As Integer For i=1To3 For j=1To3 a(i,j)=_______ Print a(i,j); Next j Print

admin2019-04-29  24

问题 阅读程序:
Option Base1
Private Sub Form_Click()
Dim a(3,3)As Integer
For i=1To3
For j=1To3
a(i,j)=_______
Print a(i,j);
Next j
Print
Next i
End Sub
运行上面的程序,单击窗体,输出结果如下:1 4 7
2 5 8
3 6 9
则在横线处应填入的内容为

选项 A、i+j
B、i*j
C、(i-1)*3+j
D、i+(j-1)*3

答案D

解析 本题中使用二重循环为数组赋值,分许输出的结果,每个元素和行号和列号的关系可以看出,每个元素的值应该等于i+(j-1)*3。
转载请注明原文地址:https://kaotiyun.com/show/dhUp777K
0

最新回复(0)