窗体中有命令按钮Command1和文本框Text1,事件过程如下: Function result(ByVal x As Integer)As Boolean If x Mod 2=0 Then result=True else re

admin2013-03-30  30

问题 窗体中有命令按钮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
    Textl=Str(x)&“是奇数.”
    End If
    End Sub
    运行程序,单击命令按钮,输入19,在Textl中会显示“19是奇数”。那以在程序的空白处应填写(    )。

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

答案B

解析 result函数对参数进行取模2后判断,所以当参数值为偶数时返回true,返回值为布尔型,所以此处应选B选项。
转载请注明原文地址:https://kaotiyun.com/show/7srp777K
0

最新回复(0)