[填空题] 阅读程序： Option Base 1 Private Sub Form Click() Dim a(3)As Integer Print "输入的数据是；"；

[填空题] 阅读程序：

Option Base 1

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)＜a(2)Then

t=a(1)

a(1)=a(2)

a(2)=______

End If

If a(2)＞a(3)Then

m=a(2)

Elself a(1)＞a(3)Then

m=______

Else

m=______

End If

Print "中间数是："；m

End Sub

程序运行后，单击窗体，在输入对话框中分别输入3个整数，程序将输出3个数中的中间数，如图所示。请填空。