[填空题] 阅读程序: 参考答案: 问题解析:
Option base1
Private Sub Form_Click( )
Dim a(3)As Integer
Print“输入的数据是:”;
For i=1 To 3
a(i)=InputBox(“输人数据”)
Print a(i);
Next
Print
If a(1)
t=a(1)
a(1)=a(2)
a(2)= 【8】
End If
If a(2)>a(3) Then
m=a(2)
Else If a(1)>a(3)Then
m= 【9】
Else
m= 【10】
End If
Print“中间数是:”;m
End Sub
程序运行后,单击窗体,在输入对话框中分别输人三个整数,程序将输出三个数中的中间数,如图所示。请填空。


![[填空题] 阅读程序: Option Base1 Private Sub Form_Click( ) Dim a(3)As Integer Print“输入的数据是:”; Fo [填空题] 阅读程序: Option Base1 Private Sub Form_Click( ) Dim a(3)As Integer Print“输入的数据是:”; Fo](http://www.mshxw.com/aiimages/31/254044.png)
