填空题

阅读程序：
　　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
程序运行后，单击窗体，在输入对话框中分别输人三个整数，程序将输出三个数中的中间数，如图所示。请填空。