窗体上有命令按钮commandl,对应的Click事件过程如下: Private Sub Commandl_Click() Dim x As Integer x=InputBox("请输入x的值") SelectCasex Casel,2,4,10 Deb

admin2023-03-13  30

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

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

答案A

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

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