首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设工程文件包含两个窗体文件Forml.frm、Form2.frm及一个标准模块文件Modulel.bas。两个窗体上分别只有一个名称为Commandl的命令按钮。Form1的代码如下: Public X As Integer Private Sub For
设工程文件包含两个窗体文件Forml.frm、Form2.frm及一个标准模块文件Modulel.bas。两个窗体上分别只有一个名称为Commandl的命令按钮。Form1的代码如下: Public X As Integer Private Sub For
admin
2018-10-18
47
问题
设工程文件包含两个窗体文件Forml.frm、Form2.frm及一个标准模块文件Modulel.bas。两个窗体上分别只有一个名称为Commandl的命令按钮。Form1的代码如下:
Public X As Integer
Private Sub Form_Load()
x=1:y=5
End Sub
Private Sub Commandl Click()
Form2.Show
End Sub
Form2的代码如下:
Private Sub Commandl—Click()
Print Forml.
选项
A、1 5
B、0 5
C、0 0
D、程序有错
答案
A
解析
本题考查的考点是有关变量的作用域的。本题中的v就是在标准模块中定义的全局变量,在任何一个窗体中都能应用,并在Form1中被赋值为5;x是Forml中定义的局部变量,要想在Form2中引用,必须用Form1.x格式来引用。
转载请注明原文地址:https://www.kaotiyun.com/show/eDFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:PrivateSubCommand1_Click()Dimn()AsIntegerDima,bAsIntegera=Inpu
设Label1、Command1、Text1、Check1分别为标签、命令按钮、文本框、复选框的名称,则以下属性设置语句中,运行时不会出错的是
下面不能作为结构化方法软件需求分析工具的是
在窗体上画两个文本框(名称分别为Text1和Text2)和一个命令按钮(名称为Command1),然后编写如下事件过程:PrivateSubCommand1_Click() x=0 DoWhilex
在窗体上画一个命令按钮和一个标签,其名称分别为Command1和Label1,然后编写如下事件过程:PrivateSubCommand1_Click() Counter=0 Fori=1To4 Forj=6To1S
在软件开发中,需求分析阶段产生的主要文档是( )。
窗体上有一个名称为Combo1的组合框,为了引用Combo1中最后一个列表项,应使用的表达式是
输入VisualBasic源程序时,若一个命令行中包含两个语句,则两个语句之间的分隔符应使用
软件按功能可以分为应用软件、系统软件和支撑软件(或工具软件)。下面属于应用软件的是( )。
在数据库中,数据模型包括数据结构、数据操作和
随机试题
下述食管疾病不形成溃疡的是
Learningasecondlanguagefuelschildren’sintelligenceandmakestheirjobprospectsbrighter.【C1】______thefactis,intheU
《化妆品卫生规范》规定一般用途化妆品中铅含量不得超过
患者男,60岁。上腹隐痛.日益加深的巩膜、皮肤发黄和皮肤瘙痒近2个月,纳差,便稀,乏力。体重减轻8kg,体检:消瘦,巩膜、皮肤明显黄染,肝肋下5cm,边缘钝,质中,无结节,无触痛,胆囊及脾均未触到,无移动性浊音。初步诊断为胰头或壶腹周围癌。关于术后
癫痫之肝肾阴虚证的治法是()。
并购重组委员会审核( ),适用《中国证券监督管理委员会上市公司并购重组审核委员会工作规程》。
工业企业各种要素费用中的税金是计入()。
由于工业废水的污染,淮河中下游水质恶化,有害物质的含量大幅度提高,这引起了多种鱼类的死亡。但由于蟹有适应污染水质的生存能力,因此,上述沿岸的捕蟹业和蟹类加工业将不会像渔业同行那样受到严重影响。以下哪项如果是真的,将严重削弱上述论证?()
对于图书管理数据库,要查询借阅了两本和两本以上图书的读者姓名和单位,请对下面的SQL语句填空:SELECT姓名,单位FROM图书管理!读者;WHERE借书证号IN(SELECT【】FROM图书管理!借阅;GROUPBY借书证号
Wheredothespeakerswork?
最新回复
(
0
)