[填空题] 阅读程序: Option Base 1 Private Sub Form_Click() Dima(3)As Integer Print"输入的数据是:";
15 查阅
[填空题] 阅读程序:
Option Base 1
Private Sub Form_Click()
Dima(3)As Integer
Print"输入的数据是:";
Fori=1 To 3
a(i)=InputBox(“输入数据”)
Printa(i);
Next
If a(1)<a(2) Then
t=a(1)
a(1)=a(2)
a(2)= [10]
End If
Ifa(2)>a(3)Then
m=a(2)
Else If a(1)>a(3)Then
m= [11]
Else
m=a(1)
End If
Print"中间数是:";m
End Sub
程序运行后,单击窗体,在输入对话框中分别输入三个整数,程序将输出三个数中的中间数,如下图所示。请填空。
参考答案: