首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设工程文件包含两个窗体文件Form1.frm、Form2.frm及一个标准模块文件Module1.bas。两个窗体上分别只有一个名称为Command1的命令按钮。Form1的代码如下: Public x As Integer Private Sub For
设工程文件包含两个窗体文件Form1.frm、Form2.frm及一个标准模块文件Module1.bas。两个窗体上分别只有一个名称为Command1的命令按钮。Form1的代码如下: Public x As Integer Private Sub For
admin
2016-12-13
45
问题
设工程文件包含两个窗体文件Form1.frm、Form2.frm及一个标准模块文件Module1.bas。两个窗体上分别只有一个名称为Command1的命令按钮。Form1的代码如下:
Public x As Integer
Private Sub Form_Load()
x=1:y=5
End Sub
Private Sub Command1_Click()
Form2.Show
End Sub
Form2的代码如下:
Private Sub Command1_Click()
Print Form1.x,y
End Sub
Module1的代码如下:
Public y As Integer
运行以上程序,单击Form1的命令按钮Command1,则显示Form2;再单击Form2上的命令按钮Command1,则窗体上显示的是
选项
A、1 5
B、0 5
C、0 0
D、程序有错
答案
A
解析
本题考查的考点是有关变量的作用域的。本题中的y就是在标准模块中定义的全局变量,在任何一个窗体中都能应用,并在Form1中被赋值为5;x是Form1中定义的局部变量,要想在Form2中引用,必须用Form1.x格式来引用。
转载请注明原文地址:https://kaotiyun.com/show/ABGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
假定建立了一个名为Comrnandl的命令按钮数组,则下列说法中错误的是()。
对长度为n的线性表进行顺序查找,在最坏情况下所需要的比较次数为()。
下列程序的功能是:弹出一个对话框询问用户是否输出,如果是,则输出;否则结束。请填空。SubPrintOutoDimaAsIntegera=MsgBox(“输出结果?”,vblnformation+vbYesN
数据库系统的核心是()。
对如下二叉树进行后序遍历的结果为()。
在窗体上建立通用对话框需要添加的控件是()。
下面的程序的作用是利用随机函数产生10个100-300(不包含300)之间的随机整数,打印其中是7的倍数的数,并求它们的总和,请填空。SubTOF()RandomizeDimSAsDoubleDima(10
没有数组定义语句:Dima(5)AsInteger,Listl为列表框控件。下列给数组元素赋值的语句错误的是()。
表达式(7/3+1)*(18/-1)的值是______。
随机试题
患者,男,46岁。反复咳嗽、咳痰30年。突然咯血1天,量约400ml,胸CT显示右下肺支气管柱状扩张。处置中不妥的是
组成药物不含生姜、大枣的方剂是()
某肝硬化病人因饮酒后大量呕血来诊,最简便有效的止血措施为
进行施工招标必须具备的条件合法的是()。
2006年8月10日,某路桥公司与某水泥厂签订了购买水泥合同。合同中约定2006年9月1日水泥厂将水泥运至路桥公司施工现场,路桥公司验货后支付水泥款。为了保证合同的顺利履行,水泥厂要求路桥公司提供担保。于是某建筑公司作为路桥公司的保证人与水泥厂签订了保证合
“以提供建构认知结构的框架为教学的切入点”属于_____教学策略。【】
设A为3阶矩阵,β=(β1,β2,β3),β1为AX=O的解,β2不是AX=O的解,又r(AB)<min{r(A),r(B)),则r(AB)=().
ThebestbirthdayI’veeverhadwasmy21st.Myfamilytoldmetheyweregoingto【C1】______meouttodinner,butinfacttheypl
[A]addicts[B]adjustments[C]administration[D]amazing[E]bother[F]compares[G]conserves[H]constantly[I]dominant[J]eliminate[K]laun
The1920ssawtheemergenceofwidespreadcarownershipintheUnitedStates.Assembly-line【C1】______madecarswonderfullyche
最新回复
(
0
)