首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体中添加一个名称为Command1的命令按钮,然后编写如下事件代码: Private Sub Command1_Click() A=75 IfA>60 Then I=1 IfA>70 Then I=2 IfA>80 Then I=3 IfA>90 Th
在窗体中添加一个名称为Command1的命令按钮,然后编写如下事件代码: Private Sub Command1_Click() A=75 IfA>60 Then I=1 IfA>70 Then I=2 IfA>80 Then I=3 IfA>90 Th
admin
2020-06-06
28
问题
在窗体中添加一个名称为Command1的命令按钮,然后编写如下事件代码:
Private Sub Command1_Click()
A=75
IfA>60 Then I=1
IfA>70 Then I=2
IfA>80 Then I=3
IfA>90 Then I=4
MsgBox I
End Sub
窗体打开运行后,单击命令按钮,则消息框的输出结果是
选项
A、1
B、2
C、3
D、4
答案
B
解析
本题考查VBA中选择结构的知识。在本题中用了多个If分支结构,这些结构是顺序的而不是嵌套的,所以会顺序执行判断是否满足条件。首先75大于60。所以i=1,然后再判断75大于70。所以i=2,再接着判断75既不大于80也不大于90,所以最后消息框里输出的i值为2。
转载请注明原文地址:https://jikaoti.com/ti/KbQ0FFFM
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
考生文件夹下存在一个数据库文件“samp2.accdb”,里面已经设计好“‘tStud”、“tCourse”、“tScore”三个关联表对象和一个空表“tTemp”。试按以下要求完成设计:创建追加查询,将表对象“tStud”中“学号”、“姓名”、“性别
考生文件夹下存在一个数据库文件“samp1.accdb”,里面已经设计好表对象“tStud”和“tScore”,窗体对象“fTest”和宏对象mTest。并按照以下要求完成操作:将“tStud”表的“简历”字段的显示宽度设置为40。
在考生文件夹下,“samp1.accdb”数据库文件中已建立两个表对象(名为“职工表”和“部门表”)。试按以下要求,顺序完成表的各种操作:建立当前数据库表对象“职工表”和“部门表”的表间关系,并实施参照完整性。
在考生文件夹下,“samp1.accdb”数据库文件中建立表“tTeacher”,表结构如下:
执行下列程序段后,变量intsum的值是DimintsumAsIntegerDimIAsIntegerintsum=0ForI=20.2To5Step-4.7intsum=intsum+
(1)在考生文件夹下的“sampl.accdb”数据库中建立表“tTeaeher”,表结构如表2.1所示。(2)根据“tTeacher”表的结构,判断并设置主键。,(3)设置“工作时间”字段的有效性规则:只能输入上一年度5月1日以前(
在考生文件夹下的“sampl.accdb”数据库文件中已建立了两个表对象(名为“员工表”和“部门表”)、一个窗体对象(名为“fTest”)和一个宏对象(名为“mTest”)。请按以下要求,按顺序完成对象的各种操作。(1)删除表对象“员工表”的“照
在考生文件夹下,“sampl.accdb”数据库文件中已建立两个表对象(名为“员工表”和“部门表”)和一个窗体对象(名为“fEmp”)。试按以下要求顺序,完成表及窗体的各种操作:(1)设置“员工表”职务字段值的输入方式为从下拉列表中选择“经理”“
一名员工可以使用多台计算机,每台计算机只能由一名员工使用,则实体员工和计算机间的联系是
设某二叉树的后序序列为CBA,中序序列为ABC,则该二叉树的前序序列为
随机试题
内伤咳嗽的病理,与下列哪些脏腑有关
建设中国特色社会主义经济的基本政策有()
化学发光免疫分析常用的直接化学发光剂是
下列水质分析各项检验中,超过4小时仍可测定的是
预防肺结核的最有效办法是()
根据《集会游行示威法》,举行集会、游行、示威,应当遵守下列哪些规定?(2008—卷一—65,多)
在资源管理器的文件夹窗口中,带“+”的文件夹图标表示该文件夹()。
根据《人民币银行结算账户管理办法》的规定,发生下列事由之一的,存款人应向开户银行提出撤销银行结算账户的申请()。
采取分期付款方式购车,出卖方在购买方付清全部车款前保留车辆所有权的,购买方以自己名义与他人订立合同并使用该车运输时,因交通事故造成他人财产损失的()。
FAQabouttheSITESInternship(实习)Program1.WhatkindofinternshipsdoesSITESoffer?SITES(SmithsonianInstitutionTraveling
最新回复
(
0
)