首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
工程文件中包含一个模块文件和一个窗体文件。模块文件的程序代码是:Public x As Integer Private y As Integer窗体文件的程序代码是: Dim a As Integer Private S
工程文件中包含一个模块文件和一个窗体文件。模块文件的程序代码是:Public x As Integer Private y As Integer窗体文件的程序代码是: Dim a As Integer Private S
admin
2017-04-25
45
问题
工程文件中包含一个模块文件和一个窗体文件。模块文件的程序代码是:Public x As Integer
Private y As Integer窗体文件的程序代码是:
Dim a As Integer Private Sub Command1_Click()
Private Sub Form_Load() a=a+5:b=b+5:x=x+5:y=y+5
Dim b As Integer Print a;b;x;y
a=2:b=3::x=10:y=20 End Sub
End Sub
运行程序,单击窗体上的命令按钮,则在窗体上显示的是
选项
A、5 5 15 5
B、7 5 15 25
C、7 8 15 5
D、7 5 15 5
答案
D
解析
本题中在模块文件中声明的x是全局变量,y是模块变量;在窗体中声明的a是模块级变量;在窗体的Load事件中声明了局部变量b,而且隐式声明了局部变量y;在按钮的Click事件中使用到的a是模块级变量,其值为2:b是隐式声明的局部变量,其初值为0;x是全局变量,其值为10;y也是隐式声明的局部变量,其初值为5。
转载请注明原文地址:https://kaotiyun.com/show/LUGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有如下事件过程:PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger) If(ButtonAnd3)=3Then Print"OK" End
执行以下程序段后,变量c$的值为______。a$="VisualBasicProgramming"b$="Quick"c$=b$&UCase(Mid$(a$,7,6))&Right$(d$,12)
窗体上有一个命令按钮,命令按钮的单击事件过程如下。运行程序后,单击命令按钮,输出结果是()。PrivateSubCommand1_Click()Dimaa=Array(1,2,3,4,5)Fork=1To4S=s+a(k)N
在窗体上画两个名称分别为Textl、Text2的文本框,一个名称为Labell的标签,窗体外观如图a所示。要求当改变任一个文本框的内容,就会将该文本框的内容显示在标签中,如图b所示。实现上述功能的程序如下:Priva
可以在窗休模块的通用声明段中声明_________。
下列关于多重窗体程序的叙述中,错误的是()。
窗体上有一个名称为Framel的框架(如图),若要把框架上显示的“Framel”改为汉字“框架”,下面正确的语句是
当我们输入代码时,VisualBasic可以自动检测______错误。
随机试题
企业事业单位可以自主选择一家商业银行的营业场所开立一个办理日常转账结算和现金收付的基本账户,不得开立两个以上的基本账户。()
Asanyonewhohastriedtoloseweightknows,realisticgoal-settinggenerallyproducesthebestresults.That’spartiallybecau
A.识别增强子B.识别启动子C.N端被甲基化修饰D.C端含有若干7肽重复序列E.参与DNA复制真核RNA聚合酶Ⅱ的最大亚基
下列对早产儿的护理措施,不正确的一项是()。
预制构件应进行结构性能检验。结构性能检验不合格的预制构件不得用于混凝土结构。()
逾期支付标的物的,遇价格上涨按( )执行。
国际工程合同价款计算中,关于预付款下列说法中正确的有()。【2013年真题】
灌浆深度较深,压力较大的是()。
某服装厂加工一批校服。按原工作效率生产出200套后,由于学校要求提前1天交货,服装厂需把原工作效率提高30%,才能按要求时间完成任务。如果开始生产就把原工作效率提高20%,也可以比原定时间提前1天交货。这批校服共有多少套?
Itwasamomentmostbusinessexecutiveswouldpausetosavor:latelastyear,GermansportinggoodspioneerAdidaslearnedthat
最新回复
(
0
)