首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: 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-06-30
57
问题
编写如下程序:
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/tQHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列叙述中正确的是( )。
下面不能在信息框中输出“VisualBasic”的是()。
在考生文件夹下有一个工程文件sjt5.vbp。程序运行时,单击“装入数据”按钮,则从考生文件夹下的in5.txt文件中读入所有城市名称和距离,城市名称按顺序添加到列表框List1中,距离放到数组a中;当选中列表框中的一个城市时,它的距离就在Text1中显示
在文本框控件中,将Text的内容全部显示为用户所定义的字符的属性是()。
假定窗体上有一个标签,名为Label。为了使该标签透明并且没有边框,则正确的属性设置为()。
在考生目录下有一个工程文件sjt5.vbp,其功能是:单击“读数据”按钮,则把考生目录下的文件in5.dat中的100个整数读到数组a中;单击“计算”按钮,则找出其中与所有数的平均值(平均值截尾取整)最接近的整数,放到文本框中;单击“存盘”按钮则把计算结
VB中,若没有显式声明变量的数据类型,则默认的类型是
以下表达式与Int(3.5)的值相同的是
在VisualBasic环境下设计应用程序时,系统能自动检查出的错误是
冒泡排序在最坏情况下的比较次数是
随机试题
A.A群链球菌B.B群链球菌C.D群链球菌D.α一溶血性链球菌E.β一溶血性链球菌对杆菌肽敏感的是
患者,女,18岁。感冒后身热不甚,干咳无痰,咽干口渴,右脉数大。治疗应首选
组成核酸分子的碱基主要有A.2种B.3种C.4种D.5种E.6种
A.第2趾内侧趾甲根角旁约0.1寸B.第2趾外侧趾甲根角旁约0.1寸C.第4趾内侧趾甲根角旁约0.1寸D.第4趾外侧趾甲根角旁约0.1寸E.第3趾内侧趾甲根角旁约0.1寸足窍阴穴位于
设备安装调试合同供货人的工作是( )。
某项目部承接了2.5万t级集装箱船高桩梁板式码头预制构件的制作任务。问题:如何选择预制场地?
小学班主任王老师通过阅读其他老师的教学札记,学习到很多新的教学知识和教学观念,这种教学反思方法属于()。
{an}是一个等差数列,a3+a7-a10=8,a11-a4=4,则数列前13项之和是()。
Imagineeatingeverythingdeliciousyouwant—withnoneofthefat.Thatwouldbegreat,wouldn’tit?New"fakefat"products
Itwouldbefarbetterifcollectorscouldbepersuadedtospendtheirtimeandmoneyinsupportof_________archaeologicalrese
最新回复
(
0
)