首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体中添加一个名称为Command1的命令按钮,然后编写如下事件代码: Private Sub Command1_Click() MsgBox f(24,18) End Sub Public Function f(m As Integer,n
在窗体中添加一个名称为Command1的命令按钮,然后编写如下事件代码: Private Sub Command1_Click() MsgBox f(24,18) End Sub Public Function f(m As Integer,n
admin
2021-04-27
99
问题
在窗体中添加一个名称为Command1的命令按钮,然后编写如下事件代码:
Private Sub Command1_Click()
MsgBox f(24,18)
End Sub
Public Function f(m As Integer,n As Integer)As Integer
Do While m<>n
Do While m>n
m = m-n
Loop
Do While m
n = n-m
Loop
Loop
f = m
End Function
窗体打开运行后,单击命令按钮,则消息框的输出结果是( )。
选项
A、2
B、4
C、6
D、8
答案
C
解析
题目中命令按钮的单击事件是使用MsgBox显示过程f的值。在过程f中有两层Do循环,传入参数m=24,n=18,由于m>n所以执行m=m-n=24-18=6,内层第1个Do循环结束后m=6,n=18;此时m小于n,所以再执行n=n-m=18-6=12,此时m=6,n=12;再执行n=n-m后m=n=6;m<>n条件满足,退出循环,然后执行f=m的赋值语句,即为f=m=6。
转载请注明原文地址:https://kaotiyun.com/show/jcSp777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
在窗体中有一个命令按钮Command1,编写事件代码如下:PrivateSubCommand1Click()DimsAsIntegers=P(1)+P(2)+P(3)+P(4)debug.PrintsEndSubPublic
使用表设计器定义表中字段时,不是必须设置的内容是
在数据库中,建立索引的主要作用是
对象可以识别和响应的某些行为称为
在Access中,窗体不能完成的功能是
字段名可以是任意的名字,最多可达()个字符。
VBA表达式Left("howareyou",3)值是()。
下面显示的是查询设计视图的“设计网络”部分:从所显示的内容中可以判断出该查询要查找的是
下列四个选项中,不是VBA的条件函数的是
在考生文件夹下的“sampl.accdb”数据库文件中已建立3个关联表对象(名为“职工表”“物品表”和“销售业绩表”)、一个窗体对象(名为“fTest”)和一个宏对象(名为“mTest”)。请按以下要求,完成表和窗体的各种操作。(1)分析表对象
随机试题
现代陪审团制度起源于()
对大多数企业主管来说,最困扰他们的不是如何与竞争对手抢夺市场,而是如何找到、训练和留住优秀的员工,对高技术企业尤其如此。请你为这些主管在以下几项中找出一种最佳的方法()
我国宪法规定公民享有人身自由权。下列关于我国宪法所规定的人身自由的说法中,正确的是哪些选项?()
某安全管理人员在机加工车间检查,发现甲某操作铣床时穿紧身工作服,袖口扎紧;乙某高速切削铸件时戴防护眼镜;丙某操作车床时戴一般防护手套;丁某清理铁屑时戴防尘口罩,上述操作行为中,存在隐患的人员是()。
下列会计职业道德规范中,要求会计人员在工作中应主动就单位经营管理中存在的问题提出合理化建议,协助领导决策的是()。
A企业2005年的预计销售收入为2000万元,应交增值税额为80万元,该企业适用的消费税率为8%,城市维护建设税税率为7%,教育费附加的征收率为3%。则该企业2005年预计的销售税金及附加为()万元。
数字表诗各字如下:若以此中四个数组成一个成语,成语中第一个字对应的数字是第二个字对应的数字的9倍,第四个字对应的数比第三个字对应的数大1,第二个字对应的数为第四个字对应数字的,则这个成语是______.[img][/img]
某工程由甲公司承包需要60天完成,由甲、乙两公司共同承包需要28天完成,由乙、丙两公司共同承包需要35天完成,则由丙公司承包完成该工程需要的天数为()天.
设x2+y2≤2ay(a>0),则f(x,y)dxdy在极坐标下的累次积分为().
Accordingtothespeaker,whichoneiswrongaboutwildlifetrafficking?
最新回复
(
0
)