首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体中添加一个名称为Commandl的命令按钮,然后编写如下事件代码: Private Sub Command1_Click() Dim x As Integer,y As Integer x=12:y=32
在窗体中添加一个名称为Commandl的命令按钮,然后编写如下事件代码: Private Sub Command1_Click() Dim x As Integer,y As Integer x=12:y=32
admin
2009-08-25
114
问题
在窗体中添加一个名称为Commandl的命令按钮,然后编写如下事件代码:
Private Sub Command1_Click()
Dim x As Integer,y As Integer
x=12:y=32
Call p(x,y)
MsgBox x*y
End Sub
Public Sub p(n As Integer,By Val m As Integer)
n=n Mod 10
m=m Mod 10
End Sub
窗体打开运行后,单击命令按钮,则消息框的输出结果为【 】。
选项
答案
64
解析
子过程p有两个参数m和n,参数m,n是整型,而通过“ByVal”可知,参数m是按值传递的参数。由于在过程定义时未做参数说明的情况下,默认为传址调用,所以参数n是按址传递。 (按址传递的过程调用是将相应位置实参的地址传送给形参处理,而被调用过程内部对形参的任何操作引起的形参值的变化又会反向影响实参的值。在这个过程中,数据的传递具有双向性。)在命令按钮单击事件过程中,程序通过两个实参x,y为形参m,n赋值,“n=n Mod 10”表示12与10取余,结果为2,由于n是传址调用,所以返回实参的结果:x=2,而形式参数m因为被“ByVal”修饰,所以过程调用只是将实参y的值“单向”传送给形参 m处理,而被调用过程内部对形参m的取余操作引起的形参值的变化均不会反馈、影响实参y的值,也就是说实参y=32,通过语句“MsgBox x*y”,可以得出:x*y=2*32=64,也就是窗体打开运行后,单击命令按钮,则消息框的输出结果为64。
转载请注明原文地址:https://kaotiyun.com/show/obwp777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
有如下类定义:classTest{public:Test(){a=0;c=0;}∥①intf(inta)bonst{this->a=a;}//②staticintg()
有如下程序:#includeusingnamespacestd;classCD{public:一CD(){cout
软件测试的目的是
下面描述中不属于数据库系统特点的是
A、投影B、交C、选择D、并A用于查询的3个操作无法用传统的集合运算表示,引入的运算为投影运算、选择运算、笛卡尔积。常用的扩充运算有交、除、连接及自然连接等。投影,从关系模式中指定若干个属性组成新的关系,题目中从R中指定AB组成新的关系T,故A选项
当使用ifstream流类定义一个流对象并打开一个磁盘文件时,文件的默认打开方式为()。
在线性表的顺序存储结构中,其存储空间连续,各个元素所占的字节数
使用VC6打开考生文件夹下的源程序文件modi3.cpp,其中定义了用于表示人基本信息的类CHumanlnfo,但类CHumanlnfo的定义并不完整。请按要求完成下列操作,将类CHumanlnfo的定义补充完成:(1)定义私有数据成员blood
已知Value是一个类,value是Value的一个对象。下列以非成员函数形式重载的运算符函数原型中,正确的是()。
有关参照完整性的删除规则,正确的描述是
随机试题
根据无形资产的特点,无形资产的贬值不包括()
血中哪一种胆红素增加会在尿中出现A.未结合胆红素B.结合胆红素C.肝前胆红素D.间接胆红素E.与白蛋白结合的胆红素
A.血尿B.血红蛋白尿C.蛋白尿D.肌红蛋白尿E.糖尿羊铜中毒可发生
治疗肩周疼痛,以肩后部为重,疼痛拒按,除肩部穴外,还应选取哪经穴为主( )
徐长卿来源于()
相对于一般的目标控制措施而言,风险对策更强调()。
组合投资类理财产品的缺点在于()。
在绩效评价中,有的主管错误地认为,男性的工作能力比女性更容易受到肯定,这是()的影响。
在平面直角坐标系中,先将抛物线y=x2+x—2关于x轴进行轴对称变换,再将所得的抛物线关于y轴进行轴对称变换,那么经两次变换后所得的新抛物线的解析式为().
Thefirst10monthsoflastyearsawmorethan270,000Chineseworkersgoingabroadtowork,thePeople’sDailyOverseasEdition
最新回复
(
0
)