首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
某人编写了下面的程序: Private Sub Command1_Click() Dim a As Integer, b As Integer a=InputBox("请输入整数") b=InputBox("请输入整数") pr
某人编写了下面的程序: Private Sub Command1_Click() Dim a As Integer, b As Integer a=InputBox("请输入整数") b=InputBox("请输入整数") pr
admin
2018-09-19
49
问题
某人编写了下面的程序:
Private Sub Command1_Click()
Dim a As Integer, b As Integer
a=InputBox("请输入整数")
b=InputBox("请输入整数")
pro a
pro b
Call pro(a+b)
End Sub
Private Sub pro(n As Integer)
While(n>0)
Print n Mod 10;
n=n\10
Wend
Print
End Sub
此程序功能是:输入2个正整数,反序输出这2个数的每一位数字,再反序输出这2个数之和的每一位数字。例如:若输入123 和234,则应该输出:
3 2 1
4 3 2
7 5 3
但调试时发现只输出了前2行(即2个数的反序),而未输出第3行(即2个数之和的反序),程序需要修改。下面的修改方案中正确的是( )。
选项
A、把过程pro 的形式参数 n As Integer 改为 ByVal n As Integer
B、把Call pro(a+b)改为 pro a+b
C、把n=n\10 改为 n=n / 10
D、在pro b语句之后增加语句 c%=a+b ,再把 Call pro(a+b)改为 pro c
答案
A
解析
在过程定义中过程的形式参数定义时如果没有ByVal指明参数的传递方式,那么默认为地址传递,这样过程中对形参的改变将影响到实参的值。本程序中过程定义语句 Private Sub pro(n As Integer)说明形参n为按地址传递的,而在过程内语句n=n\10改变了形参的值,因此,a、b的值就不再是最初输入的值了,表达式a+b就不是期望的两个输入数的和。因此得不到正确结果。
只要把Private Sub pro(n As Integer)改为Private Sub pro(ByVal n As Integer),程序即可得到正确结果,因此A选项正确。
转载请注明原文地址:https://kaotiyun.com/show/OmFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体的单击事件过程如下:PrivateSubForm_Click()x=InputBox("InputX:")SelectCaseSgn(x)Case-1Print"y=";x*Sgn(x)
(1)在名称为Form1、标题为“考试”的窗体上添加一个名称为Combo1、初始文本为空的下拉式组合框,下拉列表中有“隶书”、“宋体”和“楷体”三个项目。程序运行后的窗体如图所示。注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjt1.vb
设工程中有2个窗体:Form1和Form2,每个窗体上都有一个名称为Text1的文本框。若希望把Form1上文本框中的内容复制到Form2上的文本框中,应进行的操作是
设窗体上有一个Text1文本框和一个HScroll1水平滚动条,并有下面的事件过程:PrivateSubHScroll1_Change()Text1=HScroll1EndSub在程序运行时,当把滚动框移动
窗体上有一个名称为Command1的命令按钮,其单击事件过程如下:OptionBase1PrivateSubCommand1_Click()Dima(4,4)AsIntegerFori=1To4
对于语句DimVar1#,Var2AsInteger,下列说法中正确的是
在窗体上画1个名称为Command1的命令按钮,1个名称为Label1的标签,然后编写如下事件过程:PrivateSubCommand1_Click()DimmAsInteger,xAsIntegerDimtagAs
(1)在名称为Form1的窗体上添加两个名称分别为Text1和Text2的文本框,它们的高、宽分别为300、2400和1200、2400。窗体的标题为“窗口”。请通过属性窗口设置适当的属性,满足如下要求:①Text2可以显示多行文本,并且有垂直和水平
在软件开发中,需求分析阶段产生的主要文档是( )。
随机试题
《关于加强社会工作专业人才队伍建设的意见》提出要积极开展社会工作专业人才队伍职业道德教育,强化社会工作专业人才的社会责任感和职业认同感。加强社会工作专业人才队伍作风建设,促使他们践行以人为本、为民解困和()的工作理念。
BoththeSenateandHousehealthcarebillsproposeincentivestoboostcorporatewellnessprogramsthataimtohelpemployeess
简述中华人民共和国地方各级人民政府的主要职权。
某企业转让一项专利权,与此有关的资料如下:该专利权的账面余额50万元,已摊销20万元,计提资产减值准备5万元,取得转让价款28万元,应交营业税1.4万元。假设不考虑其他因素,该企业应确认的转让无形资产净收益为()万元。
在Windows7中,将运行程序的窗口最小化,则该程序_______。
下列关于测量工作长度的方法中错误的是
材料相同的两根矩形截面梁叠合在一起,接触面之间可以相对滑动且无摩擦力。设两根梁的自由端共同承担集中力偶m,弯曲后两根梁的挠曲线相同,则上面梁承担的力偶矩是()。
乙类物品运输车的汽车库建筑最多为()层,且应独立建造。
依次填入下列横线处的词语,最恰当的一组是()。焦裕禄是在建设社会主义的伟大实践中涌现出来的先进_______,作为领导干部他亲民、爱民、艰苦奋斗、科学求实、迎难而上、无私奉献,他是全国党员学习的_______。
问卷调查的特点有哪些?
最新回复
(
0
)