设有如下程序:Option Base 1Private Sub Command1_Click()Dim a(10) As IntegerDim n As Integern=InputBox(“输入数据”)If n
单选题
设有如下程序:Option Base 1Private Sub Command1_Click()Dim a(10) As IntegerDim n As Integern=InputBox(“输入数据”)If n<10 ThenCall GetArray(a,n)End IfEnd SubPrivate Sub GetArray(b()As Integer,n As Integer)Dim c