VB教程窗体.doc
《VB教程窗体.doc》由会员分享，可在线阅读，更多相关《VB教程窗体.doc（52页珍藏版）》请在冰豆网上搜索。
VB应用教程—窗体
第四章窗体 1
4.1窗体的结构 1
4.2窗体属性 1
4.2.1窗体基本属性 1
1.名称（Name） 1
2.AutoRedraw（自动重画） 2
3.BackColor（背景色）与ForeColor（前景色） 3
4.BorderStyle属性 5
5.Height（高度）、Width（宽度）、Top（顶部）与Left（左边距）属性 5
6.Caption标题属性 6
7.字型Font属性组 7
8.Enabled（允许）（逻辑值） 8
9.Visible（可见）属性（逻辑值） 8
4.2.2窗体其他常用属性 2
4.3窗体的主要事件 3
4.3.1Activate（活动事件）与Deactivate（非活动事件） 3
4.3.2Load（装入）与UnLoad（卸载）事件 3
4.3.3Click（单击）与DblClick（双击）事件 3
4.3.4Resize事件 5
4.4窗体控制 5
4.4.1装入或卸载窗体 5
4.4.2显示和隐藏窗体 5
4.4.3Cls方法 7
4.4.4Move方法 7
4.4.5TextHeight和TextWidth 8
4.4.6位置属性CurrentX和CurrentY 8
4.4.7窗体之间的数据存取 9
4.5基本的窗体操作 10
4.5.1添加窗体：
10
4.5.2移除（清除）窗体 10
4.5.3END语句 11
4.5.4多窗体的启动（显示）顺序 11
4.6多文档程序 14
4.6.1多文档程序的建立 15
4.6.2主窗体与子窗体的标题 16
4.6.3主窗体与子窗体的菜单 17
4.7窗体设计举例 17
练习创建一个窗体 18
37
第四章窗体
[学习目标]
1.学会在应用程序中通过编程来调用和卸载工程中的窗体。
2.掌握有关窗体操作的语句和方法。
3.理解区别Unload和Hide方法。
4.了解启动窗体的概念。
[学习重点]
有关窗体操作的语句和方法。
在VB中建立一个程序主要包括两部分工作，即：
设计窗体和编写代码。
前面已对窗体做了一个简单介绍，编写VB程序首先要根据需要创建一个良好的可视化界面，因此VB程序界面是由窗体（Form）和一些必要的控件元素（Control）构成的。
由于VB属于面向对象编程，也可以将窗体、控件都称为对象。
窗体是窗体设计器窗口的简称，是应用程序面向用户的最终窗口。
窗体也是一种对象，由其属性定义外观，用方法定义其行为，通过事件设定与用户实现交互。
因此，设计窗体也就是设计一个应用程序的操作界面。
当启动一个新的工程文件时，VB自动创建一个带图标的新窗体，命名为“Form1”。
窗体内带有网点（称为网格）的窗口，这就是用户的窗体，一般也是程序运行时的主窗口。
重新对该窗体大小的调整及属性值设置等操作，称为定制窗体。
对窗体、控件的定制，在设计期间称为设计时，程序运行期间称为运行时。
4.1窗体的结构
当启动一个标准EXE程序后，窗体设计器中会出现一个默认的窗体。
可以发现它的外观大致与Windows中记事本窗口一样，其窗体右上角也有最小化、最大化、关闭三个按钮。
如图4-1所示：
图4-1
系统控件菜单：
Form1.ControlBox，点击“图标”它可以弹出控制菜单命令。
标题栏：
Form1.Caption，显示的窗口标题，如本例中的“Form1”。
最小化按钮：
Form1.MinButton。
最大化按钮：
Form1.MaxButton。
4.2窗体属性
窗体属性决定了窗体的外观，如大小、颜色和标题等。
对窗体属性设置还可以改变窗体的结构。
4.2.1窗体基本属性
1.名称（Name）
“名称”是任何对象（窗体、控件）都具有的标识名，在属性窗口定义对象（窗体、控件）名称，以便在程序中引用。
对于任何一个可以在属性窗口设置其属性的对象，必须设置该属性的值。
VB自动为每一个对象给定一个缺省值。
窗体名称“Name”，是窗体的标识名，其属性的缺省值为FormX（X为编号，从1，2，…依次顺延）。
对于给VB中所有对象（窗体、控件）“名称”命名，都应按如下规则：
1）必须以字母或汉字开头；
2）可包括字母、数字和下划线，不能有空格或标点符号；
3）最大长度为40个字符；
4）不能使用与公共对象相同的名字，例如Clipboard、Screen或App。
虽然窗体名称命名可以是一个关键字、属性名字、或别的对象的名字，但这会在代码中产生冲突，因此不要使用。
5）“名称”只具有只读属性，它只能在程序设计阶段设置，不能在运行期间改变。
名称不会显示在窗体上。
在简单的程序里，给创建的对象命名不是很必要，可以直接使用VB为每一个对象给定的缺省值（默认名称）。
但在有几十个对象（控件）的复杂窗体里，使用对象的缺省值,会让你用更多的时间去区分它们是那类控件。
为了能见名知意，提高程序可读性，VB推荐由三个小写字母的前缀和一个以第一个字母为大写的描述性单词组成的名字。
推荐的前缀见下表：
对象
前缀
例子
窗体（Form）
frm
FrmFirst
确认框（CheckBox）
chk
Chk1
组合框（ComboBox）
cbo
Cbo1
命令钮（CommandButton）
cmd
CmdExit
数据库控件（DataControl）
dat
Dat1
目录列表框（DirectoryListBox）
dir
DirTree
驱动器列表框（DriveListBox）
drv
DrvDisk
文件列表框（FileListBox）
fil
FilDocuments
框架（Frame）
fra
FraButtons
水平滚动条（HorizontalScrollBar）
hsb
HsbScroll
图形（Image）
img
Img1
标签（Label）
lbl
Lbl1
线（Line）
lin
Lin1
列表框（ListBox）
lst
Lst1
菜单（Menu）
mnu
Mnu1
选项钮（OptionButton）
opt
OptButton1
图片框（PictureBox）
pic
Pic1
几何图形（Shape）
shp
Shp1
文本框（TextBox）
txt
Txt1
垂直滚动条（VerticalScrollBar）
vsb
VsbScroll
2.AutoRedraw（自动重画）
该属性决定窗体被隐藏或被另一窗口覆盖之后，是否重新还原该窗体被隐藏或覆盖以前的画面。
即是否重画如Circle、Line、Pset和Print等方法的输出。
该属性可以通过属性窗口设置如图4-2所示，其属性值为True时，可以重新还原该窗体以前的画面;若为False时，则不重新还原。
默认属性为False。
常用于多窗体程序设计中。
该属性的设置也可以在运行时通过代码进行设置，语句格式为：
窗体名称.AutoRedraw[=Boolean]
图4-2
例如：
有两个窗体Form1和Form2，先加载窗体Form1会在窗体中央画许多同心圆，单击窗体Form1会显示窗体Form2，当单击窗体Form2时卸载窗体Form2，观察窗体Form1上画的许多同心圆有无改变。
程序如下：
PrivateSubForm_Click（）'窗体1程序
Form2.Show
EndSub
PrivateSubForm_load（） '窗体中央画许多同心圆
Form1.Show
DimX,Y,R,L
ScaleMode=3 '以像素为单位
X=Form1.ScaleWidth/2 'X位置
Y=Form1.ScaleHeight/2'Y位置
IfX>YThenL=YElseL=X
ForR=0ToL '半径
Circle（X,Y）,R,RGB（Rnd*255,Rnd*255,Rnd*255）
NextR
EndSub
PrivateSubForm_Load（）'窗体中央画许多同心圆
Form1.Show
DimR
ForR=0To10'半径
Print"sssssssssssssssssssssssssssssssssss"
NextR
EndSub
'窗体2程序
PrivateSubForm_click（）
UnloadForm2 '卸载窗体
EndSub
注：
ScaleWidth和ScaleHeight属性返回或设置“对象”（此例题“对象”是窗体）内部的水平或垂直度量单位。
ScaleMode属性，返回或设置使用图形方法或调整控件位置时一个值，该值指示对象坐标的度量单位。
3.BackColor（背景色）与ForeColor（前景色）
BackColor属性用于设置窗体的背景颜色，如图4-3所示；ForeColor属性用于设置在窗体里显示的图片或文本的颜色，即用来指定图形或文本的前景色，如图4-4所示。
图4-3图4-4
它们用十六进制数指定颜色，在语句中颜色的表现形式为：
&HBBGGRR&
说明：
它们用十六进制数指定颜色，在语句中颜色的表现形式为：
&HBBGGRR&。
BB指定蓝颜色的值，GG指定绿颜色的值，RR指定红颜色的值。
每个数段都是两位十六进制数，即从00到FF。
在程序代码中可以用Windows运行环境的红-绿-蓝（RGB）颜色方案，使用调色板或在代码中使用RGB或QBColor函数指定标准RGB颜色。
RGB函数是用来指定颜色，多数情况下用十六进制数指定颜色，分别定义了红、绿、蓝三种颜色的值。
红、绿、蓝三种成分都是用0到255（&HFF）之间的数表示。
因此，可以用十六进制数按照下述语法来指定颜色,即&HBBGGRR&。
例如：
将窗体Form1的背景色设置为红色，则可使用下面四种方法：
Form1.BackColor=RGB（255,0,0）'RGB函数
Form1.BackColor=&HFF&'用十六进制数指定颜色
Form1.BackColor=QBColor（12）'QBColor（）函数
Form1.BackColor=vbRed'VB提供的颜色常数
QBColor函数
返回一个Long数据类型，用来表示所对应颜色值的RGB颜色码。
语句格式为：
QBColor（color）
说明：
color参数代表使用于早期版本的Basic（如MicrosoftVisualBasicforMS-DOS以及BasicCompiler）的颜色值。
QBColor函数返回值指定了红、绿、蓝三原色的值，用于设置成VBA中RGB系统的对应颜色。
color参数是一个界于0到15的整型。
color参数设置值见下表：
值
颜色
值
颜色
0
黑色
8
灰色
1
兰色
9
亮兰色
2
绿色
10
亮绿色
3
青色
11
亮青色
4
红色
12
亮红色
5
洋红色
13
亮洋红色
6
黄色
升级会员 