首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设工程文件包含两个窗体文件Forml.frm、Form2.frm及一个标准模块文件Module 1.bas。两个窗体上分别只有一个名称为Commandl的命令按钮。 Forml的代码如下: Public x As Integer Priv
设工程文件包含两个窗体文件Forml.frm、Form2.frm及一个标准模块文件Module 1.bas。两个窗体上分别只有一个名称为Commandl的命令按钮。 Forml的代码如下: Public x As Integer Priv
admin
2019-03-08
46
问题
设工程文件包含两个窗体文件Forml.frm、Form2.frm及一个标准模块文件Module 1.bas。两个窗体上分别只有一个名称为Commandl的命令按钮。 Forml的代码如下:
Public x As Integer
Private Sub Form_Load()
x=1:y=5
End Sub
Private Sub Command l_Click()
Form2.Show
End Sub
Form2的代码如下:
Private Sub Command l_Click()
Print Forml.x,y
End Sub
Modulel的代码如下:
Public y As Integer
运行以上程序,单击Forml的命令按钮Commandl,则显示Form2;再单击Form2上的命令按钮Commandl,则窗体上显示的是
选项
A、1 5
B、0 5
C、0 0
D、程序有错
答案
A
解析
本题考查的考点是有关变量的作用域的。本题中的y就是在标准模块中定义的全局变量,在任何一个窗体中都能应用,并在Forml中被赋值为5;x是Forml中定义的局部变量,要想在Form2中引用,必须用Forml.x格式来引用。
转载请注明原文地址:https://kaotiyun.com/show/geFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
列表框控件List1中已有若干个列表项,以下能表示被选中列表项内容的表达式是()。
VisualBasic中,日期"1999年6月18日"的表达形式为()。
设窗体上有一个标签Label1,并编写了下面的过程PrivateSubForm_MouseMove(ButtonAsInteger,ShiftAsInteger,_XAsSing
如果一个复选框被选中,则
对于复选框和单选钮,下列叙述中正确的是
有如下程序代码:PrivateSubForm_Click()DimiAsInteger,nAsIntegerFori=0To30i=i+3n=n+1
设窗体上有一个列表框控件List1,含有若干列表项。以下能表示当前被选中的列表项内容的是()
有如下通用过程:PrivateSubSt(ByValstrXAsString,strYAsString)DimTsAsStringi=Len(strX)DoWhilei>=1
通过语句X=InputBox("输入数据","示例","0")对变体类型的变量X输入数据,程序运行后,如果在对话框的输入区中输入数值100并按回车键,则下列叙述中正确的是
在窗体上画一个名称为CommonDialog1的通用对话框,以下语句中正确的是
随机试题
通常把只改变物质的外部状态和形态,而不改变物质的组成的变化,称为()。
OnegreatbenefitoftheWebisthatitallowsustomoveinformationonlinethatnowresidesinpaperform.Severalstatesin
Canyouimaginehowyouwouldfeelifyoufelldangerouslyillandcouldnotreachorcalladoctor?Millionsofpeople【C1】__
同时破坏蛋白质表面的电荷和水化膜而使蛋白质沉淀的常用试剂是
建设项目的环境影响评价文件自批准之日起超过()年,方决定该项目开工建设的,其环境影响评价文件应当报原审批部门重新审核。
《失业保险条例》规定,城镇企事业单位职工按照个人工资的()缴纳失业保险费;用人单位缴纳的失业保险费不超过本单位工资总额的()。
按照行政层级标准来划分,我国政府机构的类型有()。
《王佐断臂》的作者是豫剧作家()。
下列关于聚集索引的说法,错误的是()。
RichDiseasesinPoorCountriesNon-communicablediseasesusedtobearich-worldproblem.Atthattime,peopleinpoorcount
最新回复
(
0
)