首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
如果在北京时间12点00分运行以下代码,程序的输出是( )。 Sub Procedure() If Hour(Time())>=8 And Hour(Time())<=12 Then Debug.Print“上午好!” Elseff
如果在北京时间12点00分运行以下代码,程序的输出是( )。 Sub Procedure() If Hour(Time())>=8 And Hour(Time())<=12 Then Debug.Print“上午好!” Elseff
admin
2021-04-07
83
问题
如果在北京时间12点00分运行以下代码,程序的输出是( )。
Sub Procedure()
If Hour(Time())>=8 And Hour(Time())<=12 Then
Debug.Print“上午好!”
Elseff Hour(Time())>12 And Hour(Time())<=18 Then
Debug.Print“下午好!”
Else
Debug.Print“欢迎下次光临!”
End If
End Sub
选项
A、欢迎下次光临!
B、上午好!
C、下午好!
D、无输出
答案
B
解析
Time()函数可以返回系统当前时间,Hour(Time())可以返回系统当前时间的小时,本程序中的If-Then-Else多分支判断语句,判断系统当前时间的小时值,如果在8到12点之间(含8点和12点),则输出“上午好”,如果在12点到18点之间(含18点),则输出“下午好”,除此之外输出“晚上好”,因为当前系统时间为12点,所以输出“上午好”。故选择B选项。
转载请注明原文地址:https://kaotiyun.com/show/j3Sp777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对象“tAddr”和“tUser”,同时还设计出窗体对象“fEdit”和“fEuser”。请在此基础上按照以下要求补充“fEdit”窗体的设计:将窗体标题设置为“修改用户信息”。
在考生文件夹下存在一个数据库文件“samp3.acedb”,里面已经设计好表对象“tStud”,同时还设计出窗体对象“fStud”和子窗体对象“fDetail”。请在此基础上按照以下要求补充“fStud”窗体的设计。将窗体主体节中控件的Tab次序改为:
在考生文件夹下,“sampl.accdb”数据库文件中已建立好表对象“tStud”和“tScore”、宏对象“mTest”和窗体“frest”。试按以下要求,完成各种操作:将考生文件夹下文本文件Test.txt中的数据导入到当前数据库中。其中,第一行数
结构化程序设计原则强调的是
要将“选课成绩”表中学生的“成绩”取整,可以使用的函数是
在窗体中有一个命令按钮Commandl,编写事件代码如下:PfiveSubCommandl_Click()DimSAsIntegerS=P(1)+P(2)+P(3)+P(4)debug.PrimSE
在宏的表达式中还可以引用到窗体或报表上的控件的值,引用窗体控件的值可以用的表达式格式是()。
下列SQL查询语句中,与下面查询设计视图所示的查询结果等价的是
a和b中有且只有一个为0,其正确的表达式是()。
要将计算控件的控件来源属性设置为计算表达式,表达式的第一个符号必须是()。
随机试题
铸铁焊接时白口组织是怎样产生的?防止产生白口的主要措施是什么?
凡随武还者九人。(《苏武传》)凡:
A.地西泮B.卡马西平C.苯妥英钠D.盐酸氯丙嗪E.苯巴比妥结构中含有苯并二氮革环
在汇总记账凭证账务处理程序中,如果在月份内某一贷方科目的转账凭证不多时,也可以不编制汇总转账凭证,直接根据转账凭证登记总分类账。()
资本金是金融机构抵御风险和吸收损失的保障,“巴塞尔协议”对于银行业的监管以()为核心。
从正态总体N(10,12)中随机抽出样本为4的样本,则样本均值的标准差为()。
短短三十年,手机已经从奢侈品发展成百姓的日常用品。如今的街头,再也看不见抽出长长的天线接打电话的现象了,近几年内置天线几乎成为手机外观的主流。手机从“有线”到“无线”的发展,既展示了手机的发展轨迹,也给人们带来了一些与手机天线有关的故事。这段文字是一篇文章
假相倚是指参与互动的双方丰要对自己的计划作出反应,而很少取决于对方的反应,即双方反应都不依赖于对方行为。根据上述定义,下列属于假相倚的是()。
IP电话技术目前已经成为人们比较熟悉的业务,其主要采用()系列协议。
WhoshouldberesponsiblefortheblastonthebeachinGazalastFriday?
最新回复
(
0
)