下列程序段的执行结果是（）。 Dim x As Integer x = 6 Select Case x Case 5 Print "优秀" Case 4 Print "良好" Case 3 Print "通过" Case Else Print "不通过" End SelectA．优秀B．良好C．通过D．不通过
下列程序段的执行结果是（）。 Dim x As Integer x = 6 Select Case x Case 5 Print "优秀" Case 4 Print "良好" Case 3 Print "通过" Case Else Print "不通过" End Select
A．优秀
B．良好
C．通过
D．不通过
参考答案和解析
C
相关考题：
下列程序段的执行结果为a=2b=0Select Case aCase 1Select Case bCase 0Print "**0**"Case 1Print "**1**"End SelectCase 2Print "**2**"End Select（ ）。A．**0**B．**1**C．**2**D．0
下列程和序段的执行结果为x=Int（Rnd（） + 9）Select Case xCase 10Print "excellent"Case 9Print "good"Case 8Print "pass"Case ElsePrint "fail"End Select（ ）。A．excellentB．goodC．passD．fail
下面程序段执行结果为x=Int(Rnd() +4)Select Case xCase 5Print "excellent"Case 4Print "good"Case 3Print "pass"Case ElsePrint "fail"End SelectA．excellentB．goodC．passD．fall
在窗体上画一个名称为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．分支1B．分支2C．Else分支D．程序出错
下列程序段的执行结果是【 】。x=Int(Rnd+4)Select Case XCase 5Print"优秀"Case 4Print"良好"Case 3Print"合格"Case ElsePrint"不合格"End Select
下列程序段的执行结果是( )。 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
下列程和序段的执行结果为 x=Int(Rnd()+9) Select Case X Case 10 Print "excellent" Case 9 Print "good" Case 8 Print "pass" Case Else Print "fail" End SelectA．excellentB．goodC．passD．fail
下列程序段的执行结果为 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 SelectA．* * 0 * *B．* * 1 * *C．* * 2 * *D．0
下列程序段的执行结果是【 】。x=Int (Rnd+4)Select Case XCase 5Prunt "优秀"Case 4Print "良好"Case 3Print "合格"Case ElsePrint "不合格"End Select
假设X的值是5，则执行以下语句时，可得到的输出结果是ABCDEF的Select Case语句是 ( )A．Select Case X Case 10 To 1 Print“ABCDEF” End SelectB．Select Case X Case Is＞15，Is＜5 Print"ABCDEF" End SelectC．Selecl Case K Case Is＞5，1，3，To 10 Print"ABCDEF" End SelectD．Select Case X Case 1，3，Is＞5 Print"ABCDEF" End Select
已知x代表某个百分制成绩，下列程序段用于显示对应的五级制成绩，正确的是( )A．If x＞=60 Then Print"及格" Else If x＞=70 Then Print"中" Else If x＞=80 Then Print"良" Else If x＞=90 Then Print"优" Else Print"不及格" End IfB．If x＜90 Then Print"良" Else If x＜80 Then Print"中" Else If x＜70 Then Print"及格" Else If x＜60 Then Print"不及格" Else Print"优" End IfC．If x＞=90 then Print"优" Else If x＞=80 Then Print"良" Else If x＞=70 Then Print"中" Else If x＞=60 Then Print"及格" Else Print"不及格" End If End SelectD．Select Case x Case x＞=90 Print"优" Case x＞=80 Print"良" Case x＞=70 Print"中" Case x＞=60 Print"及格" Case Else Print"不及格"
单击命令按钮，并在对话框内输入6，下列程序段的执行结果为______。 Private Sub Command1_Click() Dim n As Integer n=InputBox ("请输入日期") Select Case n Case Is ＜= 0 n=InputBox("错误!请重新输入日期!") Case Is＞7 n=InputBox("错误!请重新输入日期!") Case 1 To 3 Print "江苏" Case 4 To 5 Print "浙江" Case 6 To 7 Print "双休日" End Select End SubA．错误!请重新输入日期!B．江苏C．浙江D．双休日
下列程序段的执行结果为 m=1 n=1 Select Case m Case 1 Select Case n Case 0 print"A" Case 1 Print"B" End Select Case 2 Print"C" End SelectA．AB．BC．CD．0
下列程序段的执行结果为m=1n=1Select Case mCase 1Select Case nCase 0print "A"Case 1Print "B"End SelectCase 2Print "C"End SelectA．AB．BC．CD．0
下列程序段的执行结果为 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 SelectA．**0**B．**1**C．**2**D．0
下面程序段执行结果为x=Iht(Rnd()+4)Select Case x Case 5 Print"excellent" Case 4 Print"good" Case 3 Print"paSS" Case Else Print "fail"End SelectA．excellentB．goodC．passD．fail
运行下列程序： x=Input Box("input value Of x”) Select Case x Case IsO y=y＋1 Case Is=0 y=x＋2 Case Else y=x＋3 End Select Print x；y 运行时，从键盘输入-5，输出的结果是( )。A．-7B．-9C．-8D．-10
下列程序段的执行结果为______。 x=Int (Rnd+4) Select Case x Case 5 Print“优秀” Case 4 Print“良好” Case 3 Print“通过” Case Else Print“没有通过” End SelectA． 优秀B．良好C．通过D．没有通过
有如下程序 x=InputBox("input value of x") Select Case x Case Is0 y=y＋l Case Is=0 y=x＋2 Case Else y=x＋3 End Select． Print x: y 运行时，从键盘输入—5，输出的结果是( )。A．-7B．-9C．-8D．-10
执行以下程序段，如果在对话框中输入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 10 Print "Hello" End SelectD．n=InputBox("请输入一个数") Select Case n Case 1, 5, Is ＞ 9 Print "Hello" End Select
下面程序段执行结果为( )。 x=Int(Rnd()+4) Select Case x Case 5 Print"excellent" Case4 Print"good" Case 3 Print"pass" Case Else Print"fail" End SelectA．excellentB．goodC．passD．fail
运行下列程序： x=InputBox("input value of x") Select Case X Case Is＞0 y=y+1 Case Is=0 y=x+2 Case ELse y=x+3 End Select Print x;y 运行时，从键盘输入-5，输出的结果是( )。A．-7B．-9C．-8D．-10
有如下程序 x=InputBox("input value of x") Select Case x Case Is＞0 y=y+1 Case Is=0 y=x+2 Case Else y=x+3 End Select Print x ;y 运行时，从键盘输入-5，输出的结果是( )。A．-7B．-9C．-8D．-10
有如下程序： x = InputBox("Input value of x") Select Case x Case Is ＞ 0 y=y+1 Case Is = 0 y=x + 2 Case Else y=x + 3 End Select Print x, y运行时，从键盘输入-5，输出的结果是( )。A．-7B．-9C．-8D．-10
下列程序段的执行结果为______。 Private Sub Command1_Click() a=1：b=1 Select Case a Case 1 Select Case b Case 0 Print "你好!" Case 1 Print "Hello!" End Select Case 2 Print"谢谢使用!" End Select End SubA．你好!B．谢谢使用!C．Hello!D．你好!谢谢使用!
下列程序段的执行结果为a=1b=0Select Case a Case 1 Select Case b Case 0 Print"**0**" Case 1 Print"**1**" End SelectCase 2 Print"**2**"End SelectA．* * 0 * *B．* * 1 * *C．* * 2 * *D．0
下面程序段执行结果为 x=Int(Rnd()+3) Select Case x Case 5 Print "excellent" Case 4 Print "good" Case 3 Print"pass" Case Else Print"fail" End SelectA．excellentB．goodC．passD．fail
下列程序段的执行结果为 m=1 n=1 Select Case m Case 1 Select Case n Case 0 Print" * * 0 * *" Case 1 Print" * *.* *" End Select Case 2 Print"* *,2 * *," End SelectA．* * 0 * *B．* * 1 * *C．* * 2 * *D．0