首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command1_Click() Dim x As Integer,y As Integer x=1:y=1 Do y=x*y If y>10Then Exit Do Else x=x+3 End If Loop U
编写如下程序: Private Sub Command1_Click() Dim x As Integer,y As Integer x=1:y=1 Do y=x*y If y>10Then Exit Do Else x=x+3 End If Loop U
admin
2016-09-19
18
问题
编写如下程序:
Private Sub Command1_Click()
Dim x As Integer,y As Integer
x=1:y=1
Do
y=x*y
If y>10Then
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型循环结构,首先看条什判断在循环体的前面还是后面,如果是先判断条件,则有可能一次也不执行循环体:如果是后判断条件,则无论条件是什么,至少执行一次循环体。在Until循环中条件为False时执行循环体,条件为True时退出循环;在While循环中条件为Tme时执行循环体,条件为False时退出循环。本题中使用的是后判断型循环,第一次循环时y的值为1,不满足y>10,执行Else分支,x变成4,此时由于满足x<=10所以结束循环。
转载请注明原文地址:https://jikaoti.com/ti/KYJ0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
单击命令按钮时,下列程序的运行结果为PrivateSubCommand1_Click() PrintFun(23,18)EndSubPublicFunctionFun(mAsInteger,nAsInte
编写如下两个事件过程:PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger) PrintChr(KeyCode)EndSubPrivateSubFo
下列程序段的执行结果为()。DimA(3,3)ForM=1To3 ForN=1To3 IfN=MOrN=3-M+1Then A(M,N)=1 Else
窗体上有List1、List2两个列表框,程序运行时,在两个列表框中分别选中1个项目,如图a所示,单击名称为Commandl的“交换”按钮,则把选中的项目互换,互换后的位置不限,如图b所示。下面的程序可实现这一功能,请填空。Privat
设循环队列的存储空间为Q(1:30),初始状态为front=rear=30。现经过一系列入队与退队运算后,front=16,rear=15,则循环队列中有【】个元素。
使用驱动器列表框Drivel?目录列表框Dirl?文件列表框Filel时,需要设置控件的同步。以下能够正确设置两个控件同步的命令是
设程序中有如下数组定义和过程调用语句:Dima(10)AsInteger……Callp(a)如下过程定义中,正确的是
如果要将某个菜单项设计为分隔线,则该菜单项的标题应设置为____________。
数据结构中,与所使用的计算机无关的是数据的()。
下列叙述中,不属于软件需求规格说明书的作用的是()。
随机试题
垂直牙体牙根裂常发生在使用桩核修复的牙齿。使用哪一类桩核修复后,垂直牙体牙根裂的可能性最大A.有螺纹的圆柱形桩核B.有螺纹的圆锥形桩核C.无螺纹的圆柱形桩核D.无螺纹的圆锥形桩核E.以上无差异
小儿右髋部摔伤,首选的X线检查方法是
蜂蜜丸中蜂蜜加热105~115℃,含水量达到17%~20%属于()。
下列工序质量控制的方法,属于工序质量预控的有()。
下列关于股票内在价值与价格关系的表述中,错误的是( )。
某投资中心投资额为1000000元,企业加权平均的最低投资报酬率为18%,剩余收益为200000元,则该中心的投资报酬率为20%。()
假设某计算机有1MB的内存,并按字节编址,为了能存取其中的内容,其地址寄存器至少需要(9)位。为使4字节组成的字能从存储器中一次读出,要求存放在存储器中的字边界对齐,一个字的地址码应(10)。若存储周期为200ns,且每个周期访问4B,则该存储器的带宽为
直接转移指令执行时,是将指令中的地址送入()。
在基于ARM微处理器为核心的硬件平台上,开发其Linux环境下的应用程序expl.c。若需要编译后生成expl.c对应的汇编程序,应使用的命令是()。
AccordingtoAmericanlaw,ifsomeoneisaccusedofacrime,heisconsidered【B1】______untilthecourtprovesthepersonisguil
最新回复
(
0
)