单项选择题

请阅读程序：
Option Base 1
Private Sub Form_Click()
Dim Arr(4,4)As Integer
For i=1 To 4
Forj=1 To 4
Arr(i,j)=(i-1)*2+j
Nextj
Nexti
Fori=3 To 4
For j=3 To 4
Print Arr(j,i)；
Next j
Print
Next i
End Sub
程序运行后，单击窗体，则输出结果是______。

A) 5 7
6 8
B) 6 8
7 9
C) 7 9
8 10
D) 8 10
8 11
<上一题 目录 下一题>
热门 试题

单项选择题
设工程文件包含两个窗体文件Form1.frm、Form2.frm及一个标准模块文件Module1.bas，两个窗体上分别只有一个名称为Command1的命令按钮。 Form1的代码如下： Public x As Integer Private Sub Form_Load() x=6 y=8 End Sub Private Sub Command1_Click() Form2.Show End Sub Form2的代码如下： Private Sub Command1_Click() Print Form1.x，y End Sub Module1的代码如下： Public y As Integer 运行以上程序，单击Form1的命令按钮Command1，则显示Form2；再单击Form2上的命令按钮Command1，则窗体上显示的是______。
A) 6
0
B) 0
8
C) 6
8
D) 程序有错
单项选择题
窗体上有一个名为Command1的命令按钮，并有如下程序： Private Sub Command1_Click() Dim a(10) ,x% For k=1 To 10 a(K)=Int(Rnd*90+10) x=x+a(k) Mod 2 Next k Print x End Sub 程序运行后，单击命令按钮，输出结果是______。
A) 10个数中偶数的个数
B) 10个数中奇数的个数
C) 10个数中偶数的累加和
D) 10个数中奇数的累加和
相关试题