首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: 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-07-22
43
问题
编写如下程序:
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/5RHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
为了把文本框Text1中输入的小写字母的大写形式同步显示在文本框Text2中,应该使用的事件过程是
要计算x的平方根并放入变量y,正确的语句是
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimviAsInteger,nAsIntegerFori=0To50i=i+3:
以下说法中正确的是
为了使标签Labell透明且不具有边框,以下正确的属性设置是
下面程序运行时,若输入395,则输出结果是PrivateSubCommand1_Click()Dimx%x=InputBox("请输入一个3位整数")PrintxMod10,x\100,(xMod100)\10EndSu
A、自然连接B、交C、投影D、并A关系R和关系S有公共域,关系T是通过公共域的等值进行连接的结果,符合自然连接,选A。
以下不属于VisualBasic数据文件的是
A、选择B、投影C、自然连接D、并A由关系R到关系S为一元运算,排除C和D。关系S是关系R的一部分,是通过选择之后的结果,因此选A。
对长度为n的线性表作快速排序,在最坏情况下,比较次数为
随机试题
成年人骨盆由下列哪些结构连接构成
A.孕7周内B.孕7~10周C.孕11~14周D.孕15~24周E.孕25~28周人工流产钳刮术适用于
尿液化学试带法检测时维生素C对下列哪个项目的检测不产生干扰
食管癌分型不包括
投资者按照自己的意图,在调查研究的基础上,选择和决定项目是否必要和可行。将这种在采取行动之前所做出的决定称之为()。
合同成立后,当事人依法可以将合同中的全部权利,部分权利或者合同中的全部义务,部分仪务转让或转移给第三人的法律行为是()。
不必要功能是不符合用户需求的功能,不包括( )。
根据企业所得税法律制度的规定,下列固定资产项目中,在计算应纳税所得额时.不予扣除折旧的有()。
公司经营管理发生严重困难,持有公司2/3以上股份的股东,可以请求人民法院解散公司。()
公文中兼用的基本表达方式是()。
最新回复
(
0
)