选择题 33.  窗体中有命令按钮commanddl和文本框Textl,事件过程如下:
    Function result(ByVal x As Integer)As Boolean
    If x Mod 2=0 Then
    result=Time
    Else
    result=False
    End If
    End Function
    Private Sub Comlmandl_Click()
    x=Val(InputBox("请输入一个整数"))
    If ______ Then
    Textl=str(x) &"是偶数."
    Else
    Textl=str(x)&"是奇数."
    End If
    End Sub
    运行程序,单击命令按钮,输入19,在Text1中会显示“19是奇数”。那么在程序的空白处应填写______。
【正确答案】 B
【答案解析】 result()函数返回的是布尔值:Trile或False,x Mod 2=0表示如果一个数除以2为0代表是偶数,那么返回True值,所以条件判断时只要调用result(x)即可。