首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体中添加一个名称为Command1的命令按钮,然后编写如下事件代码: Pfirate Sub Command1_Click() MsgBox f(24,18) End Sub Public Function f(m As Integer,n A
在窗体中添加一个名称为Command1的命令按钮,然后编写如下事件代码: Pfirate Sub Command1_Click() MsgBox f(24,18) End Sub Public Function f(m As Integer,n A
admin
2021-04-07
72
问题
在窗体中添加一个名称为Command1的命令按钮,然后编写如下事件代码:
Pfirate 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 Wbile m>n
m=m-n
Loop
Do While m<n
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。故选择C选项。
转载请注明原文地址:https://kaotiyun.com/show/t3Sp777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对象“tAddr”和“tUser”,同时还设计出窗体对象“fEdit”和“fEuser”。请在此基础上按照以下要求补充“fEdit”窗体的设计:将窗体中名称为“LRemark”的
考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计了表对象“tEmp”、查询对象“qEmp”和窗体对象“fEmp"。同时,给出窗体对象“fEmp”上两个按钮的单击事件代码,试按以下要求补充设计。将窗体对象“fEmp”上名称为“tPa
考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对象“tEmployee"、“tAttend”和“tWork”,查询对象“qT”,宏对象“ml”,同时还设计出以“tEmployee”为数据源的窗体对象“fEmployee"和以“q
考生文件夹下存在一个数据库文件“samp2.accdb”,里面已经设计好表对象“tCourse”、“tScore”和“tStud”,试按以下要求完成设计:创建一个查询,运行该查询后生成一个新表,表名为“tNew”,表结构包括“学号”、“姓名”、“性别”
考生文件夹下存在一个数据库文件“samp2.accdb”,里面已经设计好表对象“tCourse”、“tScore”和“tStud”,试按以下要求完成设计:创建一个查询,当运行该查询时,屏幕上显示提示信息:“请输入要比较的分数:”,输入要比较的分数后,该
要将“选课成绩”表中学生的“成绩”取整,可以使用的函数是
在代码调试时,使用Debug.Print语句显示指定变量结果的窗口是
已定义好有参函数f(t),其中形参t是整型量。下面调用该函数,传递实参为6,将返回的函数数值赋给变量w。以下正确的是()。
如果有VBA的过程头部为:PrivateSubBstData(ByValabcAsInteger)则变量abc遵守的参数传递规则是()。
随机试题
对活塞式压缩机曲柄连杆机构发出异常声音应采取的处理措施是()。
人的主观能动性是人的身心发展的内在动力。
邮件地址包括用户名和________。
A.肝实质细胞B.肝间质细胞C.浆细胞D.心肌细胞E.骨骼肌细胞合成肌钙蛋白I的细胞是
混凝土投料顺序是()法。
FIDIC合同条件下,工程支付范围中的工程量清单项目分为().
集体谈判中,“不确定性范围”的下限是指()。
根据我国法律规定,在我国境内的外国人和无国籍人()法律关系的主体。
利润转化为平均利润
About3billionpeoplelivewithin100miles(160km)ofthesea,anumberthatcoulddoubleinthenextdecadeashumansflockt
最新回复
(
0
)