选择题   窗体中有命令按钮Command1和文本框Text1，
    事件过程如下：
    Function result(ByVal x As Integer)
    AS Boolean
    If x MOod 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是奇数”。那么在程序的空白处应填写______。