首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: 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
2015-06-30
23
问题
编写如下程序:
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/u5Qp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列关于SubMain过程的叙述,正确的是
只有当一个对象的______和______属性为True,它才能获得焦点。
为了清除列表框中指定的项目,应使用的方法为
假定已在窗体上画了多个控件,并有一个控件是活动的,为了在属性窗口中设置窗体的属性,预先应执行的操作是
在关系数据库中,对一个关系做投影操作后,新关系的元组个数将
首先执行循环体,然后再进行条件判断,决定是否结束循环的循环语句是______。
在C盘当前文件夹下有一个已建立好的顺序文件Alph.txt,文件内容为只含有字母的一个字符串(有双引号界定符)。单击窗体,打开Alph.txt文件,读取字符串并显示在文本框Text1中,然后调用StrSort过程将此字符串按ASCII码的顺序重新排列并显示
表达式Right("Beijing",4)的值是()
关于MDI窗体下列说法正确的是()。
随机试题
肾上腺髓质分泌_______和_______两种激素。
患者男性,56岁,患肺痨五年,刻下症见咳嗽无力,声低懒言,痰中夹血,血色淡红,午后低热,面咣白颧红。舌嫩红有齿痕,苔薄白,脉细弱数。
会计科目代码结构是指代码共有多少级以及各级代码的长度。()
下列关于风险说法正确的是()。
深圳证券交易所规定,每个交易日(),交易主机只接受申报,但不对买卖申报或撤销申报作处理。
下列各项中,需要修订产品基本标准成本的情况有()。
A公司(上市公司)是坐落于黑龙江省的国内大型现代化农业企业,公司采用现代农业生产方式,从事特色农产品种植、加工、保鲜、冷藏及销售。公司主要产品为:鲜食粘玉米、玉米果汁、玉米粒、青贮饲料、果肉型葡萄、葡萄酒。A公司资产总额近15亿元人民币,其中存货占公司
2000—2008年,该省贸易顺差达到最大的年份是()。
试述资本国际流动的动因。[东北财经大学2013国际商务硕士]
设A,B都是n阶矩阵,并且A是可逆矩阵.证明:矩阵方程AX=B和XA=B的解相同AB=BA.
最新回复
(
0
)