窗体上有命令按钮commaM1,对应的Click事件过程如下: Private Sub Command1_Click( ) Dim x As Integer x = InputBox("请输入x的值") Select Case x

admin2018-06-11  41

问题 窗体上有命令按钮commaM1,对应的Click事件过程如下:
Private Sub Command1_Click( )
   Dim x As Integer
   x  = InputBox("请输入x的值")
  Select Case x
           Case  1 ,2 ,4,10
            Debug.Print "A"
      Case 5 T0 9
            Debug.Print "B"
      Case Is =3
              Debug.Print "C"
     Case Else
            Debug.Print "D"
  End Select
End Sub
    窗体打开运行,单击命令按钮,在弹出的输入框中输入3,则立即窗口上显示的内容是(    )。

选项 A、C
B、A
C、B
D、D

答案A

解析 在Select Case语句中,Case表达式可以是下列4种格式之一:
①单一数值或一行并列的数值,用来与“表达式”的值进行比较,成员之间以逗号隔开。
②由关键字To分割开的两个数值或表达式之间的范围。
③关键字Is接关系运算符,如<>、<、<=、=、>=或>,后面再接变量或精确的值。
④关键字Case Else后的表达式,是在前面的Case条件都不满足时执行。
本题中输入“3”,与第三个Case语句匹配,程序输出字符“C”,故选择A选项。
转载请注明原文地址:https://jikaoti.com/ti/Hn10FFFM
0

最新回复(0)