选择题
如果在北京时间18点20分运行以下代码,程序的输出是______。
Sub Procedure()
If Hour(Time())>=8 And Hour(Time())<12 Then
Debug.Print'上午好!'
ElseIf Hour(Time())>=12 And Hour(Time())<18 Then
Debug.Print'下午好!'
Else
Debug.Print'欢迎下次光临!'
End If
End Sub
A、
欢迎下次光临!
B、
上午好!
C、
下午好!
D、
无输出
【正确答案】
A
【答案解析】
本题考查的是If语句的执行。程序中,Time()函数可返回当前的时间,此时返回的时间为18:20。因此If语句的前两个条件都不成立,所以执行If语句的最后一句,即Debug.Print'欢迎下次光临!'。因此,本题应选择选项A。
提交答案
关闭