现有如下一段程序: Private Sub Command1_Click()   x=UCase(InputBox("输入:"))   Select Case x     Case "A" To "C"       Print "考核通过!"     

admin2015-08-28  21

问题 现有如下一段程序:
Private Sub Command1_Click()
  x=UCase(InputBox("输入:"))
  Select Case x
    Case "A"  To  "C"
      Print "考核通过!"
    Case "D"
      Print "考核不通过 !"
    Case Else
      Print "输入数据不合法!"
  End Select
End Sub
执行程序,在输入框中输入字母"B",则以下叙述中正确的是(  )。

选项 A、程序运行错
B、在窗体上显示"考核通过!"
C、在窗体上显示"考核不通过 !"
D、在窗体上显示"输入数据不合法!"

答案B

解析 程序中Ucase函数将输入的字母转换为大写,然后通过Select多分支控制语句选择输出不同信息,当输入字母在"A"到"C"之间时,显示"考核通过!",输入的是"D"时显示"考核不通过!",如果输入的是"A"到"D"之外的其他字符则显示"输入数据不合法!"。程序中输入字母"B",因此会显示"考核通过!"。
转载请注明原文地址:https://kaotiyun.com/show/HsLp777K
0

最新回复(0)