首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command1_ Click() Dim num As Integer,k As Integer,n As Integer hum=InputBox(”请输入一个正整数:”) k=
编写如下程序: Private Sub Command1_ Click() Dim num As Integer,k As Integer,n As Integer hum=InputBox(”请输入一个正整数:”) k=
admin
2018-10-15
48
问题
编写如下程序:
Private Sub Command1_ Click()
Dim num As Integer,k As Integer,n As Integer
hum=InputBox(”请输入一个正整数:”)
k=hum n=2
Do
Do While num Mod n=0
Print n;:num=num/n
Loop
n=n+1
Loop Until n>k/2
End Sub
程序运行后,单击命令按钮Commandl,并输入数值20,则输出结果为
选项
A、2 2 5
B、2 3 4
C、2 3 4 5
D、2 5
答案
A
解析
Do型循环结构,首先看条件判断在循环体的前面还是后面,如果是先判断条件,则有可能一次也不执行循环体;如果是后判断条件,则无论条件是什么,至少执行一次循环体。在Until循环中条件为False时执行循环体,条件为True时退出循环;在While循环中条件为True时执行循环体,条件为False时退出循环。本题是一个嵌套的Do循环,外层循环是后判断条件的Until型循环,内层循环是先判断条件的While型循环。根据输入的值20可判断出三次输出的结果为2、2、5。
转载请注明原文地址:https://kaotiyun.com/show/BFFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click() DimiAsInteger,nAsInteger Fori=0To
某人编写了下面的程序,希望能把Text1文本框中的内容写到out.txt文件中:PrivateSubCommand1_Click() Open"out.txt"ForOutputAs#2 Print"Text1" Close
下面叙述中错误的是
某人在窗体模块中定义了如下自定义类型:TypeRecnumAsIntegernameAsStringEndType但发现程序不能运行,关于这一问题,下面叙述中正确的是
以下合法的VB变量名是( )。
设Label1、Command1、Text1、Check1分别为标签、命令按钮、文本框、复选框的名称,则以下属性设置语句中,运行时不会出错的是
表达式Abs(-5)+Len("abcde")的值是
设程序中有以下语句:MsgBox"Visual",,"Basic","等级考试",2执行该语句后,显示一个信息框,以下关于该信息框的叙述中,正确的是
以下能够正常结束循环操作的程序段是
以下能够正常结束循环操作的程序段是
随机试题
A.麻黄素B.普鲁卡因C.利多卡因D.肾上腺素E.丁卡因加入局麻药注射液中,可以延缓局麻药的吸收,减少吸收中毒的可能性,同时又可延长局麻药作用时间的是
A.吸血昆虫B.空气、飞沫C.饲料、水D.鼠E.伤口牛流行热的主要传播媒介是
城镇土地使用税的特点包括()。
依据《工伤保险条例》规定,享有工伤保险权利的主体是()
H股的发行方式是“公开发行”加“国际配售”。( )
根据营业税法律制度的规定,下列应税行为中,不属于增值税征收范围的是()。
新闻出版署批准设立互联网出版机构的申请后,申请者应该()。
假设检验是解决问题的首要环节。()
结合材料回答问题材料1“从许多方面来说,现在我们还是把毛泽东同志已经提出、但是没有做的事情做起来,把他反对错了的改正过来,把他没有做好的事情做好。今后相当长的时期,还是做这件事。当然,我们也有发展,而且还要继续发展。”这是邓小平1980年10月25日同
FarewellSpeech1."Specialneeds"Commonlydefinedbywhatachildcan’tdoBymilestonesunmetBy【T1】______【T1】______Byexper
最新回复
(
0
)