首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
标准模块中有如下程序代码: Public x As Integer,Y As Integer Sub var_pub() x=10:y=20 End Sub 在窗体上有1个命令按钮,并有如下事件过程: Private Sub Commandl_Cli
标准模块中有如下程序代码: Public x As Integer,Y As Integer Sub var_pub() x=10:y=20 End Sub 在窗体上有1个命令按钮,并有如下事件过程: Private Sub Commandl_Cli
admin
2020-04-18
21
问题
标准模块中有如下程序代码:
Public x As Integer,Y As Integer
Sub var_pub()
x=10:y=20
End Sub
在窗体上有1个命令按钮,并有如下事件过程:
Private Sub Commandl_Click()
Dim x As 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,调用过程var pub不会改变其值,而变量y为标准模块中声明的全局变量,调用过程vat_pub后其值为20。故最后输出结果为100和120。
转载请注明原文地址:https://jikaoti.com/ti/iox0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有如下事件过程:PrivateSubForm_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)IfButton=2ThenPopupM
设A、B、C是三角形的3条边,则以下表示"任意两边之和大于第三边"的布尔表达式是
以下数列:1.1.2.3.5.8.13.21…的规律是从第3个数开始,每个数都是其前面两个数之和。在考生文件夹下有一个工程文件sjt5.vhp。窗体中已经给出了所有控件,如图所示。请编写适当的事件过程完成如下功能:选中一个单选按钮后,单击“计算”
以下变量名中合法的是()。
以下叙述中错误的是()。
以下打开VisualBasic菜单编辑器的操作中,错误的是
设有如图所示窗体和以下程序:PirintSubCommandl_Click()Text1.Text=”VisualBasic”EndSubPrivateSubText_LostFocusOIfText1.
为了保存数据,需打开顺序文件“E:\UserData.txt”,以下正确的命令是
数据库的故障恢复一般是由()来执行恢复。
随机试题
女,28岁。停经38天,阴道出血8天,伴下腹隐痛,检查:宫颈无提痛,宫体略大,质中,附件无明显肿块及压痛,HCG(+),要求人流。人流吸出物见到下列哪一项可排除宫外孕
关于兴奋性突触传递的叙述,哪项是错误的?()
在合理工期条件下进行工程费用优化,如果缩短工期将会引起工程()。
拟建某工业项目,建设期2年,运营期8年。建设投资第1年投入2100万元,第2年投入1200万元,全部形成固定资产,固定资产投资方向调节税税率为0,固定资产使用年限为12年,到期预计净残值率为4%,按照平均年限法计算折旧。建设期贷款1600万元,贷
《上市公司行业分类指引》是在借鉴联合国国际标准产业分类、北美行业分类体系有关内容的基础上制定而成的。()
某金融机构为增值税一般纳税人,以1个季度为纳税期限,2017年第一季度发生下列业务:(1)提供贷款服务取得不含税贷款利息收入1200万元,提供货币兑换服务取得不含税收入25万元。发生人员工资支出65万元。(2)转让金融商品,卖出价10557.60万元,
同一用人单位与同一劳动者可以协商试用期的次数。()
简述新课程改革的发展趋势。
过渡时期总路线的最显著特点是
Tomakeupanobjectivetest,theteacherwritesaseriesofquestions,____________hasonlyonecorrectanswer.
最新回复
(
0
)