首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
工程文件中包含一个模块文件和一个窗体文件。模块文件的程序代码是: Public x As Integer Private y As Integer 窗体文件的程序代码是: Dim a As Integer Private Sub Form_Load()
工程文件中包含一个模块文件和一个窗体文件。模块文件的程序代码是: Public x As Integer Private y As Integer 窗体文件的程序代码是: Dim a As Integer Private Sub Form_Load()
admin
2020-07-22
39
问题
工程文件中包含一个模块文件和一个窗体文件。模块文件的程序代码是:
Public x As Integer
Private y As Integer
窗体文件的程序代码是:
Dim a As Integer
Private Sub Form_Load()
Dim b As Integer
a=2:b=3:x=10:y=20
End Sub
Private Sub Command1_Click()
a=a+5:b=b+5:x=x+5:y=y+5
Print a; b; x; y
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在本窗体文本中起作用,窗体加载事件中定义的变量b和没有声明的变量y,只在本事件过程起作用。程序窗体加载时,对后边有影响的变量值为a为2,x为10,没有指定初值的变量值默认为0,因此单击命令按钮后,a=a+5=7,b=b+5=5,x=x+5=15,y=y+5=5,结果输出7 5 15 5。
转载请注明原文地址:https://kaotiyun.com/show/yDHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名称为Combol的组合框,为了引用Combol中最后一个列表项,应使用的表达式是
窗体上有1个名称为Commandl的命令按钮,事件过程如下:PrivateSubCommand1Click()Dimarr_x(5,5)AsIntegerFori=1To3Forj=2To4arr_x(i,j)=i*jNe
为了对多个控件执行操作,必须选中这些控件。下列不能选中多个控件的操作是()。
以下不属于单选按钮的属性是
按照下表建立菜单:单击菜单的事件过程如下:PrivateSubmnu1_Click(IndexAsInteger)SelectCaseIndexCase1Print"选中菜单项1"Case2Ifmnu1(2).Checked=
以下关于变量作用域的叙述中错误的是
数据库设计的根本目标是要解决
设:a=2,b=8,c=6,d=3,表达式a>bAndNot(c>d)Ord>c的值是
已知:x=-6y=39则表达式“y\x*Sgn(x)”的值为
如果一个顶级菜单项的访问键为D,则以下等同于单击该菜单项的操作为
随机试题
A.黄疸B.肝掌C.腹壁静脉曲张D.皮肤紫癜E.肝轻度肿大肝硬化失代偿期,门脉高压的表现是
狭义的新产品概念是指在一定地域内从未试制生产过的、具有一定()的产品。
钻芯法检测混凝土强度,按潮湿状态进行试验时,芯样试件在受压前应()。
项目经理的主要作用不包括()。
下列选项中,关于《城市环境卫生设施规划规范》(GB50337—2003)主要内容的说法正确的是()
甲股份有限公司(以下简称“甲公司”)2016年及2017年发生了以下交易事项:(1)2016年4月1日,甲公司以定向发行本公司2000万股普通股股票为对价,自乙公司取得A公司30%股权,并于当日向A公司派出董事,参与A公司生产经营决策。当日,甲公司发行股
土地革命战争时期,中国的红色政权能够存在与发展的客观条件有()。
有了社会契约,人们失去的是其自然的自由,以及他们愿意拿什么就拿什么的绝对的权利;通过社会契约,他们得到的是文明的自由以及对自己所拥有的财物的法定权,在权衡利弊的时候,如果要避免出现错误,我们必须清楚地辨明什么是自然的自由以及什么是文明的自由——自然的自由只
从A市到B-f订的航班每周一、二、三、五各发一班。某年2月最后一天是星期三,问当年从A市到B市的最后一次航班是星期几出发的?()
TheWorldinaGlass:SixDrinksThatChangedHistoryTomStandageurgesdrinkerstosavorthehistoryoftheirfavoritebev
最新回复
(
0
)