首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有1个名称为Command1的命令按钮,事件过程如下: Private Sub Command1_Click() Dim x%, y%, z% x=InputBox("请输入第1个整数") y=InputBox("请输入第2个整数")
窗体上有1个名称为Command1的命令按钮,事件过程如下: Private Sub Command1_Click() Dim x%, y%, z% x=InputBox("请输入第1个整数") y=InputBox("请输入第2个整数")
admin
2015-08-28
33
问题
窗体上有1个名称为Command1的命令按钮,事件过程如下:
Private Sub Command1_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、13
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://jikaoti.com/ti/E5J0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列事件过程的功能是:建立一个名为Datal的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为1,2,3,…,90。请在空白处填入适当的内容,将程序补充完整()。PrivateTypeAngKAsInt
下列程序的功能是:弹出一个对话框询问用户是否输出,如果是,则输出;否则结束。请填空。SubPrintOut()DimaAsIntegera=MsgBox("输出结果?",vblnformation+vbYesNo,"提示:")Ifa=__
下列控件属性中,属性值的类型不相同的一项是()。
阅读下列程序:PrivateSubCommand1_Click()DimiAsInteger,kAsIntegerk=2Fori=1To3PrintH(
对象名.Cls方法对()控件有效。
只能用来显示文本信息的控件是()。
记时器控件能有规律的以一定时间间隔触发【】事件,并执行该事件过程中的程序代码。
在窗体上画一个名称为Label1、标题为“VisualBasic考试”的标签,两个名称分别为Command1和Conlmand2、标题分别为“开始”和“停止”的命令按钮,然后画一个名称为Timer1的计时器控件,并把其Interval属性设置为500,如图
设有如下记录类型:TypestudentNumberAsString*10NameAsString*8EndType窗体中有若干控件,单击其中的一个按钮Command1时,执行如下事件过程,该过程的功能是把数据输出到指定的文件中。根据
随机试题
某工厂建一排污无盖的长方体,其体积为V,底面每平方米造价为a元,侧面每平方米造价为b元,为使其造价最低,其长、宽、高各应为多少?
关于T型管引流的护理说法正确的是
A.轻度精神发育迟滞B.儿童孤独症C.中度精神发育迟滞D.儿童多动症E.儿童精神分裂症患儿,男,7岁。因不能入学由母亲带来心理门诊。母亲诉2周岁时患儿聪明伶俐,2岁半以后无明显原因开始不愿说话,及至5岁时几乎一天不说话,从不与父母有交流,就连父
人民币是我国的法定货币,支付我国境内的一切公共的和私人的债务,任何单位或个人均不能拒收。( )
作为一名即将走上教师岗位的新教师,你认为教师应该具备的学科专业素养是什么?
数字鸿沟:是指在全球数字化进程中,不同国家、地区、行业、企业、社区之间,由于对信息、网络技术的拥有程度、应用程度以及创新能力的差别而造成的信息落差的趋势。根据上述定义,下列现象属于数字鸿沟的是()。
某公司的员工中,拥有本科毕业证、计算机登记证、汽车驾驶证的人数分别为130,110,90.又知只有一种证的人数为140,三证齐全的人数为30,则恰有双证的人数为
韩先生为了寻找曾经帮助他的司机,向新闻媒体提供了他记得的车牌信息,韩先生看到的车牌号为“晋BM****”,最后一位是字母,其他三位全是奇数,且数字逐渐变大,那么符合要求的车牌有().
Notwoeconomiccrisesareidentical.Butthesamequestionsrecur.Howdidwegetintothismess?Howcanwegetoutofit?How
WhatdoIwant?It’sreallyavery【C1】______question:yetmanyofusarenotsure.【C2】______itdoesn’thavetobeallthatdif
最新回复
(
0
)