首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
标准模块中有如下程序代码: Public x As Integer,Y As Integer Sub TempSub() x=10:y=20 End Sub 在窗体上有1个命令按钮,并有如下事件过程: Pri
标准模块中有如下程序代码: Public x As Integer,Y As Integer Sub TempSub() x=10:y=20 End Sub 在窗体上有1个命令按钮,并有如下事件过程: Pri
admin
2018-09-19
53
问题
标准模块中有如下程序代码:
Public x As Integer,Y As Integer
Sub TempSub()
x=10:y=20
End Sub
在窗体上有1个命令按钮,并有如下事件过程:
Private Sub Command1_Click()
Dim xAs Integer
Call TempSub
x=x+100:y=y+100
Print x;y
End Sub
运行程序后单击命令按钮,窗体上显示的是( )。
选项
A、110 100
B、100 100
C、100 120
D、110 120
答案
C
解析
在标准模块用Public关键字声明的全局变量,其作用域最大,可以在工程的每个模块、每个过程中使用。但当不同作用范围的变量重名时,有效范围小的变量会屏蔽有效范围大的变量。当一个全局变量与一个过程级变量重名时,当在本过程中直接使用这个变量名时,被认为是指局部变量。如果要在这个过程中使用同名的全局变量,要使用模块名来修饰变量名。
在本题的事件过程中,由于变量x被声明为过程级变量,其初始值为0,调用过程TempSub不会改变其值,而变量y为标准模块中声明的全局变量,调用过程TempSub后其值为20。故最后输出结果为100和120。
转载请注明原文地址:https://kaotiyun.com/show/DnFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在考生文件夹下有一个工程文件sjt5.vbp,窗体上有三个文本框,其名称分别为Text1、Text2和Text3,其中Text1、Text2可多行显示。请添加三个命令按钮,名称分别为Cmdl、Cmd2和Cmd3,标题分别为“产生数组”、“统计”和“退出”,
(1)在名称为Form1、标题为“鼠标光标形状”的窗体上添加一个文本框,名称为Text1。请通过属性窗口设置适当属性,使得程序运行时,鼠标在文本框中时,鼠标光标为箭头(Arrow)形状;在窗体中其他位置处,鼠标光标为十字(Cross)形状。注意:
数据流图中带有箭头的线段表示的是( )。
下列关于栈的叙述中,正确的是
下面列表框属性中,是数组的是( )。
(1)在名称为Forml的窗体上添加一个名称为Shapel的形状控件,通过设置参数使其形状为圆形;添加一个名称为Labell的标签,标题为“形状”,标签的大小能够根据标签内容的字数、大小而定;添加一个名称为Textl的文本框,文本框最多能够显示5个字符,文
下面不属于软件设计阶段任务的是
软件生命周期是指( )。
已知在4行3列的全局数组score(4,3)中存放了4个学生3门课程的考试成绩(均为整数)。现需要计算每个学生的总分,某人编写程序如下:OptionBase1PrivateSubCommand1_Click() DimsumAsInt
线性表的链式存储结构与顺序存储结构相比,链式存储结构的优点有
随机试题
作业动因是引起作业成本变动的驱动因素,反映产品产量与作业成本之间的因果关系。()
在管理思想史上,马克斯.韦伯被誉为【】
Intheearly1960sWiltChamberlainwasoneofonlythreeplayersintheNationalBasketballAssociation(NBA)listedatoverseve
关于肾肿瘤行肾部分切除术的原则,以下说法中正确的是
某企业年销货成本100万,年初存货为100万,年末存货60万,该企业年初资产5000万,年末资产5200万,年销售收入为10200万,如果该企业的销售收入为1000万元,销售成本700万元,税率为40%,下列关于市盈率的描述错误的是()
机构法人买卖基金单位获得的差价收入应缴纳所得税。()
陶冶法是通过创设良好的情境,潜移默化地培养学生品德的方法,主要包括()
在计算机中,既可作为输入设备又可作为输出设备的是
Editor’sWelcomeWelcometoStreetLife’sliveandintimatecelebrationofthe200theditionof【K10】______.Inthenextfewpage
LetterOne
最新回复
(
0
)