不要在驾驶室的前后窗范围内悬挂和放置妨碍驾驶人视线的物品。

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

Private Function fun(By Val m As Integer)

If m Mod 2=0 Then

fun=2

Else

fun=1

End If

End Function

Private Sub Commandl_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