如果在北京时间7点50分运行以下代码，程序的输出是 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.无输出
热度🔥524
参考答案：A
解析：
【解析】本题考查的是if语句的执行。运行程序，time（）函数会返回当前的时间，此时返回的是7:50。因此If语句的前俩个条件都不成立（第一个条件是早上8点到12点，第二个条件是中午12点到下午6点），所以执行if语句的最后一句，即Debug.Print "欢迎下次光临!"。因此，本题应选择A选项。
【解析】本题考查的是if语句的执行。运行程序，time（）函数会返回当前的时间，此时返回的是7:50。因此If语句的前俩个条件都不成立（第一个条件是早上8点到12点，第二个条件是中午12点到下午6点），所以执行if语句的最后一句，即Debug.Print "欢迎下次光临!"。因此，本题应选择A选项。
复制题目向AI提问
扫码免费计算机二级刷题
2025年计算机等级考试题库
推荐
体检表中有日期/时间型数据"体检时间"，若规定在体检4周后复检，建立生成表查询，生成列"复检时间"要自动给出复检的日期，正确的表达式是
.设有购买表（顾客号，商品号，购买时间）。现要查询顾客A与顾客B购买的相同商品。有下列查询语句：
Ⅰ．SELECT 商品号 FROM 购买表 WHERE 顾客号 = 'A'
AND 商品号 IN (
SELECT 商品号 FROM 购买表 WHERE 顾客号 = 'B')
Ⅱ．SELECT 商品号 FROM 购买表 WHERE 顾客号 = 'A'
EXCEPT
SELECT 商品号 FROM 购买表 WHERE 顾客号 = 'B'
Ⅲ．SELECT 商品号 FROM 购买表 WHERE 顾客号 = 'A'
INTERSECT
SELECT 商品号 FROM 购买表 WHERE 顾客号 = 'B'
Ⅳ．SELECT 商品号 FROM 购买表 WHERE 顾客号 = 'A'
UNION
SELECT 商品号 FROM 购买表 WHERE 顾客号 = 'B'
上述语句中，能够实现该查询要求的是（）
外部设备按数据传输的方式可分为多种类型，通常磁盘被当作哪一种类型的设备？
