窗体上有Command1、Command2两个命令按钮。现编写以下程序: Option Base 0 Dim a()As Integer,m As Integer Private Sub Command1_Click()m=InputBox("请输入—个正整数")ReDim a(m) End Sub Private Sub Command2_Click()m=InputBox("请输入—个正整数"
单选题
窗体上有Command1、Command2两个命令按钮。现编写以下程序: Option Base 0 Dim a()As Integer,m As Integer Private Sub Command1_Click()m=InputBox("请输入—个正整数")ReDim a(m) End Sub Private Sub Command2_Click()m=InputBox("请输入—个正整数"