填空题

如果存在如下过程:
Private Function Fun(a()As Integer)
Dim First As Integer,Last As Integer,i As Integer
 First=LBound(a)
 Last=LBound(a)
 Max=a(First)
 For i=First To Last
  If a(i)>Max Then Max=a(i)
 Next
 Fun=Max
End Function
在窗体上添加一个命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
ReDim in(1 To 4)As Integer
 m(1=20:m(2)=30:m(3)+50:m(4)=100
 c=Fun(m)
 Print c
End Sub
单击命令按钮,其输出结果为______。

【参考答案】

100