在窗体上有命令按钮“Command1”,文本框“Text1”,编写如下程序: Function result(x As Integer)As Boolean If x Mod 2=0 Then result=True Els

admin2017-09-23  18

问题 在窗体上有命令按钮“Command1”,文本框“Text1”,编写如下程序:
    Function result(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
    程序运行后单击命令按钮,在输入对话框中输入119,则在“Text1”中显示“119是奇数”。则程序的【】处应填写的表达式是(    )。

选项 A、result(x)=’’偶数’’
B、result(x)
C、result(x)=’’奇数’’
D、Notresuh(x)

答案D

解析 result函数返回的是布尔值:true或false,x mod 2=0表示如果一个数除以2为0代表是偶数,那么返回true值,程序中的【】位置是对result函数的调用,根据if中的“Text1=Str(x)&’’是奇数.’’”语句,可以判断出result函数返回“true”时,程序显示为“奇数”,所以应在【】处填入Notresult(x),故本题D选项正确。
转载请注明原文地址:https://jikaoti.com/ti/k3XiFFFM
0

相关试题推荐
最新回复(0)