在 Select Case a结构中,描述判断条件 1 ≦ a ≦ 10 的测试项应该写成()。
A.Case 1 <= a <= 10
B.Case 1 ≦ a And a ≦ 10
C.Case Is >= 10 or Is >= 1
D.Case 1 To 10
A.Case 1 <= a <= 10
B.Case 1 ≦ a And a ≦ 10
C.Case Is >= 10 or Is >= 1
D.Case 1 To 10
Select Case结构运行时,首先计算()的值。
A.表达式
B.执行语句
C.条件选项
D.任意值
下列不是分支结构的语句是()。
A.If…Then…EndIf
B.If…Then…Else…EndIf
C.While…Wend
D.Select…Case…End Select
下列不是分支结构的语句是()。
A. If.··Then··End IF
B. While…End
C. If...Then...Else…End If
D. Select…Case…End Select
在窗体文本框Text1中输入“456ABC”后,立即窗口上输出的结果是【 】。
Private SuB Text1_keyPress(keyAscii As Integer)
Select Case keyAscii
Case 97 To 122
DeBug.Print Ucase (Chr (keyAscii));
Case 65 To 90
DeBug.Print Lcase (Chr (keyAscii));
Case 48 To 57
DeBug.Print chr (keyAscii);
Case Else
keyAscii=0
End Select
End SuB
在窗体中添加一个命令按钮(其Name属性为Command1),然后编写如下代码: Pfivme Sub Command1_Click() score=Iht(Rnd*10)+70 Select Case score Case ls<60 a$=“F” Case 60 T069 a$=“D” Case 70 To 79 a$=“C” Case 80 To 89 a$=“B” Case Else a$=“A” End Select Print aS End Sub 程序运行后,单击命令按钮,输出结果是
A.A
B.B
C.C
D.D
下列不是分支结构的语句是()。
A.If…Then…Endlf
B.If…Then…Else…Endlf
C.While…Wend
D.Select…Case…End Select
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.程序出错
A.10
B.20
C.30
D.40
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:
Private Sub Command1_Click()
x=InputBox("Input")
Select Case x
Case 1,3
Print "分支 1"
Case Is >4
Print "分支 2"
Case Else
Print "Else 分支 "
End Select
End Sub
程序运行后,如果在输入对话框中输入2,则窗体上显示的是()。
A.分支1
B.分支2
C.Else分支
D.程序出错