关于VB的题 输入一个正整数N,计算出N!并输出.

来源:学生作业帮助网 编辑:作业帮 时间:2024/11/16 22:32:42

关于VB的题 输入一个正整数N,计算出N!并输出.
关于VB的题 输入一个正整数N,计算出N!并输出.

关于VB的题 输入一个正整数N,计算出N!并输出.
Private Sub Form_Click()
Dim n As Integer
n = InputBox("请输入一个正整数n")
s = 1
For i = n To 1 Step -1
s = s * i
Next i
Print n & "!=" & s
End Sub