江苏省计算机等级考试二级VB常用算法.docVIP

(1)累加和连乘　　??? 1、算法说明 　　??? 累加形式：V=V+e 　　??? 连乘形式：V=V*e 　　??? 其中：V是变量，e是递增表达式。累加和连乘一般通过循环结构来实现。 　　??? 注意：需在执行循环体前对变量V赋初值。一般的，累加时置初值0；连乘时置初值为1. 　　??? 举例 　　??? 求N！的结果。 　　??? Private Sub Command1_Click（） 　　??? Dim n%， i%， s 　　??? n = Val（InputBox（输入n）） 　　??? s = 1 　　??? For i = 1 To n 　　??? s = s * i 　　??? Next i 　　??? Print s 　　??? End Sub 　　??? 错误的写法： 　　??? Private Sub Command1_Click（） 　　??? Dim n%， i%， s 　　??? n = Val（InputBox（输入n）） 　　??? For i = 1 To n 　　??? s = 1???????????? ‘赋初值语句位置不对！ 　　??? s = s * i 　　??? Next i 　　??? Print s??????????????? ‘输出s的值为n，而不是n！ 　　??? En