单项选择题

有以下程序： Sub subP(b()As Integer) For i=1 To 4 b(i)=2*i Next i End Sub Private Sub Commandl Click() Dim a(1 To 4)As Integer a(1)=5 a(2)=6 a(3)=7 a(4)=8 subP a() For i=1 To 4 Print a(i) End Sub 运行上面的程序,单击命令按钮,输出结果为【 】

A．2468
B．5678
C．10121416
D．出错
<上一题 目录 下一题>
热门 试题

单项选择题
单击按钮时，以下程序运行后的输出结果是（ ）。Private Sub proc1(x As Integer，y As Integer，z As Integer)x=3*zy=2*zz=x+yEnd SubPrivate Sub Command1_Click()Dim x As Integer，y As Integer，Z As Integerx=1：y=2：z=3Call proc1(x，x，z)Print x；x；zCall proc1(x，y，y)Print x；y；yEnd Sub
A． Dim NewArray(10)As Integer
B．Dim NewArray(1 T0 10)As Integer
C． Dim NewArray(10)Integer
D．Dim NewArray(1 To 10)Integer
单项选择题
在窗体上画一个名称为Label1的标签，然后编写如下事件过程：Private Sub Form_Click()Dim arr(10, 10) As Integer Dim i As Integer, j As Integer For i = 2 To 4For j = 2 To 4 arr(i, j) = i * jNext j Next i Label1.Caption = Str(arr(2, 2) + arr(3, 3)) End Sub程序运行后，单击窗体，在标签中显示的内容是______。
A．12
B．13
C．14
D．15
相关试题