191问答库 > vb编程求一个数n的阶乘2,求300-400能被3整除的数及他们的和

vb编程求一个数n的阶乘2,求300-400能被3整除的数及他们的和

2024-11-23 08:09:47

推荐回答（1个）

回答1：

这是要做两个程序吗？第一个程——求一个数n的阶乘，第二个程序，求300-400能被3整除的数及他们的和。
Private Sub Command1_Click()
Dim n As Integer, y As Long
n = InputBox("请输入一个小于12的正整数：")
y = 1
For i = 2 To n
y = y * i
Next i
Print n; "!="; y
End Sub