怎么在VB中求和

1.用VB求出阶乘数相加的值，分为两个步骤来求，一个是计算阶乘数，然后相加阶乘数。1!+2!+3!+……+n!举个例子。

2、首先要理解阶乘知识，4!它是数字1到4的乘法N!它是1到n的乘积等等。如下图所示。

3.现在我们来编写岩念代码。第一步是定义变量，如下图所示。

4、这是一个累加器，所以会使用版本相关做世的累加器语句，这个问题使用for-next循环语句。具体的准备工作如下图所示。

5.这个问题不仅需要一个for-next循环，还需要一个嵌套在其中的for-next循环。

6.最粗胡困后，编写剩余的代码并编写完整的代码，如下图所示。

7.运行程序并输入一个值来验证它。如果权值n是8，那么1!+2!+3!+4!。+8!=46233。

Dim sum As Integer

n = 99 '你输入的最大数

i = 1

sum = 0

Do Until i >n

sum = sum + i

i = i + 1

Loop

'求和键唤到此为州游止，下面册亮销的是求素数

k = 1

Do Until k >n

For j = 1 To k / 2

If k Mod j = 0 And j <>1 Then

Exit For

End If

Next j

If j >k / 2 And k <>2 Then

MsgBox k

End If

k = k + 1

Loop