首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体中添加一个名称为Commandl的命令按钮,然后编写如下事件代码: Private Sub Commandl_Click() MsgBox f(24,18) End Sub Public Function f(m As
在窗体中添加一个名称为Commandl的命令按钮,然后编写如下事件代码: Private Sub Commandl_Click() MsgBox f(24,18) End Sub Public Function f(m As
admin
2019-05-23
39
问题
在窗体中添加一个名称为Commandl的命令按钮,然后编写如下事件代码:
Private Sub Commandl_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/xP0p777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
考生文件夹下存在一个图像文件“test.bmp”和一个数据库文件“samp3.accdb”。“samp3.accdb”数据库里面已经设计了表对象“tEmp”和“tTemp”、窗体对象“fEmp”、报表对象“rEmp”和宏对象“mEmp”。试在此基础上按照以
考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计了表对象“tEmp”、窗体对象“fEmp”、报表对象“rEmp”和宏对象“mEmp”。试在此基础上按照以下要求补充设计:试根据以下窗体功能要求,对已给的命令按钮事件过程进行补充和完善
考生文件夹下存在一个数据库文件“sampl.accdb”,里面已经设计好表对象“tStud”和“tScore”,窗体对象“tTest”和宏对象mTest。并按照以下要求完成操作:设置“tScore"表的“课程号”字段的输入掩码为只能输入5位数字或字母形
在考生文件夹下,完成下列操作:设置“编号”字段的输入掩码为只能输入5位,规定前2位为字母或数字、后3位为数字。
在考生文件夹下,“sampl.accdb”数据库文件中已建立三个关联表对象(名为“职工表”、“物品表”和“销售业绩表”)、一个窗体对象(名为“fTest”)和一个宏对象(名为“mTest”)。试按以下要求,完成表和窗体的各种操作:将考生文件夹下文本文件
输入掩码字符"&"的含义是( )。
在tStud表中有一个"电话号码"字段,若要确保输入的电话号码格式为:×××-××××××××,则应将该字段的"输入掩码"属性设置为
输入掩码字符"&"的含义是( )。
随机试题
会计准则把固定资产计提折旧的方法分为()
A.右旋糖酐B.硫酸镁C.甘露醇D.地西泮E.氢氯噻嗪子痫前期重度病人血压160/110mmHg用
正常人外周血T淋巴细胞转化率为
破伤风的潜伏期一般为()
休克病人使用血管扩张药,必须具备的条件是()。
复式记账法与单式记账法相比,具有的显著优点有()。
2009年3月,甲公司与乙公司签订的租赁合同约定:甲公司将其面积为500平方米的办公用房出租给乙公司;租期25年;租金每月1万元,以每年官方公布的通货膨胀率为标准逐年调整;乙公司应一次性支付两年的租金。合同签订后,乙公司依约支付租金,甲公司依约交付了该房屋
请阅读下面一份学生的书面表达以及教师的评语,并回答问题。Hi,Suzanne,Firstofall,welcometoChina.Infact,manystudentshavethesameproblemlik
在心理上协调一致,在教学过程中与学生之间要求平等合作,体现了()。
Thereisonly,______,randommonitoringofgasemissionbythepollutioncontrolagency.
最新回复
(
0
)