首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Commandl_Click() Dim x As Integer,y As Integer x=1:y=1 Do y=x*y Ify>10 Then
编写如下程序: Private Sub Commandl_Click() Dim x As Integer,y As Integer x=1:y=1 Do y=x*y Ify>10 Then
admin
2019-04-29
37
问题
编写如下程序:
Private Sub Commandl_Click()
Dim x As Integer,y As Integer
x=1:y=1
Do
y=x*y
Ify>10 Then
Exit Do
Else
x=X+3
End If
Loop Until x<=10
Print x;y
End Sub
程序运行后,单击命令按钮Commandl,输出结果为
选项
A、1 1
B、4 1
C、4 2
D、7 28
答案
B
解析
Do型循环结构,首先看条件判断在循环体的前面还是后面,如果是先判断条件,则有可能一次也不执行循环体;如果是后判断条件,则无论条件是什么,至少执行一次循环体。在Until循环中条件为False时执行循环体,条件为True时退出循环;在While循环中条件为Tme时执行循环体,条件为False时退出循环。本题中使用的是后判断型循环,第一次循环时y的值为1,不满足y>10,执行Else分支,x变成4,此时由于满足x<=10所以结束循环。
转载请注明原文地址:https://kaotiyun.com/show/GLUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
某人编写了下面的程序,希望能把Text1文本框中的内容写到Temp.txt文件中PrivateSubCommand1_Click()Open”Temp.txt”ForOutputAs#2Print”Text1”
有如下程序:PrivateSubFormClick(1)DimiAsInteger,sumAsIntegersum=0Fori=2To10IfiMod2◇0AndiMod
窗体上有1个名为Listl的列表框,其中已经输入了若干个项目(如图3所示);还有2个文本框,名称分别为Text1、Text2,1个名称为Command1的命令按钮,并有以下程序。PrivateSubCommand1Click()
窗体如图l所示。要求程序运行时,在文本框Textl中输入一个姓氏,单击“删除”按钮(名称为Commandl),则可删除列表框Listl中所有该姓氏的项目。若编写以下程序来实现此功能:PrivateSubCommand1Click(
设在工程中有一个标准模块,并定义了如下类型:TypeStutypeinoAsIntegerstrnameAsString*20strsexASString*2smarkAsSingle
已知数组Dima(1To10)AsInteger,则下面正确调用GetValue函数的是()。PrivateFunctionGetValue(a()AsInteger)AsIntegerFori=lTo10
窗体上有两个名称分别为Text1、Text2的文本框,一个名称为Commandl的命令按钮。设有如下的类型声明:TypePersonnameAsString*8majorAsString*20EndTyp
随机试题
负责本行政区域内的房屋权属登记管理工作的部门是()。
下列算式中,正确表达了借贷记账法下权益账户内部关系的是()。
利润总额和营业利润的差异在于利润总额包含营业外收人和营业外支出。()
在()方式下,发行人和主承销商无需通过证券交易所去安排发行的具体时间。
(1)发生了汽车“追尾”事故(2)领导带着慰问品赶往医院(3)昨天下了一场大雪(4)紧急通知相关单位,报告会取消(5)去机场接人
“桂林山水甲天下”,桂林山水之所以优美的最主要原因是()。
与副交感神经相比,交感神经的特点是
Intherealworldmostpeoplehaveadefinitedislike【C1】______certainsortsofworkathome.Twoofthesetasksareironingclo
Manycriticsconsiderthatfarmorestressisplacedonachievementsinathleticsthanintheacademicsphere.We’retoldthati
说明:请按照下列提示,以总经理秘书孙玉的身份填写一份会议议程安排。会议时间:2006年12月10日下午3点会议地点:公司多功能会议厅参与者:总经理王明销售部经理李飞生产部经理刘力采购部经理张华会议记录:孙玉会议议程:
最新回复
(
0
)