有程序如下: Sub subP(b() As Integer) For i=1 To 4 b(i)=2*i Next i End Sub Private Sub Command1_Click()

admin2010-03-30  31

问题 有程序如下:    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      subP a()    For i=1 To 4             Print a(i)    Next i    End Sub运行上面程序,单击命令按钮,输出结果为______ 。

选项 A、 2   4    6    8
B、5    2    2    2
C、10    12    14    16
D、出错

答案1

解析
转载请注明原文地址:https://jikaoti.com/ti/Reg0FFFM
0

最新回复(0)