问题详情

窗体中有命令按钮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)