有一个过程如下：
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，运行结果为______。

题库:计算机等级考试 类型:填空题 时间:2017-07-03 15:59:14 免费下载:《填空》Word试卷

有一个过程如下：
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，运行结果为______。

本题关键词:AS-DAE染色,AS-D-NCE染色法,氯乙酸AS-D萘酯酶,醋酸AS-D萘酚酯酶,醋酸AS-茶酚酯酶染色,Solis AS Peek融合器(融合器),氯醋酸AS-D萘酚酯酶,醋酸AS-D茶酚脂酶染色,醋酸AS-D萘酚酯酶染色,氧化醋酸AS-D萘酚酯酶染色;