题目内容
(11)在窗体上画一个名为 Command1 的命令按钮,然后编写如下程序:
Private Sub Command1_Click()
Dim i As Integer
Sum=0
n=InputBox("Enter a number")
n=Val(n)
For i=1 To n
Sum= 【12】
Next i
Print Sum
End Sub
Function fun(t As Integer)As Long
p=1
For i=1 To t
p=p*i
Next i
【13】
End Function
以上程序的功能是,计算 1!+2!+3!+?+n!,其中 n 从键盘输入,请填空。
查看答案
搜索结果不匹配?点我反馈
更多问题