有过程如下：Sub fact (m As Integer, total As Lon
题型：单项选择题
问题：
有过程如下：Sub fact (m As Integer, total As Long) Dim i As Integer total = 1 for i = 1 To mtotal = total*i Next iEnd Sub调用它的事件过程如下：Private Sub Command1_ Click () Dim tot As Long Dim a As Integer a = Val InputBox (“请输入数据”)) Call fact (a, tot) Print totEnd Sub则输入数据5，运行结果为 ______。
A．100
B．120
C．200
D．50