首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有1个名称为Commandl的命令按钮,事件过程如下: Private Sub Commandl_Click() Dim x%,y%,z% x=InputBox(“请输入第1个整数”) Y=I
窗体上有1个名称为Commandl的命令按钮,事件过程如下: Private Sub Commandl_Click() Dim x%,y%,z% x=InputBox(“请输入第1个整数”) Y=I
admin
2013-11-29
21
问题
窗体上有1个名称为Commandl的命令按钮,事件过程如下:
Private Sub Commandl_Click()
Dim x%,y%,z%
x=InputBox(“请输入第1个整数”)
Y=InputBox(“请输入第2个整数”)
Do Until x=y
If X>Y Then X=X-Y Else Y=y-X
Loop
Print X
End Sub
运行程序,单击命令按钮,并输入2个整数169和39,则在窗体上显示的内容为( )。
选项
A、11
B、l3
C、23
D、39
答案
B
解析
程序中Do循环比较输入的两个数的大小,把较大的数值减去较小的数值后再与较小的值比较,直到两个数值相等。程序中输入169和39,则x=169-39=130,130>y即130>39,因此x=130-39=91,如此循环x=91-39=52-39=13,此时13>39为假,执行y=y-x=39-13=26,循环y=26-13=13,此时x、y都为13,循环结束,因此窗体上显示为13。
转载请注明原文地址:https://kaotiyun.com/show/JWQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
语句Dima(-3To4,3To6)AsInteger定义的数组的元素个数是______。
在窗体上画—个文本框(名称为Text1)和—个标签(名称为Label1),程序运行后,在文本框中每输入—个字符,都会立即在标签中显示文本框中字符的个数。以下可以实现上述操作的事件过程是______。
下面的程序段执行后,X的结果为______。X=0ForI=1to5Forj=Ito5X=X+1NextjNextIPrintx
命令Picture1.Circle(500,800),800能够在图片框Picture中画出的图形是______。
如果关系模式R为1NF,且每个非主属性都完全函数依赖于R的候选码,则称R属于______。
执行下面程序,第一行输出结果是【】,第二行输出结果是【】。OptionExplicitPrivateSubForm_Click()DimAAsIntegerA=2
InputBox函数返回值的类型为______。
在KeyDown和KeyUp事件过程中,当参数Shift的值为十进制数1,2,4时,分别代表Shift、【】、【】键。
一个教师能开多门课程,一门课程有许多教师会开,实体课程与实体教师间是______。
用二维表来表示实体及实体之间联系的数据模型称为______。
随机试题
企业提前支付了厂房的租金,企业资产负债表的变化是()。
商业银行的存贷比应当不高于()。
国有独资公司为()。
世界500强企业对优秀员工提出了12条核心标准,其中一条是“不找任何借口”。其意思是()。
某花店每天以每枝5元的价格从农场购进若干枝玫瑰花,然后以每枝10元的价格出售。如果当天卖不完,剩下的玫瑰花作垃圾处理。下表所示为花店记录的连续100天玫瑰花的日需求量,若花店每天购进17枝玫瑰花,依此过去100天的需求量推算,当天利润不少于75元的概率为:
国际金融危机的成因不包括()。
2008年以来,索马里附近海域先后发生累计逾120起的海盗劫船事件。海盗为何如此猖獗?甲乙丙丁四人有如下断定:甲:海盗猖獗的主因是被劫船只的船主通常都愿支付高额赎金。乙:如果海盗猖獗的主因是被劫船主愿支付高额赎金,那么肯定会助长海盗的气
设一个学生关系为S(学生号,姓名),课程关系为C(课程号,课程名),选课关系为x(学生号,课程号,成绩),求出所有选课的学生信息的运算表达式为______与______的自然连接。
A、I’mfromShanghai.B、Icomeheretostudy.C、Sorry,Ican’ttellyou.D、Youcan’task.A本题的关键部分是“wheredoyoucomefrom?”意为“你来自
TheInternetandcellphonesarebringingpeopletogether,not【C1】______usapart—atleast,accordingtoanewsurveyrecentlyby
最新回复
(
0
)