编写如下程序： Private Sub Commandl＿Click() Dim m As Integer，n As Integer m=l：n=0 Do While m

admin2020-07-22 18

问题编写如下程序：
Private Sub Commandl＿Click()
  Dim m As Integer，n As Integer
  m=l：n=0
  Do While m<20
n=m+n
m=3*m+1
  Loop
  Print m，n
End Sub
程序运行后，单击命令按钮CommandI，输出结果为(    )。

选项 A、40 l8
B、40 19
C、20 64
D、21 64

答案A

解析循环中各变量值变化如下：
n=m+n=l+0=1，m=3*m+1=3+l=4，4小于20继续循环；
n=m+n=4+1=5，m=3*m+1=12+1=13，13小于20继续循环；
n=m+n=13+5=18，m=3*m+1=39+l=40，40不小于20，循环结束。此时m=40，n=18。

转载请注明原文地址:https://kaotiyun.com/show/OWHp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类

二级VB

NCRE全国计算机二级

相关试题推荐

下面有关标准模块的叙述中，错误的是
执行下列语句：strInput=InputBox("请输入字符串"，"字符串对话框"，"字符串")将显示示输入对话框。此时如果直接单击“确定”按钮，则变量strInput的内容是()。
假定有如下程序：PrivateSubFormClick()DimNAsInteger,JAsIntegerN=0J=1DoUntilN>2N=N+1：J=J+N*(N+1)LoopPrintN：JEndSub运行程序
有下面程序代码：PrivateSubCommandlClick()Fork：5To1Step—1X=k+x*10NextkPrintxEndSub程序运行后，单击命令按钮Commandl，输出结果是()。
命令按钮、单选按钮、复选框都可以通过Picture属性在控件上显示图片，但需事先设置某一属性，该属性为
假定已在窗体上画了多个控件，其中有一个被选中，为了在属性窗口中设置窗体的属性，预先应执行的操作是
设循环队列的存储空间为Q(1:50)，初始状态为front=rear=50。现经过一系列入队与退队操作后，front=rear=1，此后又正常地插入了两个元素。最后该队列中的元素个数为
数据库系统的三级模式不包括
将E－R图转换为关系模式时，实体和联系都可以表示为(　　)。
公司中有多个部门和多名职员，每个职员只能属于一个部门，一个部门可以有多名职员。则实体部门和职员间的联系是

随机试题

李甲与李乙是兄弟俩，李甲18岁，李乙16岁。二人某日到舞厅跳舞，李甲与张某发生口角并打了起来，李乙见状帮其兄打张某。派出所接到报警后民警赶到现场，在了解了情况后对李甲、李乙每人处以50元的罚款。张某不服，认为对李甲、李乙处罚太轻，遂向县公安局申请复议。县公
Excel2000中，使字体变粗的快捷键是
音乐艺术：民歌《茉莉花》
混凝土的耐久性能包括()。
某公司营业杠杆系数为1．5，息税前利润为225万元，资产总额为350万元，资产负债率为35％，综合债务利率为12．5％，公司的所得税税率为25％。预计5年内新增贷款500万元，期限为5年，贷款年利率为13．5％，每年付息一次，筹集费率为0．5％。现在该公司
如图，为了测量楼AB的高度，小明在点C处测得楼AB的顶端A的仰角为30°，又向前走了20米后到达点D，点B、D、C在同一条直线上，并在点D测得楼AB的顶端A的仰角为60°，求楼AB的高．
旅行：交通
简述牙买加体系的主要特点。
Whenshopkeeperswanttolurecustomersintobuyingaparticularproduct,theytypicallyofferitatadiscount.Accordingtoa
A、Watchherpartner.B、Playhercardsincooperationwithherpartner.C、Quitthegame.D、Teachthemanhowtoplaybridge.A女士说

最新回复(0)

编写如下程序： Private Sub Commandl＿Click() Dim m As Integer，n As Integer m=l：n=0 Do While m

二级VB

NCRE全国计算机二级

下面有关标准模块的叙述中，错误的是

执行下列语句：strInput=InputBox("请输入字符串"，"字符串对话框"，"字符串")将显示示输入对话框。此时如果直接单击“确定”按钮，则变量strInput的内容是()。

假定有如下程序：PrivateSubFormClick()DimNAsInteger,JAsIntegerN=0J=1DoUntilN>2N=N+1：J=J+N*(N+1)LoopPrintN：JEndSub运行程序

有下面程序代码：PrivateSubCommandlClick()Fork：5To1Step—1X=k+x*10NextkPrintxEndSub程序运行后，单击命令按钮Commandl，输出结果是()。

命令按钮、单选按钮、复选框都可以通过Picture属性在控件上显示图片，但需事先设置某一属性，该属性为

假定已在窗体上画了多个控件，其中有一个被选中，为了在属性窗口中设置窗体的属性，预先应执行的操作是

设循环队列的存储空间为Q(1:50)，初始状态为front=rear=50。现经过一系列入队与退队操作后，front=rear=1，此后又正常地插入了两个元素。最后该队列中的元素个数为

数据库系统的三级模式不包括

将E－R图转换为关系模式时，实体和联系都可以表示为( )。

公司中有多个部门和多名职员，每个职员只能属于一个部门，一个部门可以有多名职员。则实体部门和职员间的联系是

Excel2000中，使字体变粗的快捷键是

音乐艺术：民歌《茉莉花》

混凝土的耐久性能包括()。

如图，为了测量楼AB的高度，小明在点C处测得楼AB的顶端A的仰角为30°，又向前走了20米后到达点D，点B、D、C在同一条直线上，并在点D测得楼AB的顶端A的仰角为60°，求楼AB的高．

旅行：交通

简述牙买加体系的主要特点。

Whenshopkeeperswanttolurecustomersintobuyingaparticularproduct,theytypicallyofferitatadiscount.Accordingtoa

A、Watchherpartner.B、Playhercardsincooperationwithherpartner.C、Quitthegame.D、Teachthemanhowtoplaybridge.A女士说

将E－R图转换为关系模式时，实体和联系都可以表示为(　　)。