首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体中有一个命令按钮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
2021-06-03
68
问题
在窗体中有一个命令按钮Command1,三个文本框Text0、Text1个Text2,命令按钮对应的代码过程如下:
Private Sub Command1_Click( )
Dim i, f1, f2 As Integer
Dim flag As Boolean
fl = Val(Me! Text0)
f2 = VaI(Me! Text1)
If f1 > f2 Then
1 = f2
Else
1 = 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和25,单击按钮后文本框Text2中显示的结果是( )。
选项
A、5
B、10
C、15
D、25
答案
A
解析
Text0中输入15,Text1中输入25,分别赋值给变量f1和f2,使用If—Else语句将f1和f2中较小的值赋给变量i;Do while … Loop循环语句的执行过程是:如果条件为真( True),则执行语句块,当执行到Loop语句时,将返回到While语句并对“条件”再次进行判断,如果仍为真(True),则重复前述过程。如果条件为假( False),则不执行语句块,而执行Loop之后的语句,本题中使用变量i和标志变量flag作为循环的条件,当i>1并且flag为true时,循环执行,循环体中使用If—Else语句,只有当fl或f2被i整除时,置标志变量flag为false,则循环结束,否则将变量i减1,循环执行结束时变量i中保存f1和f2的最大公约数,所以本题的结果为5,故本题选择A选项。
转载请注明原文地址:https://kaotiyun.com/show/Bzvp777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
执行语句:MsgBox“AAAA”,vb0KCancel+vbQuestion,”BBBB”之后,弹出的信息框
在超市营业过程中,每个时段要安排一个班组上岗值班,每个收款口要配备两名收款员配合工作,共同使用一套收款设备为顾客服务。在数据库中,实体之间属于一对一关系的是()。
在窗体中添加一个名称为Commandl的命令按钮,然后编写如下事件代码:PrivateSubCommandlClick()a=75Ifa>60Thenk=1Elselfa>70Then
下面叙述中正确的是
在关系运算中,选择运算的含义是()。
逻辑模型是面向数据库系统的模型,下面属于逻辑模型的是
下面属于黑盒测试方法的是
要改变窗体上文本框控件的数据源,应设置的属性是
已知代码如下:DimstrSQLAsStringstrSQL="createtableStudent("strSQL=strSqL+"SnoCHAR(10)PR/MARYKEY,"strSQL=strSQL+"SnameVARCHAR(1
若实体A和B是一对多的联系,实体B和C是一对一的联系,则实体A和C的联系是
随机试题
A.细静脉内皮细胞收缩B.仅毛细血管内皮细胞损伤C.毛细血管和小静脉内皮细胞损伤D.细动脉、毛细血管和细静脉内皮细胞均损伤速发持续反应时有
男,72岁,胃癌晚期,给予脂肪乳、氨基等输入。1周后注射部位沿静脉走向出条索状红线,局部组织肿胀、发红,患者诉有疼痛感。为该患者输注脂肪乳和氨基酸的目的是
戊公司是一家以软件研发为主要业务的上市公司,其股票于2017年在我国深圳证券交易所创业板上市交易。戊公司有关资料如下:资料一:X是戊公司下设的一个利润中心,2019年x利润中心的营业收入为600万元,变动成本为400万元,该利润中心负责人可控的固定成本为
Inourcomparison-soakedculture,it’shardtoavoidslippinginto"Whycan’tI"mode.Whenoneofmycolleagues【R1】______Ithin
下列事项中应当制发通知的有()。
根据所给资料,回答下列问题。据中国汽车工业协会统计分析,2013年上半年,中国品牌乘用车共销售356.67万辆,同比增长13.19%,结束上年下降趋势,占乘用车销售总量的41.16%,占有率较上年同期下降0.23个百分点。上半年,德系、日系、美系、韩系和
设为A的特征向量.求a,b及A的所有特征值与特征向量.
在双绞线布线后要进行测试,一般情况,下面(64)不是测试的项目。光纤测试的内容不包括(65)项目。
下面关于USB的叙述中,错误的是()。
ChooseTWOletters,A-E.JuliaandBobfindsomeoftheitemstheyneedA.inBob’spencilcaseandtherecyclingbin.
最新回复
(
0
)