[填空题] 有一个过程如下： Sub Sub1(m As Integer，total As Long) Dim i AS Integer 　　total=1 　　For i=1 To m 　　　　to

[填空题] 有一个过程如下： Sub Sub1(m As Integer，total As Long) Dim i AS Integer 　　total=1 　　For i=1 To m 　　　　total=total*i 　　Next End Sub 调用它的事件过程如下： Private Sub Command1_Click() Dim tot As Long，a As Integer 　　a=Val(InputBox("请输入数据")) 　　Call Subl(a,tot) 　　Print tot End Sub 则输入数据5，运行结果为______。