首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体中添加一个名称为Command1的命令按钮,然后编写如下事件代码: Private Sub Command1_Click() MsgBox f(24,18) End Sub Public Func
在窗体中添加一个名称为Command1的命令按钮,然后编写如下事件代码: Private Sub Command1_Click() MsgBox f(24,18) End Sub Public Func
admin
2021-09-06
38
问题
在窗体中添加一个名称为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=n-m
Loop
Loop
f=m
End Function
窗体打开运行后,单击命令按钮,则消息框的输出结果是( )。
选项
A、2
B、4
C、6
D、8
答案
C
解析
题目中命令按钮的单击事件是使用MsgBox显示过程f的值。在过程f中有两层Do循环,传入参数rn=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=11=6;m<>n条件满足,退出循环,然后执行f=m的赋值语句,即为f=m=6。
转载请注明原文地址:https://kaotiyun.com/show/g3vp777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
软件按功能可以分为:应用软件、系统软件和支撑软件(或工具软件)。下面属于应用软件的是
利用对话框提示用户输入查询条件,这样的查询属于
子过程Plus完成对当前库中“教师表”的年龄字段都加1的操作。SubPlus()DimcnAsNewADODB.ConnectionDimrsAsNewADODB.RecordsetDimfdAsADODB.FieldDi
程序执行时,单击窗体后输出结果是Privatesubform_click()DimnasIntegern=8Whilen>5n=n-1Debug.Printn;Wend
如果字段“成绩”的取值范围为0~100,则下列选项中,错误的有效性规则是
用户用IE浏览器打开已创建的数据访问页时,如果下层组级别都呈折叠状态,那么用户可以按哪个按钮来显示
若数据库中有表STUD,则下列函数实现的功能是FunctionDropPrimaryKey()DimstrSQLAsStringstrSQL="ALTERTABLESTUDDropCONSTRAINTPRIMARY
下列关于对象“更新前”事件的叙述中,正确的是()。
下面属于整数类I的实例的是
下列关于宏组的叙述中,错误的是()。
随机试题
Krukenberg瘤的转移途径可为
A.周围血中幼稚细胞、原始细胞>0.15%B.周围血中有较多幼稚细胞伴嗜酸、嗜碱性粒细胞增多C.周围血中幼红细胞、幼粒细胞易见,骨髓呈现“干抽”D.周围血中出现较多异型淋巴细胞E.周围血中易见盔形细胞、小球形细胞及破碎红细胞CML可见
生荷叶在四生丸中的配伍意义是
城市某单位干部区礼华退休后在郊区的老家建了一处宅院,在那里安度晚年。后来区礼华于2003年2月病逝,所建宅院由他的三个儿子区绍宽、区绍厚、区绍富继承。三兄弟在市区都有住房,就商量把郊区的宅院卖掉,龙家兄弟龙甲和龙乙愿意购买此房。于是,区家三兄弟与龙家两兄弟
某建设项目,建设期为3年,建设期内各年均衡获得的贷款额分别为1000万元、1000万元、800万元,贷款年利率为8%,期内只计息不支付,建设期第3年应计利息为()万元。
甲是乙公司的研发人员,经长期研究,完成单位交付的研发任务,开发出了一种抗癌新药,现欲申请专利。以下关于该成果权利归属的说法中,正确的有()。
分区分配内存管理方式的主要保护措施是_______。
我国第一部保护劳动者合法权益和调整劳动关系的法律是《劳动法》,以下人员中适用于《劳动法》的有()
WhatkindofroomdoesWilliamWoodswant?
(1)ThedramaticcollapseinAmericanconsumerconfidence,followingtheWorldTradeCenterattack,increasesthelikelihoodthat
最新回复
(
0
)