在窗体上画一个名称为Command1的命令按钮，然后编写如下通用过程和命令按钮的事件过程：

Private Function fun（ByVal m As Integer）

If m Mod 2 = 0 Then

fun = 2

E．lse

fun = 1

E．nd If

E．nd Function

Private Sub Command1_Click（）

D．im i As Integer, s As Integer

s = 0

F．or i = 1 To 5

s = s + fun（i）

Next

Print s

E．nd Sub

程序运行后，单击命令按钮，在窗体上显示的是（ ）。

A．6

B．7

C．8

D．9

[单选题]在窗体上画一个名称为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 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 Sub Command1_Click（）c = “ABCD”F．or n= 1 To 4Print （ ）NextE．nd 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（）a$ = "software and hardware"b$ = Right（a$, 8）c$ = Mid（a$, 1, 8）MsgBox a$, , b$, c$, 1E．nd Sub运行程序，单击命令按钮，则在弹出的信息框的标题栏中显示的是（ ）。A．software and hardwareB．softwareC．hardwareD．1

[单选题]在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() a$="software and hardware" b$=Right(a$，8) c$=Mid(a$，1，8) MsgBox a$，，b$，c%，1 End Sub 运行程序，单击命令按钮，则在弹出的信息框的标题栏中显示的是______。A．software and hardwareB．softwareC．hardwareD．1

[单选题]在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() Dim a() a=Array("机床"，"车床"，"钻床"，"轴承")Print a(2) End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是( )。A．机床B．车床C．钻床D．轴承

[单选题]在窗体上画一个命令按钮(名称为Command1)，然后编写如下事件过程： Private Sub Command_Click() Static b As Integer b=b+1 End Sub运行程序，第3次单击命令按钮后，变量b的值为______。A．0B．1C．2D．3