单项选择题

下列程序段的执行结果为______。 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 Sub

A．你好!
B．谢谢使用!
C．Hello!
D．你好!谢谢使用!
<上一题 目录 下一题>
热门 试题

单项选择题
单击命令按钮，并在对话框内输入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 Sub
A．错误!请重新输入日期!
B．江苏
C．浙江
D．双休日
单项选择题
单击命令按钮，并在对话框内依次输入99，73，84，88，-1，下列程序段的执行结果为______。 Private Sub Command1_Click() Dim S As Single, max As Single, min As Single n=0 S=InputBox( Please enter a score ) max=S min=S Do While S＞=0 If S＞max Then max=S End If If S ＜ min Then min=S End If S=InputBox( Please enter a score ) n=n+1 Loop Print n; : ; max, min End Sub
A．4:99,88
B．4;99,73
C．4:99,73
D．4;99,88
相关试题