首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设工程文件包含两个窗体文件Form1.frm、Form2.frm及一个标准模块文件Module1.bas。两个窗体上分别只有一个名称为Command1的命令按钮。 Forml的代码如下: Public x As Integer Pr
设工程文件包含两个窗体文件Form1.frm、Form2.frm及一个标准模块文件Module1.bas。两个窗体上分别只有一个名称为Command1的命令按钮。 Forml的代码如下: Public x As Integer Pr
admin
2016-06-30
41
问题
设工程文件包含两个窗体文件Form1.frm、Form2.frm及一个标准模块文件Module1.bas。两个窗体上分别只有一个名称为Command1的命令按钮。
Forml的代码如下:
Public x As Integer
Private Sub Form—Lmad()
x=1
y=5
End Sub
Private Sub Command1_Click()
Form2.Show
End Sub
Form2的代码如下:
Private Sub Commandl_Click()
Print Forml.x,y
End Sub
Modulel的代码如下:
Public y As Integer
运行以上程序,单击Forml的命令按钮Command1,则显示Form2;再单击Form2上的命令按钮Command1,则窗体上显示的是( )。
选项
A、1 5
B、0 5
C、0 0
D、程序有错
答案
A
解析
在Forml窗体模块中x被定义为全局变量,这使得它的值可以在其他模块中通过“过程名.变量名”的形式被引用。而变量y在标准模块中被定义为全局变量,则它可以在工程的每个模块,每个过程中使用。因此程序运行时,x赋值为1,y赋值为5,它们的值都可以在:Form2中引用。
转载请注明原文地址:https://kaotiyun.com/show/ylLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个文本框,其名称为Text1,然后编写如下事件过程:PrivateSubText1_KeyPress(KeyAsciiAsInteger)DimstrAsString Str=Chr(KeyAscii)
下列事件过程的功能是:建立一个名为Datal的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为1,2,3,…,90。请在空白处填人适当的内容,将程序补充完整。PrivateTypeAng KAsInteger
以下叙述中,错误的是()。
执行以下程序段后,变量C$的值为()。A$="VisualBasicPrograming"B$="Quick"C$=B$&Ucase(Mid$(A$,7,6))&Right$(A$,11)
设用复制、粘贴的方法建立了一个命令按钮数组Command1,以下对该数组的说法错误的是
以下叙述中错误的是()。
设有数组声明语句:OptionBase1DimA(2,-1To1)以上语句所定义的数组A为______维数组,共有______个元素,第一维下标从______到______,第二维下标从______到______。下列选项
在长度为n的顺序存储的线性表中删除一个元素,最坏情况下需要移动表中的元素个数为【】。
下列二叉树描述中,正确的是()。
下图中,图1、图2是应用程序的部分界面。运行程序首先出现图1的对话框,要求用户输入口令,输入完毕后单击“确定”按钮。如果输入的口令正确,则显示图2的界面。如果输入的门令错误,则出现图3的信息框。单击图1中的“取消”按钮,则结束程序。PrivateSub
随机试题
护理坏死性小肠结肠炎患儿时宜采取的体位是
病原菌在局部生长繁殖侵入血流,不在血中繁殖,属于哪一类型感染
不是影响抗原抗体反应的因素是
关于心理应激的说法不正确的是
与普通平片相比,下列哪些是CT的优点?()
下列情形中,属于行政复议受理范围的是()。
把下面的六个图形分为两类,使每一类图形都有各自的共同特征或规律,分类正确的一项是:
WhatwillprobablyhappentotheBritishdiplomatinCongoKinshasa?
ErnestHemingwaywasoneofthe20thcentury’smostimportantwriters.Hissimple,directstylegreatlyinfluencedotherwriters
Shewouldhavebeenmoreagreeableifshehadchangedalittlebit,______?
最新回复
(
0
)