选择题窗体中有命令按钮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
Text1=Str(x)&'是偶数.'
Else
Text1=Str(x)&'是奇数.'
End If
End Sub
运行程序，单击命令按钮，输入19，在Textl中会显示“19是奇数.”。那么在程序的空白处应填写______。

A、 result(x)='偶数'
B、 result(x)
C、 result(x)='奇数'
D、 NOT result(x)

【正确答案】 B

【答案解析】本题程序的功能是判断用户在文本框中输入的整数是奇数还是偶数。首先，在result方法中，通过If语句设置了判断变量x是奇数或是偶数的方法，如果变量x与2取余的结果为0，那么变量result的值为“True”，否则变量result的值为“False”。在子过程command1_Click()中，通过语句“x=Val(InputBox('请输入一个整数'))”将从文本框中得到的输入数据为变量x赋值，然后通过If语句判断x的值是奇数还是偶数，这时就需要将变量x作为参数来调用result方法，也就是说，本空填“result(x)”，当结果为真时，执行语句“Text1=str(x)&'是偶数.'”，当结果为假时，执行语句“Text1=Str(x)&'是奇数.'”。所以本题答案为B。