未分类题

设有如下程序:
Private Sub Form_C1ick()
Dim s As Long,f As Long
Dim n As Integer,i As Integer
f=1
n=4
For i=1 To n
f=f*i
s=s+f
Next i
Print s
End Sub
程序运行后,单击窗体,输出结果是
0)35

A.32
B.33
C.34

【参考答案】

B
解析:i=1时,f=f*i=1*1=1,s=s+f=0+1=1.i=2时,f=f*i=1*2=2,s=s+f......

(↓↓↓ 点击下方‘点击查看答案’看完整答案 ↓↓↓)