窗体中有命令按钮Command1和文本框Text1,事件过程如下:Function result(ByVal x As Integer)As B

窗体中有命令按钮Command1和文本框Text1，事件过程如下：

Function result(ByVal x As Integer)As Boolean

If x Mod 2=0 Then

result=True

else

result=False

End If

End Function

Private Sub Command1_Click()

x=Val(InputBox(“请输入一个整数”))

If______ Then

Textl=Str(x)&“是偶数．”

Else

Textl=Str(x)&“是奇数．”

End If

End Sub

运行程序，单击命令按钮，输入19，在Textl中会显示“19是奇数”。那以在程序的空白处应填写( )。

A．result(x)=“偶数”

B．result(x)

C．result(x)=“奇数”

D．NOT result(x)