首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command1_Click() Dim num As Integer Dim k As Integer, n As Integer num = InputBox("请输入一个正整数:") k
编写如下程序: Private Sub Command1_Click() Dim num As Integer Dim k As Integer, n As Integer num = InputBox("请输入一个正整数:") k
admin
2020-02-27
29
问题
编写如下程序:
Private Sub Command1_Click()
Dim num As Integer
Dim k As Integer, n As Integer
num = InputBox("请输入一个正整数:")
k = num
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
程序运行后,单击命令按钮Command1,并输入数值20,则输出结果为
选项
A、2 2 5
B、2 3 4
C、2 3 4 5
D、2 5
答案
A
解析
Mod为求余函数。内层Do While循环在num Mod n 不等于0时退出。Do Loop Until循环满足n > k / 2条件时退出。执行结果选A)。
转载请注明原文地址:https://kaotiyun.com/show/M3Tp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设窗体上有1个名称为Command1的命令按钮,并编写了下面的事件过程:PrivateSubCommand1_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)
下列语句中,不能用于定义数组的关键字是()。
在数据库管理技术发展的三个阶段中,没有专门的软件对数据进行管理的是()。
某系统结构图如下图所示(n≥5)该系统结构图的最大扇出数是()。
窗体上的三个命令按钮构成名称为Command1的控件数组。如图所示。程序如下:PrivateSubCommand1_Click(IndexAsInteger)IfIndex=1ThenPrint"计算机等级考试"EndIfIfI
设窗体上有一个标签Label1和一个计时器Timer1,Timer1的Interval属性被设置为1000,Enabled属性被设置为True。要求程序运行时每秒在标签中显示一次系统当前时间。以下可以实现上述要求的事件过程是()。
能够存放组合框的所有项目内容的属性是()。
软件生命周期可分为定义阶段、开发阶段和维护阶段,下面属于定义阶段任务的是()。
要使得文件列表框File1中只显示文件扩展名为jpg的图片文件,则下列正确的语句是()。
公司中有多个部门和多名职员,每个职员只能属于一个部门,一个部门可以有多名职员。则实体部门和职员间的联系是
随机试题
治疗噎膈气虚阳微证,应首选()
下列各项中,与货币资金持有量呈反向变动关系的是()
Ourkitchenisamess.We______anycleaningforweeks.
患者男性,50岁。因旅游途中进食海鲜后1天出现右足趾及趾跖关节剧烈疼痛,伴红肿,有发热。既往发作过两次,每次发作一周左右可自行缓解,曾用过青霉素治疗效果不明显。查体:痛苦面容,呻吟。体温39.2℃,右足趾及趾跖关节红肿、压痛,局部皮温增高。血白细胞11.4
下列关于晶状体的叙述,正确的是
根据公路工程无机结合料稳定材料试验规程,进行含水率试验时,对有机质土尽量采用烘干法,并适当降低烘箱温度。()
下列可以计算建筑面积的是( )。
A公司于2×10年12月31日取得一栋写字楼并对外经营出租,取得时的入账金额为2000万元,采用成本模式计量,采用直线法按20年计提折旧,预计无残值,税法折旧与会计一致;2×12年1月1日,A公司持有的投资性房地产满足采用公允价值模式条件,2×12年1月
“巧妇难为无米之炊”,这句俗话体现的哲学含义是:
以下是系统设计应该遵循的基本原则的描述。Ⅰ.可以根据具体缺点随意更改系统功能和性能要求Ⅱ,权衡系统的投资和效益的比例Ⅲ.保证系统的效率和质量Ⅳ.体现系统的可扩展性和可适应性Ⅴ.追求利用先进的技术设计系统其中正确的有()。
最新回复
(
0
)