单项选择题

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

A．2 4 6 8
B．5 6 7 8
C．10 12 14 16
D．出错
<上一题 目录 下一题>
热门 试题

填空题
图案■表示______。
单项选择题
单击命令按钮时，下列程序代码的执行结果为( )。 Private Function FirProc(x As Integer,y As Integer,z As Integer) FirProc=2*x+y+3*z End Funcfion Private Function SecProc(x As Integer,y As Integer,z As Integer) SecProc=FirProc(z，x，y)+x End Funcfion Private Sub Command1_Click() Dim a As Integer Dim b As Integer Dim c As Integer a=2 b=3 c=4 Printf SecProc(c,b,a) End Sub
A．21
B．19
C．17
D．34
相关试题