首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设工程文件包含两个窗体文件Form1.frm、Form2.frm及一个标准模块文件Module1.bas。两个窗体上分别只有一个名称为Command1的命令按钮。 Form1的代码如下: Public x As Integer Private Sub Fo
设工程文件包含两个窗体文件Form1.frm、Form2.frm及一个标准模块文件Module1.bas。两个窗体上分别只有一个名称为Command1的命令按钮。 Form1的代码如下: Public x As Integer Private Sub Fo
admin
2020-06-30
63
问题
设工程文件包含两个窗体文件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
解析
在Form1窗体模块中x被定义为全局变量,这使得它的值可以在其他模块中通过"过程名.变量名"的形式被引用。而变量y在标准模块中被定义为全局变量,则它可以在工程的每个模块,每个过程中使用。因此程序运行时,x赋值为1,y赋值为5,它们的值都可以在Form2中引用。
转载请注明原文地址:https://www.kaotiyun.com/show/EnHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
程序运行时,当用鼠标点击滚动条两端的箭头按钮时,不会产生的结果是
下面程序运行时,若输入395,则输出结果是()。PrivateSubCmdl_Click()Dima%a=InputBox("请输入一个3位整数")PrintaMod10,a\100,(aMod100)\10E
有下面程序代码:PrivateSubCommand1_Click()a=3s=0Fork=1To5s=s+aModka=a+kNext
以下()操作不能触发滚动条Change事件。
在窗体上画两个单选按钮,名称分别为Option1、Option2,标题分别为"宋体"和"黑体";1个复选框(名称为Check1,标题为"粗体")和1个文本框(名称为Text1,Text属性为"改变文字字体"),窗体外观如图所示。程序运行后,要求"宋体"单选
窗体上有一个名称为Command1的命令按钮,一个名称为Text1的文本框。编写如下程序:PrivateSubCommand1_Click() DimxAsInteger x=Val(InputBox("输入数据")) Text1=
将E-R图转换为关系模式时,实体和联系都可以表示为( )。
数据库系统的三级模式不包括( )。
以下能对正实数d的第3位小数四舍五入的表达式是
用树形结构表示实体之间联系的模型是
随机试题
教育者编定学科课程时需参照的要素包括【】
在一腹泻犊牛群中,伴有体温升高现象,为37~39℃。粪便直接涂片经抗酸染色后可见卵囊为玫瑰红色,圆形或椭圆形,大小4~5μm,背景为蓝绿色。卵囊着色深浅不一,染色深者内部可见4个月牙形的子孢子,多数卵囊外有一晕圈状结构。该病最有可能是
某企业为创业投资企业。2007年8月1日,该企业向境内未上市的某中小高新技术企业以股权投资的方式投资200万元。2009年度该企业利润总额890万元;未经财税部门核准,提取风险准备金10万元。已知企业所得税税率为25%。假定不考虑其他纳税调整事项,2009
南美洲丰富的水能资源主要分布于()。
人的发展是指人在生命过程中所发生的一系列()的变化过程。
隐晦:暗语
上海合作组织
求下列级数的和:
Thelawsuitfordamagesdraggedon______unfortunatelythesethingsalltoooftendo.
A、Heknowswheretogetanewmap.B、Hewillhelpthewomanreadthemap.C、Hehasalreadyseenthelibrary.D、Hewillgotothe
最新回复
(
0
)