填空题

阅读程序：
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个数中的中间数，如图所示。请填空。