编写如下程序： Private Sub Conunand1_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

admin2016-06-23 42

问题编写如下程序：
Private Sub Conunand1_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；yY
End Sub
程序运行后，单击命令按钮Command1，输出结果为

选项 A、1 1
B、4 1
C、4 2
D、7 28

答案B

解析 Do…Loop Until循环当条件为真时循环执行循环体。代入初值进行计算可得结果。选B。

转载请注明原文地址:https://kaotiyun.com/show/4SLp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类

二级VB

NCRE全国计算机二级

相关试题推荐

在窗体模块中用Public定义的变量的作用范围是
要将窗体Form1标题设为“学习VB”，以下能正确实现该功能的语句为
下列程序段的执行结果为DimA(3,3)ForM=1To3　　ForN=1To3　　IfN=MOrN=3-M+1Then　　　　A(M,N)=1　　Else　　　　A(M,N)=
单击命令按钮时，下列程序的执行结果是PrivateSubCommand1_Click()DimaAsInteger，bAsInteger，cAsInteger　　a=3:b=4:c=5　　PrintSec
下列程序的功能是：当x＜50时，y=0.8×x；当50≤x≤100时，y=0.7×x；当x＞100时，没有意义。请填空。PrivateSubCommand1_Click()DimxAsSingle　x=InputBox("
下列程序的运行结果是()。s=0:t=0:u=0Forx=1To3Fory=1ToxForz=yTo3　s=s+1Nextzt=t+1Nextyu=u+1
设已经在菜单编辑器中设计了窗体的快捷菜单，某顶级菜单为a1，且取消其“可见”属性。运行时，以下()事件过程可以使快捷菜单的菜单项响应鼠标左键单击和右键单击。
在窗体上绘制一个命令按钮，其名称为Command1，然后编写如下事件过程：PrivateSubCommand1_Click()　　DimiAsInteger,xAsInteger　　Fori_1T06

随机试题

患者，男，46岁。反复心悸不宁3年，症见心悸少寐，多梦，头晕目眩，手足心热，耳鸣腰酸，舌红少苔，脉细数。问题4：(假设信息)若见虚烦咽燥，口干口苦等热象较著者，治疗应首选
关于医嘱的描述，不正确的是
某市西部拟建一污水处理厂，一期规模为30万t／d。污水处理厂退水为某市一条主要河流的河道。该地区夏季主导风向为西北风，冬季主导风向为东北风。污水处理厂厂址有两个备选方案：A.余粮堡村厂址；B.小梁厂址。A方案厂址位于某市洪区余粮堡村农田和浑河南岸滩地，东南
发展多种形式规范、健全的资本市场，尤其是()，提高企业直接融资比重，有效分流储蓄资金，减少企业外部融资对银行间接融资方式的过渡依赖。
隧道施工现场一般将风枪支撑在钻孔台架上，利用台架的钢管作为风管向风枪供送高压风。高压风的风压一般不低于()MPa，每台风枪每分钟的需风量不低于()m3。
古代筑垣以设境界而于其中饲养禽兽的场所称为()。
抑景主要有()之分。
人们都喜爱观赏日出，无不赞叹太阳升起时的壮观景象。而对日落，却很少有人去流连观赏、吟咏描绘。原因何在?恐怕是一种感情的影响，“日薄西山，气息奄奄”。就连我们的古人不也留下________的诗句吗?填入画横线部分最恰当的一句是()。
茶树性喜潮湿，需要多量而均匀的雨水，湿度太低或降雨量少于1500毫升都不适合茶树的生长。仙人球喜阳，只有在足够的光照下，才能发育良好，否则，会使条形圆球儿长成桶形，强刺球儿的刺也会萎缩，整个球没有光泽。在某地的大部分地区茶树和仙人球至少有一种长得好。如果
信息系统软件运维的主要过程不包含___________。

最新回复(0)

编写如下程序： Private Sub Conunand1_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

二级VB

NCRE全国计算机二级

在窗体模块中用Public定义的变量的作用范围是

要将窗体Form1标题设为“学习VB”，以下能正确实现该功能的语句为

下列程序段的执行结果为DimA(3,3)ForM=1To3 ForN=1To3 IfN=MOrN=3-M+1Then A(M,N)=1 Else A(M,N)=

单击命令按钮时，下列程序的执行结果是PrivateSubCommand1_Click()DimaAsInteger，bAsInteger，cAsInteger a=3:b=4:c=5 PrintSec

下列程序的功能是：当x＜50时，y=0.8×x；当50≤x≤100时，y=0.7×x；当x＞100时，没有意义。请填空。PrivateSubCommand1_Click()DimxAsSingle x=InputBox("

下列程序的运行结果是()。s=0:t=0:u=0Forx=1To3Fory=1ToxForz=yTo3 s=s+1Nextzt=t+1Nextyu=u+1

设已经在菜单编辑器中设计了窗体的快捷菜单，某顶级菜单为a1，且取消其“可见”属性。运行时，以下()事件过程可以使快捷菜单的菜单项响应鼠标左键单击和右键单击。

在窗体上绘制一个命令按钮，其名称为Command1，然后编写如下事件过程：PrivateSubCommand1_Click() DimiAsInteger,xAsInteger Fori_1T06

患者，男，46岁。反复心悸不宁3年，症见心悸少寐，多梦，头晕目眩，手足心热，耳鸣腰酸，舌红少苔，脉细数。问题4：(假设信息)若见虚烦咽燥，口干口苦等热象较著者，治疗应首选

关于医嘱的描述，不正确的是

发展多种形式规范、健全的资本市场，尤其是()，提高企业直接融资比重，有效分流储蓄资金，减少企业外部融资对银行间接融资方式的过渡依赖。

隧道施工现场一般将风枪支撑在钻孔台架上，利用台架的钢管作为风管向风枪供送高压风。高压风的风压一般不低于()MPa，每台风枪每分钟的需风量不低于()m3。

古代筑垣以设境界而于其中饲养禽兽的场所称为()。

抑景主要有()之分。

信息系统软件运维的主要过程不包含___________。

下列程序段的执行结果为DimA(3,3)ForM=1To3　　ForN=1To3　　IfN=MOrN=3-M+1Then　　　　A(M,N)=1　　Else　　　　A(M,N)=

单击命令按钮时，下列程序的执行结果是PrivateSubCommand1_Click()DimaAsInteger，bAsInteger，cAsInteger　　a=3:b=4:c=5　　PrintSec

下列程序的功能是：当x＜50时，y=0.8×x；当50≤x≤100时，y=0.7×x；当x＞100时，没有意义。请填空。PrivateSubCommand1_Click()DimxAsSingle　x=InputBox("

下列程序的运行结果是()。s=0:t=0:u=0Forx=1To3Fory=1ToxForz=yTo3　s=s+1Nextzt=t+1Nextyu=u+1

在窗体上绘制一个命令按钮，其名称为Command1，然后编写如下事件过程：PrivateSubCommand1_Click()　　DimiAsInteger,xAsInteger　　Fori_1T06　　