首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体中有命令按钮Command1和三个文本框Text0、Text1、Text2,命令按钮对应的代码过程如下: Private Sub Command1_Click() Dim i,f1,f2 As Integer Dim flag
在窗体中有命令按钮Command1和三个文本框Text0、Text1、Text2,命令按钮对应的代码过程如下: Private Sub Command1_Click() Dim i,f1,f2 As Integer Dim flag
admin
2018-10-18
50
问题
在窗体中有命令按钮Command1和三个文本框Text0、Text1、Text2,命令按钮对应的代码过程如下:
Private Sub Command1_Click()
Dim i,f1,f2 As Integer
Dim flag As Boolean
f1=Val(MC Text0)
f2=Val(Me!Text1)
If f1>f2 Then
i=f2
Else
i=f1
End If
flag=True
Do While i>1 And flag
If f1 Mod i=0 And f2 Mod i=0 Then
flag=False
Else
i=i-1
End If
Loop
Me!Text2=i
End Sub
运行程序,在文本框Text0和Text1中分别输入15和20,则文本框Text2中显示的结果是
选项
A、5
B、15
C、20
D、10
答案
A
解析
程序开始时,f1租f2的值分别是从文本框Text0和Text1中输入的值15和25,然后利用if语句判断f1和f2两个数的大小,变量i中存放住和f2中较小者的值,flag.初始值为true,程序进入Do While循环语句,首先判断循环条件“i>1 And flag”,结果为true,循环体中的.f语句,只有当住和f2同时能被i整除,flag才会被赋值为false,否则将变量i减1,继续进行Do-While循环的条件判断,一旦f1和f2同时能被i整除,变量flag被赋值为false,则整个循环结束,将变量i的值输出到文本框Text2中,所以只有当变量i为5时,才能同时被f1(15)和f2(25)整除。
本题程序的功能是求两个数的最大公约数,所以选项A正确。
转载请注明原文地址:https://www.kaotiyun.com/show/TyMp777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
可以选择输入数据或空格(在“编辑”模式下空格以空白显示,但是在保存数据时将空白删除,允许输入加号和减号)的输入掩码是()。
算法一般都可以用哪几种控制结构组合而成______。
栈和队列的共同点是()。
函数______返回值的含义是返回系统当前日期和当前时间。
用于获得字符串s最左边4个字符的函数是
程序和数据有了一定的独立性是在()。
退出Access数据库管理系统可以使用的快捷键是______。
在窗体上画一个命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()Dima()a=Array(1,3,5,7)s=0Fori=1To3s=s*10+a(
要设置在报表每一页的底部都输出信息,需要设置()。
VBA表达式Chr(Asc(UCase("abcdefg")))返回的值是()。
随机试题
病人,男性,58岁,有慢性咳嗽史20年,并发肺气肿。今晨因用力大便后突感右胸口疼痛,伴干咳、呼吸困难,并渐出现发绀,体查见气管明显向左移位。此病人的饮食应为()
2012年,潘桂花、李大响老夫妇处置房产时,发现房产证产权人由潘桂花变成其子李能。原来,早在七年前李能就利用其母不识字骗其母签订合同,将房屋作价过户到自己名下。二老怒将李能诉至法院。法院查明,潘桂花因精神障碍.被鉴定为限制民事行为能力人。据此,法院认定该合
尘肺病报告卡的内容不包括()。
根据《最高人民法院关于审理期货纠纷案件若干问题的规定》,审查期货公司或者客户是否透支交易,应当以()规定的保证金比例为标准。
理财产品宣传材料应当在醒目位置提示客户,“理财非存款、产品有风险、投资需谨慎”。()
当物业管理公司对某一工作、某一活动、某一法规制订具体实施的方法时,要用()文书。
与法律相比,道德在调控人与人、人与社会以及人与自然之间的各种关系时它的()。
(2006年真题)采用成本定价法给出版物定价时,必不可少的步骤是()等。
请在【答题】菜单下选择【进入考生文件夹】命令,并按照题目要求完成下面的操作。注意:以下的文件必须都保存在考生文件夹下。小李是东方公司的会计,利用自己所学的办公软件进行记账管理,为节省时间,同时又确保记账的准确性,她使用Excel编制了2
A、Becausetheydonotwanttopayforthehouses.B、Becausetheyhavefinancialtroubles.C、Becausetheyliketravelingacrosst
最新回复
(
0
)