首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command1_Click() Dim x As Integer, y As Integer x = 1 y = 1 Do y = x * y If y > 10 T
编写如下程序: Private Sub Command1_Click() Dim x As Integer, y As Integer x = 1 y = 1 Do y = x * y If y > 10 T
admin
2015-10-23
49
问题
编写如下程序:
Private Sub Command1_Click()
Dim x As Integer, y As Integer
x = 1
y = 1
Do
y = x * y
If y > 10 Then
Exit Do
Else
x = x + 3
End If
Loop Until x <= 10
Print x; y
End Sub
程序运行后,单击命令按钮Command1,输出结果为
选项
A、1 1
B、4 1
C、4 2
D、7 28
答案
B
解析
Do…Loop Until循环当条件为真时循环执行循环体。代入初值进行计算可得结果。选B)。
转载请注明原文地址:https://kaotiyun.com/show/3ULp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
如下图所示,在名为Form1的窗体上建立一个名称为Text1文本框;然后建立两个主菜单,标题分别为“超级市场”和“帮助”,名称分别为vbMenu和vbHelp,其中“超级市场”菜单包括“国际连锁超市”、“国内连锁超市”和“小超市”3个菜单项,名称分别为
在考生文件夹中有一个工程文件execise62.vbp(相应的窗体文件名为execise62.frm)。在名为Form1的窗体上有4个文本框,初始内容为空;1个命令按钮,标题为“求Min”。功能是通过调用过程FindMin求数组的最小值,请装入该文件。程序
在考生文件夹中有一个工程文件execise35.vbp,相应的窗体文件名为execise35.frm。请在名为Form1的窗体上绘制一个名称为Text1的文本框和一个名称为Cmd1、标题为“大小写转换”的命令按钮,如下图所示。在程序运行时,单击“
在考生文件夹中有一个工程文件execise26.vbp,相应的窗体文件为execise26.frm。在名为Form1的窗体上有一个名称为Cmd1、标题为“计算”的命令按钮:两个水平滚动条,名称分别为HSI和HS2,其Max属性均为100,Min属性均为1:
在考生文件夹下有工程文件execise8.vbp及窗体文件execise8.frm。在名为Form1的窗体上有5个Labe1控件和2个命令按钮,如下图所示。数据文件in8.dat存放了一些字符。具体要求如下:(1)按Begin按钮后,能从考生文件夹
Fibonacci数列的规律是:前2个数为1,从第3个数开始,每个数是它前2个数之和,即1,1,2,3,5,8,13,2l,34,55,89,…某人编写了下面的函数,判断大于1的整数X是否是Fibonacci数列中的某个数,若是,则返回True,否则返回F
语句PrintSgn(-6^2)+Abs(-6^2)+Int(-6^2)的输出结果是()。
当用户桉下键盘上的某个键时,将会触发拥有输入焦点的控件的______事件。
下列关于闲置循环的四个叙述中,错误的是()。
下列叙述正确的是
随机试题
良好的曲轴箱通风装置在发动机正常工作时,曲轴箱内应()。
目前,用于全身治疗作用的栓剂主要是
投资价值与市场价值的评估方法可能相同,但其中参数选取的立场可能不同。如都可以采用收益法———价值是未来净收益的现值之和,但在评估市场价值时,收益法中的折现率是与该房地产的风险程度相对应的社会一般的收益率,而在评估投资价值时,该折现率是投资者所要求的最低收益
下列地理空间信息中,导航电子地图制作过程可以采集的内容是()。
一般认为,城镇的()可以用来测量城镇的中心性,因为城镇大多是多功能的,也是一个城镇在区域中的地位的综合反映。
下列不属于简支梁桥施工中常见质量控制点的是()。
空间里两两距离相等的不同点最多有().
2012年12月,甲公司与钱某、于某合伙组建乙合伙企业,甲公司出资400万元,钱某和于某以劳务出资,甲公司不负责乙合伙企业的经营,仅以出资额为限承担合伙责任。钱某和于某负责乙合伙企业的经营,并用自己的全部财产对公司债务负责,钱某为执行合伙人。2013年4
将考生文件夹下JIN文件夹中的SUN.C文件复制到考生文件夹下的MQPA文件夹中。
Youwillhearfivedifferentpeopletalkingaboutajob-huntinglecturetheyhavejustattended.Foreachextractthereare
最新回复
(
0
)