在窗体上有一个执行命令按钮(名为Commandl),两个文本框Texto和Text1。 命令按钮的Click事件程序如下: Private Sub Commando_Click() x= Val(Me! Text1) If【

admin2020-11-25  30

问题 在窗体上有一个执行命令按钮(名为Commandl),两个文本框Texto和Text1。
    命令按钮的Click事件程序如下:
    Private Sub Commando_Click()
    x= Val(Me! Text1)
    If【】Then
    Texto=Str(x)&"是奇数."
    Else
    Texto=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,单击命令按钮后Texto中显示“21是奇数”。则程序【】处应填写的语句是(    )。

选项 A、result(x)=”奇数”
B、result(x)=”偶数”
C、result(x)
D、Not result(x)

答案D

解析 函数result的功能是判断一个数的奇偶性,如果是偶数,则返回True,否则返回False。在主调过程CommandO_Click()中,使用If判断Texto中输入值的奇偶性,当If表达式为True时,返回“是奇数”,否则返回“是偶数”,因此在If后的空缺条件表达式处,应填入调用函数result的语句,如果返回的值为True,则为奇数;如果返回的值为False,则为偶数,所以应填人的语句为“not re—sult(x)”,故本题D选项正确。
转载请注明原文地址:https://jikaoti.com/ti/18C0FFFM
0

最新回复(0)