首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序: Private Sub f(ByVal x As Integer) x=x十4 End Sub Private Sub Command1 Click(
在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序: Private Sub f(ByVal x As Integer) x=x十4 End Sub Private Sub Command1 Click(
admin
2013-01-07
43
问题
在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序:
Private Sub f(ByVal x As Integer)
x=x十4
End Sub
Private Sub Command1 Click()
i=3
Call f(i)
If i>4 Then i=i*2
Msgbox i
End Sub
窗体打开运行后,单击命令按钮,则消息框的输出结果为________。
选项
答案
3
解析
在VBA的过程调用时,参数有两种传递方式:传址传递和传值传递。如果在过程声明时形参用ByVal声明,说明此参数为传值调用;若用ByRef声明,说明此参数为传址调用;没有说明传递类型,则默认为传址传递。本题中在定义子过程f的时候用ByVal声明了形参x,说明为传值调用,此时对x的任何更改不会影响调用它的实参i,所以执行完Call(f)语句后i的值为3不变。当然也不满足If条件,所以本题结果为3。
转载请注明原文地址:https://kaotiyun.com/show/I3up777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
有如下程序:#includeusingnamespacestd;intmain(){voidfunction(doubleval);doubleval;function(val);cout
if语句的语法格式可描述为:格式1:if()或格式2:if()else关于上面的语法格式,下列表述中错误的是()。
请使用VC6或使用【答题】菜单打开考生文件夹proj1下的工程proj1,该工程中含有一个源程序文件proj1.cpp。其中位于每个注释“//ERROR****found****”之后的一行语句有错误。请改正这些错误,使程序的输出结果为:123
下列for循环的循环体执行次数为()。for(inti(0)j(10);i=j=4;i++j--)
将测试数据传送给被测试的模块,并显示被测试模块所产生的结果是()的作用。
使用VC6打开考生文件夹下的源程序文件modi2.cpp。阅读下列函数说明和代码,完成空出部分程序。函数sum(intA[NUM][NUM],intn)实现的功能是计算矩阵中所有非质数数字的和。提示:函数isPrime(intn)的功能是判定
有如下程序:#includeusingnamespacestd;intmain(){int*p;*p=9;cout
下列有关指针的用法中,错误的是()。
if语句的语法格式可描述为:格式1:if()或格式2:if()else关于上面的语法格式,下列表述中错误的是()。
已知表达式--a中的"--"是作为成员函数重载的运算符,则与--a等效的运算符函数调用形式为
随机试题
Exercise,everyoneadvises!Butimmediately,whenyoutry,yourunintotrouble.Thereissomuchcontradictory,sometimesincor
附子回阳救逆常配
关于噪声污染的现场检查,下列说法正确的有()。
在Excel中,关于数据的手工录入,下列说法正确的有()。
下列信息传递的实例中,属于调节物种间关系的是()。
《中华人民共和国教师法》第二十四条规定,教师_______结果是受聘任教、晋升工资、实施奖惩的依据。
自我防御机制最早由()系统地加以论述。
Theanti-cholesteroldrugPhisorhasyettobeapprovedforusein______withpharmaceuticalsthattreatheartdisease.
HowlongdidLourdesSantiagoworkatPascalBusinessSystem?Whatcouldhedotohelpsupportthefieldmarketingrepresentati
A、TheyprotectArgentineantsthatliveinneighboringnests.B、TheygatherfoodwithArgentineantsfromothernests.C、Theyfi
最新回复
(
0
)