首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Private Sub Command 1 Click() Dim mAs Integer,nAs Integer m=1:n=0 Do While m
编写如下程序: Private Sub Command 1 Click() Dim mAs Integer,nAs Integer m=1:n=0 Do While m
admin
2015-05-29
30
问题
编写如下程序:
Private Sub Command 1 Click()
Dim mAs Integer,nAs Integer
m=1:n=0
Do While m<20
n=m+n:m=3*m+1
Loop
Print m,n
End Sub
程序运行后,单击命令按钮Command1,输出结果为
选项
A、40 18
B、40 19
C、20 64
D、21 64
答案
A
解析
本题的Do循环是一个先判断条件型的循环,在循环中将循环变量m的值每次改变。分析循环可看出,在4次循环中m的值分别为1、4、13、40,而只有前三次循环中的m值被累加到n中,最后一次循环由于不满足m<20而跳出。
转载请注明原文地址:https://kaotiyun.com/show/SRQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上添加一个文本框,名为Textl,然后编写如下的Load事件过程,则程序的运行结果是PrivateSubForm_Load()Text1.Text=""Text1.Setfocust=1Fork=10
有以下函数过程:FunctionGys(ByValxAsInteger,ByValyAsInteger)AsIntegerDoWhiley<>0Reminder=
程序运行后,在窗体上单击鼠标,此时窗体不会接收到的事件是
设有一个10个元素的数组,下列程序将该数组的第一个元素与第十个元素交换,第二个元素与第九个元素交换……,第五个元素与第六个元素交换,请补充完该程序。PrivateSubCommnd1_Click()Dima(1
目前,有两种重要的高级语言,分别是结构化程序和【】。
以下用户自定义函数FunctionFunc(aAsInteger,bAsInteger)AsIntegerStaticmAsInteger,iAsIntegerm=0:i=2
在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:PrivateSubCommand1_Click()Dima(5,5)Fori=1To3
下列程序运行时输出的结果是OptionBase1PrivateSubForm_Click()Dimx(10)AsInteger,y(5)AsIntegerFori=1to10
随机试题
大气一次污染物是指直接从污染源排放到大气中的有害物质。最常见的一次污染物有()、()、()及颗粒物。
HowdidWaltWhitmanmakeuseofthepoetic"I"inhisworks?
不适用于治疗慢性脓胸的术式是
A.乌梅与阿司匹林B.乌贝散与头孢拉定C.石膏与四环素D.麻黄与呋喃唑酮E.大黄与利福平能减少药物排泄的中西药联用药组是()。
A、膈下游离气体B、鹰嘴样阴影C、杯口状阴影D、肿瘤状阴影E、大小肠均胀气乙状结肠扭转的X线表现
在人生周期中,以保守稳健型投资为主的时期是()。
企业发生会计估计变更时,下列各项目中,不需要在会计报表附注中披露的是()。
当物体触及掌心,新生儿立即把它紧紧捏住,这是新生儿的()
A、 B、 C、 D、 C此题的解题思路为图形的组成部分位置变化。第一组图形中第一个图形外面的直线逆时针移动,每次移动图形的一个相邻边得到第二个图形,第二个图形也依此规律将边外的直线逆时针移动得到第三个图形。
Theamazingsuccessofhumansasaspeciesistheresultoftheevolutionarydevelopmentofourbrainswhichhassledtotool-usi
最新回复
(
0
)