首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
标准模块中有如下程序代码: Public x AS Integer,Y As Integer Sub TempSub( ) x=10:y=20 End Sub 在窗体上有1个命令按钮,并有如下事件过程: Pr
标准模块中有如下程序代码: Public x AS Integer,Y As Integer Sub TempSub( ) x=10:y=20 End Sub 在窗体上有1个命令按钮,并有如下事件过程: Pr
admin
2018-09-29
61
问题
标准模块中有如下程序代码:
Public x AS Integer,Y As Integer
Sub TempSub( )
x=10:y=20
End Sub
在窗体上有1个命令按钮,并有如下事件过程:
Private Sub Command1_Click( )
DimXAs 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/uhFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面属于白盒测试方法的是
要将单选按钮Opt1设为被选中,应设置的属性是
某系统结构图如下图所示该系统结构图的宽度是
为了向c盘根目录下的Stud.txt文件中添加数据而不破坏其原有数据,下列正确打开该文件的语句是
把数学表达式表示为正确的VB表达式应该是( )。
(1)考生文件夹下的工程文件Bjt3.vbp中有一个初始文本为空且带有垂直滚动条的文本框,其名称为Text1;两个标题分别为“读数据”和“查找”的命令按钮,其名称分别为Cmd1、Cmd2。请添加—个标题为“查找结果”的标签Labell,再添加一个名称为Te
可以产生30~50(含30和50)之间的随机整数的表达式是()。
窗体上有1个名称为Text1的文本框,1个名称为Timer1的计时器,且已在属性窗口将Timer1的Interval属性设置为2000、Enabled属性设置为False。以下程序的功能是,单击窗体,则每隔2秒钟在Text1中显示一次当前时间。Priva
设有表示公司和员工及雇佣的三张表,员工可在多家公司兼职,其中公司C(公司号,公司名,地址,注册资本,法人代表,员工数),员工S(员工号,姓名,性别,年龄,学历),雇佣E(公司号,员工号,工资,工作起始时间)。其中表C的键为公司号,表S的键为员工号,则表E的
随机试题
在Excel中,当对工作表中的数据进行移动操作时,______。
健康男婴,出生体重为3.5kg、身长为50cm、头围34cm,现在年龄为6个月,来医院做健康体检。预计该婴儿的身长应当为
孕妇末次月经为,94年5月8日,预产期是:
工作的自由时差与总时差的关系( )。
《雅典宪章》最为突出的内容就是提出了(),而且对之后城市规划的发展影响也最为深远。
组合还款法使得借款人可以在贷款期限内将本金分为几个部分,各部分采用不同还款方式。()
设事件A,B互不相容,且0<P(A)<1,则有().
Itmaybedealingwiththeworstbudgetcrunchinitshistory,butthatisnotstoppingtheNationalCancerInstitute(NCI)fromd
A、Americanindustrialists.B、Frencheconomists.C、Internationalleaders.D、CivilWarveterans.B细节题。根据Frencheconomistsproteste
ThePeakTimeforEverythingA)Couldyoupackmoreintoeachdayifyoudideverythingattheoptimaltime?Agrowingbodyof
最新回复
(
0
)