问题描述：
vb语句编写S=1*2*3*……*n的值怎么编?
问题解答：
我来补答
这个我来帮你吧!我在VB里写好代码再发给你哟!
Private Sub Command1_Click()
Dim n As Integer,s As Double
n = Val(InputBox("enter data n:"))
s = 1
For i = 1 To n
s = s * i
Next i
Print s
End Sub
Private Sub Command1_Click()
Dim n As Integer,s As Double
n = Val(InputBox("enter data n:"))
s = 1
For i = 1 To n
s = s * i
Next i
Print s
End Sub
展开全文阅读