首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设工程文件包含两个窗体文件Form1.frm、Form2.frm及一个标准模块文件Modulel.bas。两个窗体上分别只有一个名称为Commandl的命令按钮。 Forml的代码如下: Public X As Integer Private Sub Fo
设工程文件包含两个窗体文件Form1.frm、Form2.frm及一个标准模块文件Modulel.bas。两个窗体上分别只有一个名称为Commandl的命令按钮。 Forml的代码如下: Public X As Integer Private Sub Fo
admin
2019-06-11
30
问题
设工程文件包含两个窗体文件Form1.frm、Form2.frm及一个标准模块文件Modulel.bas。两个窗体上分别只有一个名称为Commandl的命令按钮。
Forml的代码如下:
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 Form1.x,y
End Sub
Modulel的代码如下:
Public y As Integer
运行以上程序,单击Form1的命令按钮Command1,则显示Form2;再单击Form2上的命令按钮Command1,则窗体上显示的是
选项
A、l 5
B、0 5
C、0 0
D、程序有错
答案
A
解析
本题考查的考点是有关变量的作用域的。本题中的y就是在标准模块中定义的全局变量,在任何一个窗体中都能应用,并在Form1中被赋值为5;x是Form1中定义的局部变量,要想在Form2中引用,必须用Form1.x格式来引用。
转载请注明原文地址:https://jikaoti.com/ti/XAN0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设a=10,b=5,c=1,执行语句Printa>b>c窗体上显示的是
下列描述中,不符合良好程序设计风格要求的是
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。以下程序的功能是从顺序文件中读取数据:PrivateSubCommand1_Click()Dims1AsString,s2AsStringOpen"c:\d4.
在窗体上画一个名称为Commandl的命令按钮,并编写如下程序:PrivateTypeRecordIDAsInteger:NameAsString*20EndTypePrivateSubCommand1_Click()DimM
设在工程文件中有一个标准模块,其中定义了如下记录类型:TypeBooksNameAsString*10:TelNumAsString*20EndType在窗体上画一个名为Command1的命令按钮,要求当执行事件过程Command1_C
某人编写了下面的程序,希望能把Textl文本框中的内容写到out.txt文件中PPrivateSubCommand1_Click()Open"out.txt"ForOutputAs#2Print"Text1"Close#2EndSub
有三个关系R、S和T如下:则由关系R和S得到关系T的操作是
由高中数学可知,对于连续函数f(x),若f(x1)与f(x2)值的符号相反,则在x1和x2之间必存在x0,使得f(x0)=0(该点称为“零点”)。设有VB函数:PrivateFunctionf(xAsSingle)AsSingle可以返回fix)
随机试题
简述我国目前广告管理的三类法律、法规。
日用品适宜采用的分销渠道是()
建设项目需要征收农用地的,经()批准农用地转用的,同时办理征地审批手续。
CPU的主要功能是()。
发行人于债券到期前可随时通知债权人予以提前还本付息的债券是()
根据《统计法实施细则》的规定,对企业事业组织的最高罚款额为( )。
Winnie:Thesingersallactstrangely,theyshoutinsteadofsinging.Kate:______.Popularmusicisexciting.
设f(x)在[a,b]上满足|f"(x)|≤2,且f(x)在(a,b)内取到最小值.证明:|f’(a)|+|f’(b)|≤2(b一a).
A、IrisfeltBeatle’stuneswerenotoutofdate.B、Irispreferredherbrother’ship-hopssongtoBeatle’stunes.C、Irisenjoyed
A、Takemorerestbreakswhileatwork.B、Quitherjobandfindanewone.C、Askforaleavefromherboss.D、Talktoherbossdi
最新回复
(
0
)