首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: 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
2020-07-22
55
问题
编写如下程序:
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/9AHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上已有1个名称为Picture1的图片框,要求实现下面2个功能之一:(1)在窗体上移动鼠标时,立即将Picture1显示在鼠标位置(2)在窗体上单击鼠标时,立即将Picture1显示在鼠标位置下面不能实现上述任何功能的事件过程是
在窗体上画一个组合框,一个命令按钮和一个文本框,其名称分别为Combol,Command1和Text1,然后编写如下事件过程:PrivateSubForm_Load()Combol.AddItem”AAAAA”Combol
窗体上有一个名称为Command1的命令按钮,一个名称为Text1的文本框,其Text属性值为"VBProgramming"。运行程序后,选中其中的"VB",并执行如下事件过程:PrivateSubCommand1_Click()
(1)考生文件夹下有一个工程文件sjt3.vbp,其窗体上有1个名称为Text1的控件数组;一个标题为”排序”的命令按钮。程序运行时,在文本框数组中输入8个整数,如图3-29(a)所示;然后单击”排序”按钮,则8个整数按降序排序,如图3-29(b)所示。
要想使列表框只允许单选列表项,应设置的属性为( )。
在窗体上有一个名称为Commandl的命令按钮,并有如下程序:PrivateSubCommand1Click()StaticXAsIntegerStaticYAsIntegerClsY=1:Y=Y+5:X=5+X:Print
软件需求规格说明书的作用不包括
有如下语句序列:Dima,bAsIntegerPrintaPrintb执行以上语句序列,下列叙述中错误的是( )。
线性表常采用的两种存储结构是()。
软件是由两部分组成的,一部分是【】,另一部分是文档资料。
随机试题
某注水井测得的目前地层压力为10.3MPa,油层中部深度为878.2m,井口注水压力为11.0MPa,求注水压差。
压力越低越有利于裂解反应的进行。()
出生6个月男婴,右上腹肿瘤,高低不平,固定而质硬,未超过中线,但右侧肾门淋巴结肿大明显。AFP8μg/ml,24小时尿VMA65mg/24h。无远处转移发现。考虑诊断为
最可能诊断为经系统正规用抗生素治疗8个月,病人症状消失,尿常规:蛋白(-),RBC0~1/HP,WBC 0~2/HP。细菌培养仍然阳性,下一步如何处理最佳
儿童趋向于要自己刷牙,需要父母时常督促和帮助培养儿童建立口腔卫生习惯,掌握刷牙方法,有效地刷牙
下列哪项不是急性胰腺炎的病因
导致崩漏的常见病因病机是()
对患儿进行心肺复苏前,应迅速确定有无()
AreconstructionofanancienttreefromoneofEarth’sfirstforestsrevealsthattheplantsweretoppedwithfronds(蕨类植树物的叶子)
Manybirdsandinsectscanbuild______neststoprovideshelterfortheiryoung.
最新回复
(
0
)