窗体中有命令按钮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，在Text1中会显示“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)。