填空题：阅读程序：Option Base 1Private Sub Form Click()Dim a(3)As Integer

阅读程序：
Option Base 1
Private Sub Form Click()
Dim a(3)As Integer
Prin“输入的数据是：”：
For i=1T0 3
a(i)=InputBox(“输入数据”)
Print a(i)：
Next
Print
If a(1)t=a(1)
a(1)；a(2)
a(2)= 【1】
End If
If a(2)>a(3)Then
m=a(2)
Else lf a(1)>a(3)Then
m= 【2】
EIse
m= 【3】
End If
Print“中间数是：”；m
End Sub

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