单选题 在窗体上添加一个命令按钮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
         Textl=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)