窗体中有命令按钮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是奇数”。那么在程序的括号内应填写( )。