在窗体上画一个命令按钮,名称为 Command1, 然后编写如下代码:
Option Base 0
Private Sub Command1_Click()
Dim A (4)As Integer,B(4) As Integer
For k=0 To 2
A(k+1)=InputBox(“ 请输入一个整数 ”)
B(3-k)=A(k+1)
Next k
Print B(k)
End Sub
程序运行后,单击命令按钮,在输入对话框中分别输入 2 、 4 、 6 ,输入结果为 ( ) 。
发布于 2022-05-11 10:19:04
登录后免费查看答案
关注者
0
被浏览
14