网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
执行以下程序段，如果在对话框中输入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
参考答案
更多 “ 执行以下程序段，如果在对话框中输入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 ” 相关考题
考题
下列程序段的执行结果为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
考题
在窗体上有一个命令按钮，然后编如下事件过程：Function SR（x As Double） As DoubleSelect Case Sgn（x）Case 1SR=Sqr（x）Exit FunctionCase 0SR=0Case -1SR=-1End SelectEnd FunctionPrivate Sub Command1_Click（）Dim Msg, SRNDim N As DoubleN=InputBox（"请输入要计算平方根的数"）Msg=N "的平方根"Select Case SR（N）Case 0Msg=Msg "是0"Case -1Msg=Msg "是一个虚数"Case ElseMsg=Msg "是" SR（N）End SelectMsgBox MsgEnd Sub程序运行后，单击命令按钮，在输入对话框内输入-1，输出结果是 【15】 。
考题
下列程序段的执行结果为m=1n=1Select Case mCase 1Select Case nCase 0Print "**0**"Case 1Print "**1**"End SelectCase 2Print "**2**"End Select（ ）。A．**0**B．**1**C．**2**D．0
考题
下列程序段的执行结果为a=1b=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
考题
在窗体上画一个名称为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
考题
下列程序段的执行结果为 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
考题
有如下程序，运行时从键盘输入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 SubA．8B．7C．6D．9
考题
假设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
考题
单击命令按钮，并在对话框内输入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．双休日
考题
设窗体上有一个名为Text1的文本框和一个名为Command1的命令按钮，并有以下事件过程： Private Sub Command1 Click（ ） X!=Val(Text1．Text) Select Casc x Case Is-10，Is=20 Print"输入错误" Case Is0 Print 20-x Case Is10 Print 20 Case Is=20 Print x+10 End Seleet End Sub 程序运行时，如果在文本框中输入-5，则单击命令按钮后的输出结果是（ ）。A.5B.20C.25D.输入错误
考题
下列程序段的执行结果为 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
考题
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) x=InputBox(“Input”) Select Case x Case 1，3 Print“分支1” Case Is4 Print“分支2” Case Else Print“Else分支” End SelectEnd Sub程序运行后，如果在输入对话框中输入2，则窗体上显示的是A．分支1B．分支2C．Else分支D．程序出错
考题
运行下列程序： 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=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
考题
运行下列程序： 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 Form_Click( )a = 3t = InputBox(请输入一个整数)Select Case tCase Is 0b = a + lCase Is = 0b = a + 2Case Elseb = a + 5End SelectPrint a; bEnd Sub从键盘输入5，在窗体上显示的结果是( )。A.1 5B.3 3C.1 1D.5 5
考题
下列程序段的执行结果为______。 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
考题
单选题当下面程序运行后，单击窗体在对话框中输入10，则输出的结果是（） Private Sub Form_Click（） score=InputBox（"输入"） Select Case score CaseIs＜10 a$="F" Case 10 To 19 a$="D" Case 20 To 29 a$="C" Case 30 To 39 a$="B" Case Else a$="A" End Select Printa$ End SubA
AB
BC
CD
D
热门标签
最新试卷