在窗体上画一个命令按钮,名称为Commandl,然后编写如下代码: Option Base 0 Private Sub Commandl_Click() DimA(4)As Integer,B(4)As Integer Fork=0 To 2A(k+1)=InputBox(“请输入一个整数”)B(3-k)=A(k+1) Nextk PrintB(k) End Sub 程序运行后,单击命令按钮,在输
单选题
在窗体上画一个命令按钮,名称为Commandl,然后编写如下代码: Option Base 0 Private Sub Commandl_Click() DimA(4)As Integer,B(4)As Integer Fork=0 To 2A(k+1)=InputBox(“请输入一个整数”)B(3-k)=A(k+1) Nextk PrintB(k) End Sub 程序运行后,单击命令按钮,在输