首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
标准模块中有如下程序代码: Public x As Integer,y As Integer Sub var pub() x=10:y=20 End Sub 在窗体上有1个命令按钮,并有如下事件过程: Pri
标准模块中有如下程序代码: Public x As Integer,y As Integer Sub var pub() x=10:y=20 End Sub 在窗体上有1个命令按钮,并有如下事件过程: Pri
admin
2019-04-29
30
问题
标准模块中有如下程序代码:
Public x As Integer,y As Integer
Sub var pub()
x=10:y=20
End Sub
在窗体上有1个命令按钮,并有如下事件过程:
Private Sub Command1_Click()
Dim xAs Integer
Call var pub
x=x+100:y=y+100:Print x;y
End Sub
运行程序后单击命令按钮,窗体上显示的是
选项
A、100 100
B、100 120
C、110 100
D、110 120
答案
B
解析
在标准模块用Public关键字声明的全局变量,其作用域最大,可以在工程的每个模块、每个过程中使用。但当不同作用范围的变量重名时,有效范围小的变量会屏蔽有效范围大的变量。当一个全局变量与一个过程级变量重名时,当在本过程中直接使用这个变量名时,被认为是指局部变量。如果要在这个过程中使用同名的全局变量,要使用模块名来修饰变量名。
在本题的事件过程中,由于变量x被声明为过程级变量,其初始值为0,调用过程vat pub不会改变其值,而变量y为标准模块中声明的全局变量,调用过程var pub后其值为20。故最后输出结果为100和120。
转载请注明原文地址:https://kaotiyun.com/show/g9Up777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设工程中有Form1、Form2两个窗体,要求单击Form2上的Commandl命令按钮,Form2就可以从屏幕上消失,下面的事件过程中不能实现此功能的是
下列操作中不能向工程添加窗体的是
窗体上有一个名称为Commandl的命令按钮。要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下:PrivateSubCommandlClick()Open“c:\f1.txt”F
满足下列条件乏_的年份是闰年:1)年份能被4整除但不能被100整除2)年份能被400整除若y代表年份,下面判断闰年的正确表达式是
定时器的Interval属性的值是一个整数,它表示的是
窗体上有1个Timerl计时器,1个Shapel形状控件,还有下面程序代码:DimflagAsBooleanPrivateSubTimerl—Timer()PrivateSubFormLoad()IfflagThenflag=T
窗体上有一个名称为Textl的文本框,一个名称为Command1的命令按钮。窗体文件的程序如下:PrivateTypexaAsInteger:bAsIntegerEndTypePrivateSubCommand1Click()Di
VB中,若没有显式声明变量的数据类型,则默认的类型是
在考生文件夹下有一个工程文件sjt4.vbp。窗体上有名称为Label1的标签和名称为Timer1的计时器控件。该程序的功能是在名称为Label1的标签中循环显示不同的字符串。程序开始运行,在标签中显示“第一项”(如图3-114所示),且每隔1秒钟依次显示
随机试题
在组织变革的程序中,第一个步骤是()
男性,12岁,右足底被锈铁钉刺伤一段时间后出现乏力、头痛、打哈欠,继而有张,困难、蹙眉和苦笑面容等表现,全身肌肉阵发性痉挛,但神志一直清醒,诊断为破伤风。对该病人护理措施正确的是( )。
一淋巴结作病理切片检查,淋巴结内见成团的异型细胞,并有病理性核分裂相和角化珠形成,应诊断为
下列选项中,属于回报机制政府付费项目的是()
甲是某期货公司的经理,与乙是好友,一日甲邀请乙带家人到他家作客,乙来到甲的书房无意间看到甲的公司文件,发现有一期货交易将会使其大大获利,于是偷偷记下了这个交易名称,第二天进行该交易获利10万元,则关于甲的行为说法错误的是( )。
下列属于银行附属资本的是()。
备料管理的目标包括()。
国家工作人员挪用救灾款物归个人使用的()。
如果进栈序列为A,B,C,D,则可能的出栈序列是
Decidewhichofthechoicesgivenbelowwouldbestcompletethepassageifinsertedinthecorrespondingblanks.Markthebestc
最新回复
(
0
)