题目内容:
下列程序运行后的输出结果是______。
Private Sub f(k,s)
s=1
For j=1 To k
S=S*j
Next
End Sub
Private Sub Command1_Click()
Sum=0
For i=1 To 3
Call f(i,s)
Sum=Sum+s
Next
Print Sum
End Sub
参考答案:
答案解析:
下列程序运行后的输出结果是______。
Private Sub f(k,s)
s=1
For j=1 To k
S=S*j
Next
End Sub
Private Sub Command1_Click()
Sum=0
For i=1 To 3
Call f(i,s)
Sum=Sum+s
Next
Print Sum
End Sub