在窗体上面一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
Dim a As Integer, s As Integer
a=8
s=1
Do
s=s+a
a=a-1
Loop While a＜=0
Print s; a
End Sub
程序运行后，单击命令按钮．则窗体上显示的内容是______。

A．Function F1(b As Integer)
If b Mnd 2=0 Then
Return 0
Else
Return 1
End If
End Function
B．Function F1(b As Integer)
If b Mod 2=0 Then
F1=0
Else
F1=1
End If
End Function
C．Function F1(b As Integer)
If b Mod 2=0 Than
F1=1
Else
F1=0
End If
End Function
D．Function F1(b As Integer)
If b Mod 2＜＞0 Then
Return 0
Else
Return 1
End If
End Function

A．程序段的功能
B．语句的功能
C．数据的状态
D．模块的功能