首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有1个名称为Command1的命令按钮,事件过程如下: Private Sub Command1_Click() Dim x%,y%,z% x=InputBox("请输入第1个整数") y=InputBox("请输入第
窗体上有1个名称为Command1的命令按钮,事件过程如下: Private Sub Command1_Click() Dim x%,y%,z% x=InputBox("请输入第1个整数") y=InputBox("请输入第
admin
2016-08-24
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/T4Lp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上添加一命令按钮,名为Command,事件过程如下:optionbase1PrivateSubCommand1_Click() Dima(4,4)AsVariant Fori=1To4
下面的程序代码实现将一个一维数组中元素向右循环移动,移位次数由文本框Text输入。例如数组各元素的值依次为0,1,2,3,4,5,6,7,8,9,10;移动三次后,各元素的值依次为8,9,10,0,1,2,3,4,5,6,7。PrivateSub
在下面各关系中,当X取小数或负数时都能成立的式子是()。
不能打开属性窗口的操作是()。
在菜单编辑器中建立1个名称为Menu0的菜单项,将其“可见”属性设置为False,并建立其若干子菜单,然后编写如下过程:PrivateSubForm_MouseDown(ButtonAsInteger,ShiftAsInteger,X
为了能自动放大或缩小图像框中的图形与图像框的大小相适应,必须把该图片框的Stretch属性设置为______。
在窗体上画一个命令按钮,名称为Command1。程序运行后,如果单击命令按钮,则显示一个输入对话框,在该对话框中输入一个整数,并用这个整数作为实参调用函数过程F1。在F1中判断所输入的整数是否是奇数,如果是奇数,过程F1返回1,否则返回0。能够正确实现上述
下列叙述中,正确的是()。
将E—R图转换到关系模式时,实体与实体间的联系可以表示成()。
随机试题
下列不属于腹腔积液的体征是
按照《城市道路路基工程施工及验收规范》规定,城市快速路及主干路填方高度为1m的土质路基的最低压实度为( )。
施工方项目管理规划的内容一般包括()。
完全垄断型市场可以分为()。Ⅰ.政府完全垄断Ⅱ.私人完全垄断Ⅲ.自然完全垄断Ⅳ.技术完全垄断
改革是推动历史发展的重要动力,一个国家、一个民族要发展,就要不断改革创新,与时俱进。请完成以下关于改革的话题。材料一据《史记.商君列传》记载,商鞅合并小都、小乡、小邑、小聚为县,设置县令、县丞,共三十一个县,由国君直接委派官员治理;努力从事农业生产
请根据给定资料,概括我国居民收入分配差距过大的原因和危害。(20分)要求:概括全面,简明扼要,不超过300字。请根据给定资料,就政府在维护社会公平中的作用,写一篇议论文。(50分)要求:参考给定资料,自选角度,自拟标题,观点明确,内
1942年,美日在太平洋地区的()展开一场海空大战,美国取得了胜利,日本丧失了在太平洋战场上的主动权,太平洋战场的形势发生了转变。
关于破坏选举罪,下列说法不正确的是()
Wehavetorealizehowold,howveryold,weare.Nationsareclassifiedas"aged"whentheyhave7percentormoreoftheirpeo
Whatisthediscussionmainlyabout?
最新回复
(
0
)