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

来源:学生作业帮助网 编辑:六六作业网 时间:2024/12/18 21:53:27
关于VB的题输入一个正整数N,计算出N!并输出.关于VB的题输入一个正整数N,计算出N!并输出.关于VB的题输入一个正整数N,计算出N!并输出.PrivateSubForm_Click()DimnAs

关于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