首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: 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
编写如下程序: 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
admin
2016-06-23
103
问题
编写如下程序:
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全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画1个文本框,名称为Text1,然后编写如下程序:PrivateSubForm_Load() Open"d:\temp\dat.txt"ForOutputAs#1 Text1.Text=""EndSu
在文本框中,当用户键入一个字符,能同时引发的事件是
要将窗体Form1标题设为“学习VB”,以下能正确实现该功能的语句为
下列程序段的执行结果为DimA(3,3)ForM=1To3 ForN=1To3 IfN=MOrN=3-M+1Then A(M,N)=1 Else A(M,N)=
建立控件时系统自动给控件一个名称,第一个建立的命令按钮名称是______。
有如下程序:PrivateSubcommand1_Click() a=1:b=1 Print"a=";a;",b=";b Callmult((a),b) Print"a=";a;";b=";b语句
下列程序的功能是:当x<50时,y=0.8×x;当50≤x≤100时,y=0.7×x;当x>100时,没有意义。请填空。PrivateSubCommand1_Click()DimxAsSingle x=InputBox("
在运行程序时,在文本框中输入新的内容,或在程序代码中改变Text的属性值,相应会触发到()事件。
窗体上有Text1、Text2两个文本框及一个命令按钮Command1,编写下列程序:DimyAsIntegerPrivateSubCommand1_Click()DimxAsIntegerx=2Te
随机试题
下列与“气主煦之”无关的是()(2007年第8题)
简述张元幹《贺新郎》(梦绕神州路)一词的艺术特点。
Likealllargecities,NewYorkhasoldproblemstosolveand【21】onestoface.Slums(贫民窟)mustbecleared,andnewhousingconst
进行肺功能显像检查,说法正确的是
宋楚雄与孙五花离婚纠纷一案,经K市L县人民法院调解,双方当事人就离婚问题达成协议,同意解除双方的婚姻关系,并签收了人民法院送达的调解书。在此情况下,该调解书对方双方当事人有何约束力?
某县是国家级历史文化名城,该县单独编制的历史文化名城保护规划,应报()审批。
上市公司同次发行的相同条款优先股,每股发行的条件、价格和票面股息率应当相同。()
新课程倡导研究性学习、合作学习、教学对话等教学方式,其主要理论依据是()
capacityforindependentinnovation
Thewomanmaybuysomeclothesaslongastheyfither.
最新回复
(
0
)