在窗体上有一个命令按钮Command1，通用过程fun和命令按钮的事件过程如下： Private Function fun(ByVal m As Integer) If m Mod 2 = 0 Then fun=2 Else fun=1 End If End Function Private Sub Command1_Cliek() Dim i As Integer, s As Integer s=0 For i=1 To 5 s=s+fun(i) Next Print s End Sub 程序运行后，单击命令按钮，则窗体上输出( )。

A．6

B．7

C．8

D．9

[单选题]在窗体上有一个命令按钮Command1，通用过程fun和命令按钮的事件过程如下：Private Function fun(ByVal m As Integer)Ifm Mod2=0 Thenfun=2E．lsefun=1E．nd IfE．nd FunctionPrivate Sub Command1_Click()D．im i As Integer,s As Integers=0F．or i=1 To 5s=s+fun(i)NextPrintsE．nd Sub程序运行后，单击命令按钮，则窗体上输

[单选题]在窗体上有一个命令按钮Commandl，通用过程fun和命令按钮的事件过程如下： Private Function fun(By m As Integer) If m Mod 2=0 Then fun=2 Else Fun=1 Else If End Funcion Private Sub Commandl_Click() Dim i Integer,s As Integer s=0 For i=1 To 5 s=s+fun(i) Next Print s End Sub 程序运行后，单击命令按

[单选题]在窗体上绘制一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程： Private Function fun(ByVal m As Integer) If m Mod 2=0 Then fun=2 Else fun=1 End If End Function Private Sub Command1_Click() Dim i As Integer，s As Integer s=0 For i=1 To 5 s=s+fun(i) Next Print s End Sub

[单选题]在窗体上画一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程：Private Function fun（ByVal m As Integer）If m Mod 2 = 0 Thenfun = 2E．lsefun = 1E．nd IfE．nd FunctionPrivate Sub Command1_Click（）D．im i As Integer, s As Integers = 0F．or i = 1 To 5s = s + fun（i）NextPrint sE．n

[单选题]在窗体上画一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程： Private Funcdonf(m As Integer) If m Mod2=0 Then f=m E1Se f=1 End If End FunCdOn Private Sub Cmnmalldl_CUCk() Dimi As Integer S=0 Fori=1 To 5 s=s+f(i)A．11B．10C．9D．8

[单选题]在窗体上画一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程： Private Function f(m As Integer) If m Mod 2 = 0 Then f = m Else f = 1 End If End Function Private Sub Command1_Click() Dim i As Integer s = 0 For i = 1 To 5 s = s + f(i) Next Print s End Sub 程序运行后，单击命令按钮，

[单选题]在窗体上画一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程； Private Function fun(ByVal m As Integer) If m Mod 2=0 Then fun=2 Else fun=1 End If End Function Private Sub Command1_C1ick() Dim i As Integer, s As Integer s=0 For i=1 To 5 s=s+fun(i) Next Print s End Sub

[单选题]在窗体上画一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程： Private Function fun(ByVal m As Integer) If m Mod 2=0 Then fun=2 Else fun=1 End If End Function Private Sub Command1_Click( ) Dim i As Integer，s As Integer S=0 For i=1 To 5 s=s+fun(i) Next Print 3 End Sub

[单选题]窗体上有一个命令按钮Command1，编写如下事件过程：Private Sub Command1_Click()Sum = 0F．or m = 1 To 3Select Case mC．ase 1a = 1C．ase 2a = 2C．ase 3a = 3E．nd SelectPrint a,Sum = Sum + aNext mPrint SumE．nd Sub运行时，单击按钮，输出结果是( )。A． 3 3 3 9B． 3 2 1 6C． 1 1 1 3D． 1 2 3 6

[单选题]窗体上有一个命令按钮Command1，编写如下事件过程：Private Sub Command1_Click()a = 80: b = 50: c = 30If ac Then b = cIf b = c And ac Then c = a + bPrint a, b, cE．nd Sub运行时，单击按钮，窗体输出的结果是( )。A． 80 50 30B． 80 30 30C． 50 30 80D． 50 30 30