在窗体上绘制一个名称为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 程序运行后，单击命令按钮，在窗体上显示的是

A．6

B．7

C．8

D．9

[单选题]在窗体上画一个名称为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()c="ABCD"For n=1 To 4 Print__Next End Sub 程序运行后，单击命令按钮，要求在窗体上显示如下内容：DCDBCDABCD 则在横线处应填入的内容为A．Left(c.n) B．Right(c,n) C．Mid(c,n,1) D．Mid(c,n,n)

[单选题]在窗体上绘制一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() c="ABCD" For n=1 To 4 Print______ Next End Sub 程序运行后，单击命令按钮，要求在窗体上显示如下内容： D CD BCD ABCD 则在横线处应填入的内容为( )A．Left(c,n)B．Right(c,n)C．Mid(c,n,1)D．Mid(c,n,n)

[单选题]在窗体上绘制一个命令按钮，其名称为Command1，然后编写如下事件过程：Private Sub Command1_Click() Dim i As Integer,x As Integer For i=1 To6 If i=1 Then x=i If i<= 4 Thenx=x+1 Elsex=x+2 End If Next i Print xEnd Sub 程序运行后，单击命令按钮，其输出结果为 。A．9 B．6 C．12 D．15

[单选题]在窗体上绘制一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() Dim i As Integer,x As Integer For i_1 T0 6 If i=1 Then x=i If i＜=4 Then x=x+1 Else x=x+2 End If Next i Print x End Sub 程序运行后，单击命令按钮，其输出结果为( )。A．9B．6C．12D．15

[单选题]在窗体上绘制一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1 Click() Dim i As Integer， x As Integer For i=1 To 6 If i=1 Then x=i If i＜= 4 Then x=x+1 Else x=x+2 End If Next i Print x End Sub 程序运行后，单击命令按钮，其输出结果为A．9B．6C．12D．15