首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
某人编写了下面的程序 Pfivate Sub Commandl_Click() Private Sub pro(n As Integer) Dim a As Integer,b As Integer While(n>0
某人编写了下面的程序 Pfivate Sub Commandl_Click() Private Sub pro(n As Integer) Dim a As Integer,b As Integer While(n>0
admin
2019-03-08
43
问题
某人编写了下面的程序
Pfivate Sub Commandl_Click() Private Sub pro(n As Integer)
Dim a As Integer,b As Integer While(n>0)
a=InputBox("请输入整数") Print n Mod 10;n=n\10
b=InputBox("请输入整数") Wend
pro a:pro b Print
Call pro(a+b) End Sub
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
解析
本题考查的考点是有关过程调用的。本题题干中的程序之一,所以不能显示第三行的值,是由于在调用pro函数时使用的是默认的传地址调用,这时在pro过程中的对形参的更改都会影响到实参。仔细观察pro过程,发现每次循环都要对形参n整除10一直到n为0为止,所以每次pro过程调用结束后都会把对应实参改为0。修改参数传递方式为传值调用即可使程序正确运行。
转载请注明原文地址:https://kaotiyun.com/show/HlFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在名称为Frame1的框架中,有两个名称分别为op1、op2的单选按钮,标题分别为"单程"、"往返",如图所示。以下叙述中,正确的是( )。
有如下程序:PrivateSubForm_Click()DimxAsStringDimnAsIntegerx=InputBox("输入一个英文单词(全部大写)")n=Len(x)F
为了判断字符串变量ch中是否是一个大写字母,需要编写这样一个表达式:当ch中字符为大写字母时,表达式的值为True,否则为False。下面能正确实现这一目的的表达式是
以下叙述中错误的是()。
下面是VisualBasic合法变量名的是()
下列数组定义语句中错误的是
下面程序的功能是找出这样一个三位整数:它等于每位数字的阶乘之和,例如145就是这样的数(即145=1!+4!+5!)PrivateSubCommand1_Click()DimxAsInteger,iAsInteger,
下面对软件测试描述错误的是
VB中,若没有显式声明变量的数据类型,则默认的类型是
以下关于DoUntil…Loop循环的说法正确的是()。
随机试题
INFORMATIONSECURITYSPECIALIST NOTE:Pleasedirectlythroughthiswebsite
采用汉明码纠正一位差错,设信息位为K位,冗余位为r位,则K和r之间的关系应满足不等式( )。
秦汉时期,为防止匈奴进犯,在一些边关要塞处广种
简述政府公众关系的重要性。
________是直接运行在裸机上的最基本的系统软件,且任何其他软件必须在它的支持下才能运行。
1/200
在质量管理体系中,获准认证后监督管理工作的主要内容有()等。
Everyoneknowsthattoomuchtimeinthesuncanexposeyoutoexcessiveultravioletradiation,whichcanleadtoskincancers.【
下列符号中不属于C++关键字的是()。
Areyoufacingasituationthatlooksimpossibletofix?In1969,thepollutionwasterriblealongtheCuyahogaRivernearC
最新回复
(
0
)