题目内容
（请给出正确答案）
A.Case 10 To 100 表示判断Is是否介于10与100之间
B.Case "abc","ABC" 表示判断Is是否和"abc"、"ABC"两个字符串中的一个相同
C.Case "X" 表示判断Is是否为大写字母X
D.Case -7,0,100 表示判断Is是否等于字符串"-7，0，100"
如果结果不匹配，请 联系老师 获取答案
更多“下列关于Select Case的叙述中，错误的是（) 。A、…”相关的问题
.jpg)
命令按钮的事件过程如下： Private Sub Command1_Click(Index As Integer) Select Case Index Case 0 CD1.Action=1 Case 1 CD1.ShowSave Case 2 CD1.Action=5 Case 3 End End Select End Sub 对上述程序，下列叙述中错误的是()。
A．单击“打开”按钮，显示打开文件的对话框
B．单击“保存”按钮，显示保存文件的对话框
C．单击“打印”按钮，能够设置打印选项，并执行打印操作
D．单击“退出”按钮，结束程序的运行
Private Sub Command1_Click（）
x=Val（Text1.Text）
Select Case x
Case 1，3
y=x*x
Case Is＞=10，Is＜=-10
y=x
Case -10 To 10
y=-x
End Select
End Sub
程序运行后，在文本框中输入3，然后单击命令按钮，则以下叙述中正确的是（）。
A．执行y=x*x
B．执行y=-x
C．先执行y=x*x，再执行y=-x
D．程序出错
以下正确的叙述是 ______。 Select Case x Case 1 to 10 …… End Select
A．Select Case语句中的测试表达式可以是任何形式的表达式
B．Select Case语句中的测试表达式只能是数值表达式或字符串表达式
C．在执行Select Case语句时，所有的Case子句均按出现的次序被顺序执行
D．如下Select Case语句中的Case表达式是错误的：
以下正确的叙述是______。
A．Select Case语句中的测试表达式可以是任何形式的表达式
B．Select Case语句中的测试表达式只能是数值表达式或字符串表达式
C．在执行Select Case语句时，所有的Case子句均按出现的次序被顺序执行
D．如下Select Case语句中的Case表达式是错误的： Select Case x Case 1 to 10 ...... End Select
A.CAS EIS〉20
B.CASE 1 TO 10
C.CASE X-10
D.CASE 2，4，6
A.CASE工具主要用于帮助DBA管理数据库系统
B.CASE工具主要用于数据库设计和应用开发
C.CASE工具中通常存储与数据库设计方案有关的信息
D.CASE工具中通常包含存储数据资料的档案库
运行下列程序： 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．-7
B．-9
C．-8
D．-10
下列不是分支结构的语句是()。
A．If…Then…EndIf
B．If…Then…Else…EndIf
C．While…Wend
D．Select…Case…End Select
阅读以下说明及Visual Basic 程序代码，将应填入(n)处的字句写在对应栏内。
[程序5.1说明]
下列程序运行时，当单击窗体后，从键盘输入一个字符，判断该字符是字母字符、数字字符还是其他字符，并做相应的显示。窗体上无任何控件，并禁用Ase和Chr函数，Select Case语句中禁用枚举值。
[Visual Basic代码]
Private Sub Form. Load ()
Dim x As String*1
X=(1) (“请输入单个字符”，“字符”)
Select Case UCase ((2) )
Case (3)。
Print X+“是字母字符”
Case (4)
Print X+ “是数字字符”
Case Else
Print X+“是其他字符”
End Select
[程序5.2说明]
在窗体上画一个名称为Timer1的计时器和一个名称为Labe11的标签。当运行程序后，将在标签中显示当前时间的数字时钟(包括时：分：秒)。
[Visual Basic代码]
Private Sub Fom_Load ()
Timer1.Interval=1000
EndSub
Private Sub Timer1_ timer() (5)
EndSub
