设有如下程序:Private Sub Form. Click( ) Dim s As Long f As Long Dim n As Integer i As Int

设有如下程序：

Private Sub Form. Click（）

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

程序运行后，单击窗体，输出结果是（）。

A.32

B.33

C.34

D.35

请帮忙给出正确答案和分析，谢谢！

参考答案

您可能感兴趣的试题

设窗体上有一个名为Text1的文本框，并编写如下程序：Private Sub Form_Load（) Show Text1.Text=

答案解析
编写如下程序:Private Sub Form_Click()a$=54321:b$=abcdeFor j=1 To 5Print Mid$(a$ 6-j 1)

答案解析
( 18 )在窗体上有如右图所示的控件各控件的名称与其标题相同并有如下程序:Private Sub Form_Lo

答案解析
有如下程序:Private Sub Form_Click( )Dim i As Integer Sum As Integer Sum = 0 For i = 2 To

答案解析
设有如下窗体单击事件过程: Private Sub Form_Click() a=1 For i=1 To 3 Select Case i Case 1 3

答案解析
设有如下程序:Option Base 0Private Sub Form_Click( )Dim aDim i As Integera=Array(1 2 3 4 5

答案解析