首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
标准模块中有如下程序代码: Public x As Integer,y As Integer Sub vat pub(), x=10:y=20 End Sub 在窗体上有1个命令按钮,并有如下事件过程: Private Sub Commandl Click
标准模块中有如下程序代码: Public x As Integer,y As Integer Sub vat pub(), x=10:y=20 End Sub 在窗体上有1个命令按钮,并有如下事件过程: Private Sub Commandl Click
admin
2019-07-30
53
问题
标准模块中有如下程序代码:
Public x As Integer,y As Integer
Sub vat pub(),
x=10:y=20
End Sub
在窗体上有1个命令按钮,并有如下事件过程:
Private Sub Commandl Click()
Dim x As Integer
Call vat Dub
x=x+100:y=y+100:Prim x;y
End Sub
运行程序后单击命令按钮,窗体上显示的是
选项
A、100 100
B、100 120
C、110100
D、110 120
答案
B
解析
在标准模块用Public关键字声明的全局变量,其作用域最大,可以在工程的每个模块、每个过程中使用。但当不同作用范围的变量重名时,有效范围小的变量会屏蔽有效范围大的变量。当一个全局变量与一个过程级变量重名时,当在本过程中直接使用这个变量名时,被认为是指局部变量。如果要在这个过程中使用同名的全局变量,要使用模块名来修饰变量名。在本题的事件过程中,由于变量x被声明为过程级变量,其初始值为0,调用过程vat—pub不会改变其值,而变量y为标准模块中声明的全局变量,调用过程vat pub后其值为20。故最后输出结果为100和120。
转载请注明原文地址:https://kaotiyun.com/show/FlUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画一个标签,其名称为Label1,标题为“等级考试”,BorderStyle属性为1,可以根据标题自动调整大小;然后再画一个命令按钮,其名称和标
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画出如图3—46所示的三角形。下表给出了直线Line1、Line2的坐标值,请按此表画Line1、Line2,并画出直线Line3,从而组成如图
在考生文件夹下有一个工程文件sjt5.vbp。在窗体文件中已经给出了全部控件及部分程序。程序运行时,在文本框Text1中输入一个大于2的偶数,并单击“分解为”按钮,则可以将该偶数分解为两个素数之和,且要求其中一个素数是所能够分解出的最小的素数(一个偶数有时
为了保存数据,需打开顺序文件“E:\UserData.txt”,以下正确的命令是
以下关于文件的叙述中,错误的是
设有如下Command1的单击事件过程及fun过程:PrivateSubCommand1_Click()PrivateSubfun(xAsInteger)DimxAsInteger
在窗体上画一个文本框,其名称为Text1,然后编写如下程序:OptionBase1PdvmeSubForm_Click()DimArr(10)AsIntegerFori=6To10An(i)=i-3
设a=10,b=4,c=5,d=7,表达式a>bAndNotc
设a=2,b=3,c=4,d=5,下列表达式的值是a>bAndcc
随机试题
按照账页格式分类,账簿可以分为()
“寒热”是
高血压急症的特征是
甲今年17岁。在一次盗窃案中,为他人放风,且在盗窃后分得赃款500元,但这一事件被其母发现,动员甲投案自首,甲即在当日由母亲陪同到公安局自首归案,并退回赃款,还向公安机关揭发了同案犯的犯罪事实。请问人民法院应如何对甲进行判处?()
下列哪类住宅可以不进行无障碍设计?
(2012年)企业进行固定制造费用差异分析时可以使用三因素分析法。下列关于三因素分析法的说法中,正确的是()。
在大多数情况下,不是影响战略计划系统设计的主要因素是()。
简述担保物权的特征。[首师大2012年研]
如果删除一个非零尤符号二进制偶整数后的2个0,则此数的值为原数()。
DriedFoodsCenturiesago,mandiscoveredthatremovingmoisture(51)foodhelpedtopreserveit,andthattheeasiestwaytod
最新回复
(
0
)