【单选题】窗体上有 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 (...
【单选题】窗体上有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 两个命令按钮。现编写以下程序: OptionBase 0 Dim a()As Integer, m As Integer PrivateSub Command1_Click() m = InputBox(" 请输入一个整数 ") ReDim a(m) End Sub PrivateSub Command2_Click() m = InputBox(...