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

admin2020-04-18  47

问题 阅读程序:
Option Base1
Private Sub Form_Click()
Dim a(3,3)As Integer
For i=1 To 3
For j=1 To 3
a(i,j)=____________
Print a(i,j);
Nex tj
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/y4Tp777K
0

最新回复(0)