首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体中有命令按钮Commandl和三个文本框Text0、Text1、Text2,命令按钮对应的代码过程如下: Private Sub Command1_Click() Dim i,f1,f2 As Integer Dim flag As Boolean
在窗体中有命令按钮Commandl和三个文本框Text0、Text1、Text2,命令按钮对应的代码过程如下: Private Sub Command1_Click() Dim i,f1,f2 As Integer Dim flag As Boolean
admin
2018-10-20
67
问题
在窗体中有命令按钮Commandl和三个文本框Text0、Text1、Text2,命令按钮对应的代码过程如下:
Private Sub Command1_Click()
Dim i,f1,f2 As Integer
Dim flag As Boolean
fl=Val(Me!Text0)
f2=Val(Me!Text1)
If f1>f2 Then
i=f2
Else
i=f1
End If
flag=True
Do Whil ei>1 And flag
If f1 Mod i=0And f2 Mod i=0Then
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的值分别是从文本框TextO和Textl中输入的值15和25,然后利用if语句判断f1和f2两个数的大小,变量i中存放f1和f2中较小者的值,flag初始值为true,程序进入DoWhile循环语句,首先判断循环条件“i>1And flag",结果为true,循环体中的if语句,只有当f1和f2同时能被i整除,flag才会被赋值为false,否则将变量i减1,继续进行Do While循环的条件判断,一旦f1和f2同时能被i整除,变量。flag被赋值为false,则整个循环结束,将变量i的值输出到文本框Text2中,所以只有当变量i为5时,才能同时被f1(15)和f2(25)整除。
本题程序的功能是求两个数的最大公约数,所以选项A正确。
转载请注明原文地址:https://kaotiyun.com/show/yuMp777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
在Access中,数据类型主要包括:自动编号、文本、备注、数字、日期/时间、【】、是/否、OLE对象、超级链接和查询向导等。
可以选择输入任何的字符或一个空格的输入掩码是()。
下列是交叉表查询必须搭配的功能的是()。
在下列选项中,哪个不是一个算法一般应该具有的基本特征______.
在窗体中添加一个名称为Command1的命令按钮,然后编写如下事件代码:PrivateSubCommand1_Cliek()Dima(10,10)For
以下关于文本框控件的说法中错误的是()。
定义了二维数组A(1to6,6),则该数组的元素个数为()个。
在数据管理技术的发展过程中,经历了人工管理阶段、文件系统阶段和数据库系统阶段。其中数独立性最高的阶段是______。
当第一次打开窗体时,事件以哪一个顺序发生的()。①Current②Load③open④Resize⑤Close⑥Unload
在窗体上画一个名称为Comlnalld1的命令按钮,然后编写如下程序:PrivateSubCommand1Click()DimiAsInteger,jAsIntegerDima(10,10)AsInteg
随机试题
商务感谢信说明:你是EB公司的Kate,刚从英国出差回来,在英国期间得到了LH公司的AnneGreen小姐的照顾,你想写一封电子邮件表示感谢,内容包括:1)感谢她在英国期间的热情招待;2)告诉她英国很漂亮,给你留下了深刻的印象;3)
《民法通则》规定普通诉讼时效的期间为()年。
在进行管线敷设时,下列()应布置在冻土线以下。
某工程建设项目设计招标中,甲设计单位投标报价为2000万元,则其投标保证金最高应为()万元。【2010年考试真题】
下列选项中属于企业债权的是( )。
社会主义全民所有制企业的国民收入,在初次分配时,不包括()。
我国外交成就,哪些是20世纪70年代取得的?()
Lackinginformationaboutenergyuse,peopletendtooverestimatetheamountofenergyusedbyequipment,suchaslights,thata
WhoseGraveisThisAnyway?TherearemanylegendsabouttheworldfamousEgyptianPharaohs’tombs,whichhavelainsilentfort
A、Fridayofnextweek.B、Fridayofthismonth.C、Fridayofthisweek.D、Fridayofnextmonth.CWhenwillthewomango?
最新回复
(
0
)