首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下面程序: Private Sub Form_Click() Dim x,y,z As Integer x=5 y=7 z=0 Call P1(x,y,z) Print Str(z) End Sub S
下面程序: Private Sub Form_Click() Dim x,y,z As Integer x=5 y=7 z=0 Call P1(x,y,z) Print Str(z) End Sub S
admin
2010-03-22
28
问题
下面程序:
Private Sub Form_Click()
Dim x,y,z As Integer
x=5
y=7
z=0
Call P1(x,y,z)
Print Str(z)
End Sub
Sub P1(By Val a As Integer, By Val b As Integer, c As Integer)
c=a+b
End Sub
运行后的输出结果为______。
选项
A、0
B、12
C、Str(2)
D、显示错误信息
答案
B
解析
在本题中,用Call过程名的方法调用过程P1,在P1中,将参数C的值改变为12。因为参数C是按地址传送(默认为按地址传送,即ByRef ),故z的值变为12,所以输出值为12。
转载请注明原文地址:https://kaotiyun.com/show/FNwp777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
有如下程序:#includeusingnamespacestd;classB{public:virtualvoidshow(){cout(show();}voidfun2(B&ref
使用VC6打开考生文件夹下的源程序文件modi2.cpp。请完成函数fun(intx),该函数功能是将x的值转换成二进制数输出到屏幕,并且在函数中调用写函数WriteFile()将结果输出到modi2.txt文件中。例如:x=13,13的二进制
请使用【答题】菜单命令或直接用VC6打开考生文件夹下的工程proj3,其中声明的是一个人员信息类,补充编制程序,使其功能完整。在main函数中给出了一组测试数据,此种情况下程序的输出应该是:Zhang20TsinghHa。注意:只能在函数ad
请使用VC6或使用【答题】菜单打开考生文件夹proj3下的工程proj3,其中声明的DataList类,是一个用于表示数据表的类。sort成员函数的功能是将当前数据表中的元素升序排列。请编写这个sort函数。程序的正确输出应为:排序前:7,1,3
请打开考生文件夹下的解决方案文件proj2,该工程中含有一个源程序文件proj2.cpp,请将堆栈类的定义补充完整。使程序的输出结果为:Theelementofstackare:4321注意:请勿修改主函数main和其他函数中的任何内容,
对长度为n的线性表排序,在最坏情况下,比较次数不是n(n-1)/2的排序方法是( )。
运算符函数调用格式的表达式“y/x++”与表达式“y.operator/(operator++(x,0))”的含义相同,由此可看出()。
若目前E盘根目录下不存在data.txt文件,则下列打开文件方式不会自动创建data.txt文件的是
if语句的语法格式可描述为:格式1:if()或格式2:if()else关于上面的语法格式,下列表述中错误的是()。
在VisualFoxPro的查询设计器中【】选项卡对应的SQL短语是WHERE。
随机试题
作家甲的私人书信被乙收藏。对此,下列选项正确的是
CO2通过呼吸膜扩散的速度比O2快20倍,主要原因是CO2()(1998年)
如下图所示,悬臂梁B截面的位移为,则C截面的挠度是()。
在会计核算的基本前提中,持续经营是企业会计处理方法和程序的基本前提,也是企业会计处理方法和程序保持稳定的基本前提。在借贷记账法下,账户的借方登记()。
已知某单纯投资项目的计算期为10年,项目总投资为1500万元,其中原始投资1200万元,预备费为500万元,原始投资中固定资产投资为700万元。项目建成后,固定资产采用直线法计提折旧,期末无残值,则运营期年折旧额为()万元。
商业银行的负债业务是指银行吸收资金的业务,即形成银行资金来源的业务,它包括()。
下列关于洛阳龙门石窟造像艺术风格的描述中,属于北魏造像艺术风格的是()。
设变换求常数a.
Formyproposedjourney,thefirstprioritywasclearlytostartlearningArabic.Ihaveneverbeenalinguist.ThoughIhadtra
假定有以下两个过程:Subsl(ByValxAsInteger,ByValyAsInteger)DimtAsIntegert=Xx=yy=tEndSubSubS2
最新回复
(
0
)