首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体中有一个名称为Command1的按钮,该模块内还有一个函数过程: Public Function f(x As Integer)As Integer Dim y As Integer x = 20 y = 2 f = x *
在窗体中有一个名称为Command1的按钮,该模块内还有一个函数过程: Public Function f(x As Integer)As Integer Dim y As Integer x = 20 y = 2 f = x *
admin
2015-07-01
78
问题
在窗体中有一个名称为Command1的按钮,该模块内还有一个函数过程:
Public Function f(x As Integer)As Integer
Dim y As Integer
x = 20
y = 2
f = x * y
End Function
Private Sub Command1_Click()
Dim y As Integer
Static x As Integer
x = 10
y = 5
y = f(x)
Debug.Print x; y
End Sub
打开窗体运行后,如果单击按钮,则在立即窗口上显示的内容是
选项
A、10 5
B、10 40
C、20 5
D、20 40
答案
D
解析
根据题意,用Function声明一个函数f,带有参数x。然后用Sub声明一个过程Command1_Click,在过程中声明了一个Integer变量y,和一个static变量x,为x赋值为10,为y赋值为5。调用函数f(x)赋值给y,在窗口显示x和y的值。因为x是静态变量,程序编译时会为静态变量开辟单独的内存空间;当执行语句y=f(x)时,调用函数Function f(x As Integer),实现静态变量的x按照默认传地址的方式传给函数f的变量x,即静态变量x和函数f的变量x共用同一个地址;因此当函数f的变量x被赋值20,由于共用地址,所以静态变量x的值也为20,则Debug.Print x的值为20。在f(x)函数中,为f赋值为x*y=20*2=40,因此y的值为40,因此选择D选项。
转载请注明原文地址:https://www.kaotiyun.com/show/Vdrp777K
本试题收录于:
二级Access题库NCRE全国计算机二级分类
0
二级Access
NCRE全国计算机二级
相关试题推荐
使用查询向导创建交叉表查询的数据源必须来自【】个表或查洵。
文本型字段大小的取值最大为【】个字符。
下列不属于软件调试技术的是______。
对“将信息系99年以前参加工作的教师的职称改为副教授”,合适的查询为
下列关于线性表叙述中不正确的是()。
利用对话框提示用户输入参数的查询过程称为______.
字段名可以是任意想要的名字,最多可达_____个字符。
软件工程研究的内容主要包括:【】技术和软件工程管理。
VBA编程中,要得到[15,75]上的随机整数可以用表达式【】。
若要查询某字段的值为“JSJ”的记录,在查询设计视图对应字段的准则中,错误的表达式是()。
随机试题
竣工决算报告说明书是竣工决算报告的重要组成部分,其主要内容包括()。
急性阑尾炎最典型的临床表现是()
AttheendofarecentfeastatRestaurantRevolutioninNewOrleans,Iorderedacupofhotteaandwaspresentedwithanelega
目前微机上配置的光盘多为( )。
设等差数列{an}的公差d是2,前n项的和为Sn,则=__________。
幻想是创造想象的一种特殊形式,是与人们的生活愿望相联系并指向未来的想象,有积极和消极之分。()
最近,研究人员通过筛选14.7万个化合物,发现了5种能够刺激细胞变成神经细胞形式的分子。随后,开发出了这些分子的“变异型”化合物——Isx-9。研究中,他们在培养取自啮齿动物大脑海马体部位的神经干细胞时,加入了化合物Isx-9,结果神经干细胞聚集起来并形成
有如下类定义:classBase{public:inta;protected:intb;private:intc;};classDerived:
Thoughmanyexchangestudentsundergoaperiodof______uponarrivalinthehostcountries,inashorttimetheybegintofeelmu
Somemarriagesseemtocollapsesosuddenlythatyou’dneedacrystalballtopredicttheirdemise(灭亡).Inothercases,though,
最新回复
(
0
)