首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有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
2019-03-14
36
问题
窗体上有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://kaotiyun.com/show/fKFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面程序的功能是利用随机数函数模拟掷骰子。方法是每次随机产生一个1~6的整数,相当于一次掷骰子。程序运行后,在Text2文本框中输入总投掷次数(例如10000),单击"开始投掷"按钮则进行模拟掷骰子,并把出现1~6的次数分别显示在文本框数组Text1(从上
软件生命周期中,确定软件系统要做什么的阶段是
以下关于事件、事件驱动的叙述中,错误的是( )。
设有语句:Open"c:\Test.Dat"ForOutputAs#1则以下叙述中错误的是( )。
窗体上有一个名为Commandl的命令按钮,并有下面的程序:PrivateSubCommandl_Click()Dimarr(5)AsIntegerFork=1To5flit(k)=kNext
表达式12/2\4的值是( )。
有下面程序代码:PrivateSubCommand1_Click()DimaAsStringa="COMPUTER"n=search(a,"T")PrintIIf(n=0,"未找到",
以下关于控件的叙述中,正确的是
窗体上有1个名称为Commandl的命令按钮,事件过程如下:PrivateSubCommandl_Click()DimhumAsInteger,xAsIntegernum:Val(InputBox(“请输入一个正整数”))Selec
设有如下程序:OptionBase1Dima(3,4)AsInteger,b(4,3)AsIntegerPrivateSubCommandlClick()循环1Fori=1To3Forj=1To4b(i,i)=a(i,j
随机试题
头围的大小与脑和颅骨的发育有关,新生儿出生时头围平均为()cm。
面访法是指由调查员对被调查者逐个访问,这种问卷调查方法的优点是
能确保自营业务与经纪、资产管理、投资银行等业务在人员、信息、账户、资金、会计核算上严格分离的制度是()。
下列各项中,不属于存货变动储存成本的是()。
若从0~9这十个数字中取出三个,使其和为不小于10的偶数,则不同的取法有()种.
从所给的四个选项中,选择最合适的一个填入问号处,使之呈现一定的规律性。
Weallknowpeoplewhosaytheyhave"nosenseofdirection".Yetforsomepeoplethatdescriptionistrueinallcircumstances:
青少年情绪发展的一般特点。
下列选项中,属于不作为犯罪的是()
A、Shehasalwaysbelievedtheyexist.B、SheheardabouttheminNewZealand.C、Storiesaboutthemmaybebasedongiantsquid.D
最新回复
(
0
)