单项选择题

有如下程序:
Option Base 1
Dim arr() As Integer
Private Sub Form_Click()
Dim i As Integer, j As Integer
ReDim arr(3,2)
For i=1 To 3
for j=1 To 2
arr(i,j)=i*2+j
Next j
Next i
ReDim Preserve arr(3,4)
For j=3 To 4
arr(3,j)=j+9
Next j
Print arr(3,2); arr(3,4)
End Sub
程序运行后,单击窗体,输出结果为

A.8 13
B.0 13
C.7 12
D.0 0
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体上画一个文本框,其名称为Text1,然后编写如下过程: Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer) Print Chr(KeyCode) End Sub Private Sub Text1_KeyUp(KeyCode As Integer, Shift As integer) Print Chr(KeyCode+2) End Sub 程序运行后,把焦点移到文本框中,此时如果敲击“A”键,则输出结果为
A.A
A
B.A
B
C.A
C
D.A
D
单项选择题
在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,把文本框的Text属性设置为空白,然后编写如下事件过程: Private Sub Command1_Click() a=InputBox( Enter an integer ) b=InputBox( Enter an integer ) Text1.Text=b+a End Sub 程序运行后,单击命令按钮,如果在输入对话框中分别输入8和10,则文本框中显示的内容是
A.108
B.18
C.810
D.出错
相关试题
  • 下面的程序执行时,可以从键盘输入一正整数...
  • 在窗体上画一个名称为Command1的命令按钮...
  • 在窗体上画一个命令按钮,其名称为Command...
  • 窗体上命令按钮Command1的事件过程如下:...
  • 在窗体上画一个命令按钮和一个文本框,其名...