计算机二级
执行以下程序段，如果在对话框中输入8，输出结果是"Hello"的是______。A．n = InputBox("请输入一个数") Select Case n Case 7 To 1 Print "Hello" End SelectB．n = InputBox("请输入一个数") Select Case n Case Is＞1, Is ＜ 6 Print "Hello" End SelectC．n = InputBox("请输入一个数") Select Case n Case Is ＞ 5, 1, 3 To
题目
执行以下程序段，如果在对话框中输入8，输出结果是"Hello"的是______。
A．n = InputBox("请输入一个数") Select Case n Case 7 To 1 Print "Hello" End Select
B．n = InputBox("请输入一个数") Select Case n Case Is＞1, Is ＜ 6 Print "Hello" End Select
C．n = InputBox("请输入一个数") Select Case n Case Is ＞ 5, 1, 3 To 10 Print "Hello" End Select
D．n=InputBox("请输入一个数") Select Case n Case 1, 5, Is ＞ 9 Print "Hello" End Select
参考答案和解析
相似问题和答案
第1题：
下列程序段的执行结果为
m=1
n=1
Select Case m
Case 1
Select Case n
Case 0
Print "**0**"
Case 1
Print "**1**"
End Select
Case 2
Print "**2**"
End Select（ ）。
A．**0**
B．**1**
C．**2**
D．0
第2题：
在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Commandl_Click() x=Input Box("Input") Select Case x Case 1,3 Print"分支1" Case Is＞4 Print"分支2" Case Else Print"Else分支" End Select End Sub 程序运行后，如果在输入对话
A．分支1
B．分支2
C．Else分支
D．程序出错
第3题：
下列程序段的执行结果为
a=2
b=0
Select Case a
Case 1
Select Case b
Case 0
Print "**0**"
Case 1
Print "**1**"
End Select
Case 2
Print "**2**"
End Select（ ）。
A．**0**
B．**1**
C．**2**
D．0
第4题：
下列程序段的执行结果是【 】。
x=Int (Rnd+4)
Select Case X
Case 5
Prunt "优秀"
Case 4
Print "良好"
Case 3
Print "合格"
Case Else
Print "不合格"
End Select
良好 解析：本题考查多分支选择语句 Select-Case的用法和Rnd函数的掌握。执行 Select结构时，先对Select Case语句中的测试表达式，求值，然后依次测试该值是否与某一个 Case语句的值表列，相同，匹配则执行其后的语句。本题没有太大难度，需要注意Rnd函数的返回值小于1但大于或等于0，。因此本题中 x=Int(Rnd+4)=4，根据Case语句的用法，可知本题答案为良好。Select结构虽然简单，但属于必考内容，考生应该掌握。
第5题：
A. **0**
B. **1**
C. **2**
D. 0
第6题：
下列程序段的执行结果为
a=1
b=0
Select Case a
Case 1
Select Case b
Case 0
Print "* *0* *"
Case 1
Print "* *1* *"
End Select
Case 2
Print "* *2* *"
End Select （ ）。
A．* *0* *
B．* * 1* *
C．* *2* *
D．0
第7题：
下列程序段的执行结果是【 】。
x=Int(Rnd+4)
Select Case X
Case 5
Print"优秀"
Case 4
Print"良好"
Case 3
Print"合格"
Case Else
Print"不合格"
End Select
良好 解析：本题考查多分支选择语句 Select-Case的用法和Rnd函数的掌握。执行 Select结构时，先对Select Case语句中的测试表达式＞求值，然后依次测试该值是否与某一个 Case语句的值表列＞相同，匹配则执行其后的语句。本题没有太大难度，需要注意Rnd函数的返回值小于1但大于或等于0，。因此本题中 x=Int(Rnd+4)=4，根据Case语句的用法，可知本题答案为良好。Select结构虽然简单，但属于必考内容，考生应该掌握。
第8题：
在窗体上有一个命令按钮，然后编如下事件过程：
Function SR（x As Double） As Double
Select Case Sgn（x）
Case 1
SR=Sqr（x）
Exit Function
Case 0
SR=0
Case -1
SR=-1
End Select
End Function
Private Sub Command1_Click（）
Dim Msg, SRN
Dim N As Double
N=InputBox（"请输入要计算平方根的数"）
Msg=N & "的平方根"
Select Case SR（N）
Case 0
Msg=Msg & "是0"
Case -1
Msg=Msg & "是一个虚数"
Case Else
Msg=Msg & "是" & SR（N）
End Select
MsgBox Msg
End Sub
程序运行后，单击命令按钮，在输入对话框内输入-1，输出结果是 【15】 。
正确答案: 1.(-1的平方根是一个虚数)
第9题：
下列程序段的执行结果为 a=2 b=0 Select Case a Case 1 Select Case b Case 0 Print " * * 0 * *" Case 1 Print" * * 1 * *" End selec Case 2 Print " * * 2 * *" End Select
A．* * 0 * *
B．* * 1 * *
C．* * 2 * *
D．0
解析：此题考查的是SelectCase结构。SelectCase结构的一般格式为：SelectCaseexpr[Caseexpr1][clause1][Caseexpr2][clause2]……[Caseelse][clausen]EndSelect其中expr是测试表达式，如果满足exprn，就执行这条语句，然后退出；条件是a=2，b=1，所以执行语句Print"**2**"。
第10题：
有如下程序，运行时从键盘输入3，输出结果是 ______。 Private Sub Command1_Click() a=InputBox("请输入一个数字：") Select Case a Case Is＞2 b=a+1 Case Is＞3 b=a+2 Case Is＞4 b=a＋3 Case Is＞5 b＝a＋4 End Select Print a ＋ b End Sub
A．8
B．7
C．6
D．9
解析：当程序运行SelectCase语句时，先计算SelectCase后面表达式的值，然后将该值与从第一个Case子句后的值列表中的值或者表达式进行比较，如果满足条件则再往下比较：若符合某Case分支的条件表达式，则执行该分支中的程序段，执行完毕后不管下面的case分支是否同样符合而直接跳到EndSelect。所以答案选B。