选择题 37.  窗体中有命令按钮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是奇数”。那么以上程序的横
    线处应填写______。