首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体中添加一个名称为Commandl的命令按钮,然后编写如下程序: Pfivme Sub f(ByVal x As Integer) x=x+4 End Sub Pfivate Sub Commandl_Click() i=3 Call f(i) Ifi
在窗体中添加一个名称为Commandl的命令按钮,然后编写如下程序: Pfivme Sub f(ByVal x As Integer) x=x+4 End Sub Pfivate Sub Commandl_Click() i=3 Call f(i) Ifi
admin
2010-07-10
38
问题
在窗体中添加一个名称为Commandl的命令按钮,然后编写如下程序:
Pfivme Sub f(ByVal x As Integer)
x=x+4
End Sub
Pfivate Sub Commandl_Click()
i=3
Call f(i)
Ifi>4 Then i=i*2
MsgBOx I
End Sub
窗体打开运行后,单击命令按钮,则消息框的输出结果为______。
选项
答案
3
解析
本题考查VBA中参数传递的知识。在VBA的过程调用时,参数有两种传递方式:传址传递和传值传递。如果在过程声明时形参用ByVal声明,说明此参数为传值调用;若用ByRef声明,说明此参数为传址调用;没有说明传递类型,则默认为传址传递。本题中在定义子过程f的时候用ByVal声明了形参x,说明为传值调用,此时对x的任何更改不会影响调用它的实参i,所以执行完Call f(i) 这条语句后i的值不变仍为 3,当然也不满足If语句的条件,故此最后输出结果为3。
转载请注明原文地址:https://kaotiyun.com/show/OBup777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
有如下程序:#includeusingnamespacestd;classTV{public:TV(ints=41):size(s){}
有如下程序段:inti=0,j=1;int&r=i;//①r=j;//②int*p=&i://③*p=&r;//其中会产生编译错误的语句是()。
请使用VC6或使用【答题】菜单打开考生文件夹proj3下的工程proj3,其中声明的CDeepCopy是一个用于表示矩阵的类。请编写这个类的赋值运算符成员函数operator=,以实现深层复制。要求:补充编制的内容写在“//******
请使用VC6或使用【答题】菜单打开考生目录proj3下的工程文件proj3,此工程包含一个源程序文件pmj3.epp,其功能是从文本文件in.dat中读取全部整数,将整数序列存放到intArray类的对象myArray中,然后对整数序列按非递减排序,最后由
在数据库设计中,将E-R图转换成关系数据模型的过程属于( )。
使用VC6打开考生文件夹proj2下的工程proj2。其中在编辑窗口内显示的主程序文件中定义有类XBase和XDerived,以及主函数main。程序文本中位于每行"//**********found**********下面的一行内有一处或多处下划线标记,
有如下类定义:classPoint{private:staticinthow_many;};how_many=0;要初始化Point类的静态成员how_many,下画线处应填入的内容是()。
负责数据库中查询操作的数据库语言是()。
全面支持软件开发过程的软件工具集合是()。
随机试题
A.酚妥拉明B.筒箭毒碱C.美加明D.哌仑西平E.阿替洛尔可以阻断M1受体的药物是
自然人的行为能力与意思能力(中南财经政法大学2007年研究生入学考试题)
涂层测厚仪检测前要校准,校准方法为()。
下列收入属于居民企业不征税收入的是()。
联觉心理:指由一种感觉引起另一种感觉变化的心理现象。下列利用了联觉心理的是()。
TheNorwegianvaultisimportantinthat______.Whichofthefollowingstatementsistrue?
简述人的全面发展必须具备的相应的社会条件。
设总体X在区间[0,θ]上服从均匀分布,其中θ>0为未知参数,而X1,…,Xn为从X中抽得的简单样本,试求θ的矩估计和最大似然估计,并问它们是否是θ的无偏估计?
下图是某局域网网络的拓扑结构,它是(4),其特点是(5)。
Thereare10blanksinthepassage.Usethewords(phrases)givenintheboxtofillintheblanks,changingtheformwherenece
最新回复
(
0
)