首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
标准模块中有如下程序代码: Public x As Integer,y As Integer Sub var_pub() x=10:y=20 End Sub 在窗体上有1个命令按钮,并有如下事件过程: Private Sub Command1_Click(
标准模块中有如下程序代码: Public x As Integer,y As Integer Sub var_pub() x=10:y=20 End Sub 在窗体上有1个命令按钮,并有如下事件过程: Private Sub Command1_Click(
admin
2016-12-13
29
问题
标准模块中有如下程序代码:
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:Printx;y
End Sub
运行程序后单击命令按钮,窗体上显示的是
选项
A、100 100
B、100 120
C、110 100
D、110 120
答案
B
解析
在标准模块用Public关键字声明的全局变量,其作用域最大,可以在工程的每个模块、每个过程中使用。但当不同作用范围的变量重名时,有效范围小的变量会屏蔽有效范围大的变量。当一个全局变量与一个过程级变量重名时,当在本过程中直接使用这个变量名时,被认为是指局部变量。如果要在这个过程中使用同名的全局变量,要使用模块名来修饰变量名。
在本题的事件过程中,由于变量x被声明为过程级变量,其初始值为0,调用过程var pub不会改变其值,而变量y为标准模块中声明的全局变量,调用过程vat pub后其值为20。故最后输出结果为100和120。
转载请注明原文地址:https://jikaoti.com/ti/Mvy0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
(1)在名称为Forml的窗体上建立一个垂直滚动条,请在属性窗口中把它的名称设置为VSl,Max属性设置为50.Mill属性设置为0.Value属性设置为50。程序运行后,滚动块位于滚动条最下端,如图18—1所示,如果单击滚动条之外的窗体部分,则滚动块跳到
在算法的4个特性中,算法必须能在执行有限个步骤之后终止指的算法的_______特性。
设有以下函数过程:Functionfun(mAsInteger)AsIntegerDimkAsInteger,sumAsIntegersum=0Fork=mTo1Step-2sum
以下可以作为VisualBasic变量名的是()。
下列叙述中正确的是()。
算法复杂度主要包括时间复杂度和__________复杂度。
数据库、数据库系统和数据库管理系统之间的关系是
算法的空间复杂度是指
要建立一个随机文件记录学生的信息,如下定义的学生记录类型,由学号、姓名和5门课程成绩(百分制)组成,下列的定义正确的是()。
随机试题
A.辐散式联系B.聚合式联系C.单线式联系D.环式联系E.交互式联系能在空间上扩大作用范围的中枢神经元联系方式是
药品广告须经
甲公司与乙公司发生合同纠纷,诉至法院。法院判决甲公司赔偿乙公司经济损失15万元。但在生效判决强制执行完毕后不久,甲公司提出甲公司与乙公司之间的合同是无效合同。下列说法错误的有哪些?
某地中级人民法院审理的一起专利侵权纠纷,涉及甲乙丙丁四个人的行为。请问下列哪一行为不构成专利侵权?()
银行业从业人员的下列行为中,不符合“熟知业务”操守规定的是()。
某男,45岁,外企工作。因焦虑不安求助。求助者在外企某办事处为负责人,已十余年,薪水较高。妻子是中学教师,夫妻感情好,女儿读高中,学习优异。近一年来,生意难做,自己虽努力工作,美国老板似有不满之意,为此忧心忡忡。开始担心运货物的船只会不会沉没,有时
石油:汽油
一位海关检查员认为,他在特殊工作经历中培养了一种特殊的技能,即能够准确地判定一个人是否在欺骗他。他的根据是,在海关通道执行公务时,短短的几句对话就能使他确定对方是否可疑;而在他认为可疑的人身上,无一例外地都查出了违禁物品。以下哪项如果为真,能削弱
—Mr.Smith,youarearrestedforstealing.Pleasesignhere.—Arrested?Stealing?______.
SecretsofStrongFamiliesAgroupofAmericanmarriageandfamilycounselorsonceplacedabriefnoticeinfourdozennewsp
最新回复
(
0
)