阅读程序：

Option Base 1

Private Sub Form_Click（）

D．im a（3）As Integer

Print "输入的数据是：";

F．or i = 1 To 3

a（i）=InputBox（"输入数据"）

Print a（i）;

Next

Print

If a（1）

t = a（1）

a（1）= a（2）

a（2）= ________

E．nd If

If a（2）>a（3）Then

m = a（2）

E．lseIf a（1）>a（3）Then

m = ________

E．lse

m = ________

E．nd If

Print "中间数是：";m

E．nd Sub

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