窗体中有命令按钮Commandl和文本框Textl,事件过程如下: Function result(ByVal X As Integer)As Boolean If x Mod 2=0 Then result=Tme

admin2020-09-01  27

问题 窗体中有命令按钮Commandl和文本框Textl,事件过程如下:
    Function result(ByVal X As Integer)As Boolean
      If x Mod 2=0 Then
          result=Tme
      Else
          result=False
      End If
    End Function
    Private Sub Command l_Cliek()
    X=Val(InputBox(”请输入一个整数”))
    If【  】Then
         Textl=Str(x)&”是偶数.”
    Else
         Textl=Str(x)&”是奇数.”
    End If
  End Sub
    运行程序,单击命令按钮,输入19,在Textl中会显示“19是奇数”。那么在程序的括号内应填写(    )。

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

答案B

解析 本题程序是判断奇偶性的程序,函数Resuh用来判断x是否是偶数,如果x是偶数,那么Result的返回值为真,否则返回值为假,单击命令按钮时执行的过程是输入整数x,然后调用Result函数,如果值为真,文本框会显示输入的值是偶数,否则显示输入的值为奇数。调用Result函数且Result函数值为真时的表达式为:Result(x)。
转载请注明原文地址:https://kaotiyun.com/show/crcp777K
0

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