填空题

阅读程序：
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)
ElseIf a(1)＞a(3) Then
m= ______
Else
m= ______
End If
Print “中间数是:”；m
End Sub
程序运行后，单击窗体，在输入对话框中分别输入三个整数，程序将输出三个数中的中间数，如图所示。请填空。