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