单选题 在窗体上有一个执行命令按钮(名为Command1),两个文本框Text0和Text1。
命令按钮的Click事件程序如下:
Private Sub Command0_Click()
x=Val(Me!Text1)
If ______ Then
Text0=Str(x) & "是奇数."
Else
Text0=Str(x) & "是偶数."
End If
End Sub
Function result(ByVal x As Integer) As Boolean
result=False
If x Mod 2=0 Then
result=True
End If
End Function
程序运行时,在Text1中输入21,单击命令按钮后Text0中显示“21是奇数”。则程序中横线处应填写的语句是______。
【正确答案】 D
【答案解析】[解析] 函数result的功能是判断一个数的奇偶性,如果是偶数,则返回True,否则返回False。在主调过程Command0_Click()中,使用If判断Text0中输入值的奇偶性,当If表达式为True时,返回“是奇数”,否则返回“是偶数”,因此在Ⅱ后的空缺条件表达式处,应填入调用函数result的语句,如果返回的值为True,则为奇数;如果返回的值为False,则为偶数,所以应填入的语句为“not result(x)”,故本题D选项正确。