VB窗体常用属性课件

Name属性设置在程序代码中用于标识窗体的名字，即在编写代码时用于称呼某个窗体。 说明：

该属性只能在设计时属性窗口中（名称）更改，运行时只读。 注：

ME是VB中的一个关键字，代表当前窗体。 2、Caption属性

语法：object．Caption=string

Caption属性设置在窗体的标题栏中的文本，当窗体被最小化时，该文本将显示在Windows的任务栏中相应窗体的图标

上。

3、ControlBox、MaxButton和MinButton属性

ControlBox、MaxButton和MinButton属性用于控件窗体是否有控制菜单和最大化、最小化按钮。默认值均为True  若将ControlBox属性设为False，则将取消窗体的控件菜单和所有的控制按钮

 若将MaxButton属性设为False，则最大化按钮将失效  若将MinButton属性设为False，则最小化按钮将失效 说明：

①、控件菜单

 为了显示控制菜单，还必须将窗体的BorderStyle属性值设置为1(固定单边框)、2(可调整的边框)或3(固定对话框)。

 相关属性的取值将决定窗体控制菜单中可以使用的命令。如：MaxButton和MinButton属性设置为False，控件菜

1

单中的最大化和最小化命令交变为无效。

 当ControlBox属性设为False时不显示控制菜单，此时窗体右上角将不显示“最大化”按钮、“最小化”按钮和“关闭”按钮。

 要在窗体中显示“最大化”按钮，应将BorderStyle属性值设置为1(固定单边框)、2(可调整的边框)，且ControlBox属性设为True。

 要在窗体中显示“最小化”按钮，应将BorderStyle属性值设置为1(固定单边框)、2(可调整的边框)，且ControlBox属性设为True。 4、BorderStyle属性

语法：object．BorderStyle=value 功能：设置对象的边框样式。 说明：

①、value是一个值或常数，用于决定边框样式。取值含义如下：

②、0(None)：无边框、无标题栏、无控制菜单、无最大化、最小化和关闭按钮

③、1(Fixed Single)：固定单边框，大小不可调，有标题栏、控件菜单及关闭按钮。

 若将MaxButton属性设置为TRUE时，添加最大化按钮  若将MinButton属性设置为TRUE时，添加最小化按钮  只能用最大化和最小化按钮改变窗体大小

④、2(Sizable(默认值))：可调整边框；有标题栏及所有控制按钮和控制菜单

 可以使用控件菜单、最大化按钮、最小化按钮或拖拽窗体的边框来改变窗体的大小

⑤、3(Fixed Dialog)固定对话框，大小不可调；有标题栏、关闭按钮和控制菜单

 不能将MaxButton和MinButton属性设置为TRUE，即不能添加最大化按钮和最小化按钮，不能改变窗体的大小。

2

⑥、4(Fixed ToolWindow)固定工具窗口；大小不可调；有标题栏、关闭按钮，无控制菜单

 不能将MaxButton和MinButton属性设置为TRUE，即不能添加最大化按钮和最小化按钮，不能改变窗体的大小。  窗体在Windows的任务栏中不显示 ⑦、5(Sizable ToolWindow )可变尺寸工具窗口；大小可调；有标题栏、关闭按钮，无控制菜单。

 不能将MaxButton和MinButton属性设置为TRUE，即不能添加最大化按钮和最小化按钮，不能改变窗体的大小。  窗体在Windows的任务栏中不显示 注：

该属性只能在设计时通过属性窗口来设置 5、BackColor、ForeColor属性 语法：object．BackColor =color object．ForeColor =color

功能：BackColor设置对象的背景色。ForeColor设置对象的前景色

 利用RGB函数表达颜色。用法：混合颜色=RGB（红色值，绿色值，蓝色值），这里的三色值均为整数，取值范围为0~255。例：form1．BackColor =RGB(178,10,26)

 利用QBColor函数表达颜色，用法：颜色=QBColor（颜色值）。颜色值为一整数，其取值 为0~15，对应颜色如下： 0——黑色 1——蓝色 2——绿色 3——青色 4——红色 5——紫红色 6——黄色 7——白色 8——灰色 9——淡蓝色 10——淡绿色 11——淡清色 12——淡红色 13——淡紫红色 14——淡黄色 15——亮白色

例：form1．BackColor =QBColor(8)

 直接使用颜色值。在VB中，可以直接用十六进制数指定颜色。另外还可以利用颜色常数来设置颜色。

3

常数 值 vbBlack 0 vbGreen FF00 对应颜色 常数 值 对应颜色 黑色 vbRed FF 红色 绿色 vbYelloFFFF 黄色 w vbBlue FF0000 蓝色 vbMagenFF00FF 紫红色 ta vbCyan FFFF00 青色 vbWhite FFFFFF 白色

6、Appearance属性

语法：object．Appearance=value

功能：设置窗体或窗体上的控件的显示效果。 说明：

①、0（Flat）：窗体及窗体上的控件显示为平面效果

②、1(3D)：窗体及窗体上的控件显示为立体效果，为默认值。 注：

在多窗体设计时，将MDIForm（多文档界面窗体）对象的Apperance属性设置为1，只对MDI父窗体产生影响。要使MDI子窗体具有立体效果，必须将每个子窗体的Appearance属性设置为1。

7、AutoRedraw属性

语法：object．AutoRedraw=boolean 功能：设置对象的自动重绘是否有效。 说明：

①、 boolean代表布尔表达式，指定是否重绘对象，设置值如下：

 True：使对象的自动重绘有效。此时对象显示到屏幕上，并以图像形式存储在内存中，必要时，用存储在内存中的图像在屏幕上对该对象进行重绘。

 False：默认值，使对象的自动重绘无效。当需要重画该对象时，VB会激活预先设定的对象绘制事件。

4

②、使用下列图形方法如Circle、Cls、Line、Point、Print和Pset工作时，AutoRedraw属性极为重要。利用这些方法，在改变对象大小或隐藏在另一个对象后又需要重新显示被隐藏部分的情况下，设置AutoRedraw为Ture，将在窗体中自动进行重绘输出。

③、设置AutoRedraw为False时，以前的显示内容成为背景的一部分，此时用CLS（清除）方法清除绘图区时不会删除背景图形；把AutoRedraw改为Ture时，使用CLS方法将清除背景图形。 8、Enabled属性

语法：object．Enabled=boolean

功能：设置窗体是否能够对键盘或鼠标产生的事件做出反应 注：

Enabled属性可以设置在程序运行时窗体对事件不做反应，此时窗体不能被改变大小和位置，对键盘鼠标操作不予接受。

9、Font属性

功能：窗体的Font属性可以决定在窗体中显示的文本（如标签、文本框等）所使用的字体。 10、Height、Width属性

语法：object．Height =number object．Width = number 功能：设置窗体的高度和宽度 说明：

①、number为数值表达式，指定窗体的外部高度和宽度，其中包括边框和标题栏。

②、使用ScaleHeight和ScaleWidth属性也可以设置窗体的高度和宽度，但是高度和宽度中不包括边框和标题栏。 11、Left和Top属性

语法：object．Left =value object．Top =value

5

功能：Left：置窗体内部的左边与它的容器的左边之间的距离。“容器”指可以含有其他对象的对象。Top：设置窗体的内侧顶边和它的容器的顶边之间的距离。 说明：

12、ScaleLeft和ScaleTop属性 语法：object．ScaleLeft =value

object．ScaleTop =value

功能：ScaleLeft设置窗体左边界的水平坐标。ScaleTop设置窗体上边界的垂直坐标。 说明：

ScaleLeft和ScaleTop属性定义的是窗体左边界和上边界的坐标，而Left和Top属性定义的是窗体左边界和上边界相对于其容器的左边界和上边界的距离，二者的含义是完全不同的。

13、Visible属性

语法：object．Visible =boolean

功能：设置一个值，用于指明窗体是否可见。 说明：

boolean代表布尔表达式，决定对象是可见的还是隐藏的，设置值如下：

 True：设置窗体（对象）是可见的（默认值）。  False：设置窗体（对象）是隐藏的。 注：

 当窗体设置为可见时，该窗体可以对键盘或鼠标事件进行响应，当窗体设置为隐藏时，该窗体对键盘和鼠标事件没有响应。

 在设计时可以在窗体的属性窗口设置Visible属性的初始值，在代码中设置该属性可以在程序运行时使窗体变为可见或隐藏。

 使用SHOW或HIDE方法也可以显示或隐藏窗体，其效果与在代码中将Visible属性设置为Ttue或False的效果相

6

同。

14、Moveable属性

语法：object．Moveable =boolean

功能：设置窗体的位置是否可以被移动。 说明：

boolean代表布尔表达式，设置对象是否可以移动，设置值如下：

 True或-1：窗体的位置可以被移动。（默认值）  False或0：窗体的位置不能被移动。 15、Icon属性

语法：object．Icon=LoadPicture(iconpath)

功能：设置程序运行时窗体处于最小化状态时显示的图标。在Windows中可以在窗体的左上角看到窗体的图标。 说明： ①、LoadPicture为装入图片函数，iconpath为LoadPicture的参数，指明被装入的图片文件的路径。

②、被装入的图片文件将作为该窗体最小化时的图标，图片文件必须有．Ico文件扩展名和格式。 16、Picture属性

语法：object．Picture=Picture 功能：设置窗体中显示的图片。 17、StartUpPosition属性

语法：object．StartUpPosition=position 功能：设置窗体首次出现时的显示位置。 说明：

Position是一个整数，设置窗体首次出现时的显示位置。设置如下：

 0：手动指定取值，窗体的初次显示位置由Left和Top属性决定。

 1：所隶属的对象的  2：屏幕

7

 3：窗口默认（屏幕的左上角） 注：

在设计时，也可以在窗体的属性窗口中单击StartUpPosition属性右边的按钮并进行设置。 18、WindowState属性

语法：object．WindowState=value

功能：设置一个数值，用来指定窗体的可视状态。 说明：

Value是一个数值表达式，用来指定窗体可视状态的取值，设置如下：

 0：窗体以设计时的大小和位置运行显示，为默认取值  1：窗体缩到最小，显示为图标状态  2：窗体放大到最大尺寸 二、窗体的事件 1、Click事件

触发条件：当用鼠标单击窗体的空白区域（无控件的区域）或单击窗体上的一个无效控件时，Click事件被触发。 语法：Private sub form_Click() 注：

 如果为Click事件编写了代码，则DbClick（双击）事件将永远不会被触发，因为Click事件总是在DbClick事件之前首先被触发。

 如果要区分操作中按下的是鼠标的左键还是右键，应使用MouseUp或MouseDown事件。 2、DbClick事件

触发条件：当用鼠标双击窗体的空白区域（无控件的区域）或双击窗体上的一个无效控件时，DbClick事件被触发。 3、Initialize事件

触发条件：当应用程序创建一个窗体时，将触发Initialize事件。

语法：Private sub form_Initialize ()

8

注：

 通过Initialize事件可以初始化窗体需要使用的数据。  窗体的Initialize事件发生在Load（装载）事件之前。 4、Load事件

触发条件：当窗体被装载时Load事件被触发。当通过Load语句启动应用程序，或调用未装载的窗体属性时，也会触发Load事件。

语法：Private sub form_Load () 注：

 Load事件过程中一般会含有一个窗体的启动代码，以便给与窗体有关的控件或变量设置取值。

 如果在代码中使用了珍上未被装载的窗体的属性，则该窗体将被自动装载但不会自动成为可视窗体。

 窗体的Load事件发生在该窗体的Initialize事件之后。 5、QueryUnload事件

触发条件：当窗体将要关闭时，QueryUnload事件触发。 语法：Private sub form_QueryUnload (cancel As Integer，unloadmode As Integer) 注：

 QueryUnload事件经常用在关闭一个应用程序之前，以便确认该应用程序中的某个窗体是否含有未完成的任务。例如：如果某一窗体中有尚未保存的数据，则可以在QueryUnload事件过程中加入相应代码以提示保存该数据。

 QueryUnload事件在窗体卸载之前发生，而Unload(卸载)事件在窗体卸载时发生。所以，窗体的QueryUnload事件发生在该窗体的Unload事件之前。 6、Unload事件

触发条件：当窗体从屏幕上删除时，Unload事件被触发。 语法：Private sub Form_Unload (cancel As Integer) 说明：

9

 Cancel表示一个整数，如果该参数的取值被设定为一个非零值，可以阻止该窗体从屏幕中被删除。如果取值为0，则该窗体将被删除。 注：

通常情况下，下列情况可以触发Unload事件：  在窗体的控制菜单上选择“关闭”选项  使用Unload语句卸载窗体

 在Windows的“任务”窗口中选择“结束任务”按钮退出应用程序

 MDI（多文档界面）子窗体随着其MDI窗体一同被关闭  当应用程序正在运行的时候退出Microsoft Windows操作环境等。

 如果cancel的取值被设置为非零值，可以阻止窗体被删除，但不能阻止其他事件。可以通过QueryUnload事件阻止其他事件。

 窗体的QueryUnload事件发生在该窗体的Unload事件之前。

 在窗体被卸载时，可以通过Unload事件过程来完成一些与该窗体卸载有关的必要操作，比如将该窗体中的数据保存到一个中。 7、MouseMove事件

触发条件：当鼠标移动时，MouseMove事件被触发。

语法：Private sub Form_MouseMove (button As Integer，shift As Integer，x As Integer，y As Single ) 说明：

①、Button指出一个用来表示鼠标各个按钮状态的整数：  1：表示鼠标左键处于按下状态  2：表示鼠标右键处于按下状态

 3：表示鼠标左键和右键同时处于按下状态  4：表示鼠标中间的按钮处于按下状态

10

②、Shift指出一个用来表示Shift、Ctrl和Alt键状态的整数

③、没有设置取值时，表示Shift、Ctrl和Alt键都没有处于按下状态

④、x，y指出鼠标指针当前位置的坐标数。 注：

 只要鼠标移动便会触发MouseMove事件，随着鼠标的移动将连续不断地产生MouseMove事件。当鼠标指针位于窗体边框范围内时，该窗体将接收MouseMove事件。

 MouseMove事件只有在鼠标移动时被触发，压下或松开鼠标按钮将触发MouseDown和MouseUp事件。 8、MouseDown和MouseUp事件

触发条件：当按下鼠标按钮时，MouseDown事件被触发；当松开鼠标按钮时， MouseUp事件被触发。 语法：

Private sub Form_MouseDown (button As Integer，shift As Integer，x As Integer，y As Single )

Private sub Form_MouseUp(button As Integer，shift As Integer，x As Integer，y As Single ) 说明：

①、Button指出一个整数，该整数表明触发MouseDown（或MouseUp）事件的鼠标按钮是左键、右键还是中间的按钮。  1：表示是鼠标左键被按下（或被松开）触发了MouseDown（或MouseUp）事件

 2：表示鼠标右键触发了MouseDown（或MouseUp）事件  4：表示鼠标中间的按钮触发了MouseDown（或MouseUp）事件

 Button的取值只能是上述取值中的一个。

②、Shift指出一个用来表示Shift、Ctrl和Alt键状态的整数

 1：表示Shift键处于按下状态

11

 2：表示Ctrl键处于按下状态  4：表示Alt键处于按下状态  5：Shift键和Alt键被同时按下

③、没有设置Shift的取值时，表示Shift、Ctrl和Alt键都没有处于按下状态

④、x，y指出鼠标指针当前位置的坐标数。 注：

 与Click和DbClick事件不同，使用MouseDown和MouseUp事件能够判断触发事件的是鼠标的左键、右键还是中间按钮，并能够为使用鼠标按钮的同时按下Shift、Ctrl或Alt键的情况编写事件过程代码

 在MouseDown和MouseUp事件中，button参数确切地指出触发事件的一个具体的鼠标按钮（触发事件时只能按下或松开一个按钮），在MouseMove事件中，button参数反映的是所有鼠标按钮的当前状态（触发事件时可以同时按下不止一个按钮）

9、Activate和Deactivate事件

触发条件：当窗体成为活动窗口时触发Activate事件。当窗体变为非活动窗口时触发Deactivate事件 语法：

Private Sub Form_Activate() Private Sub Form_Deactivate () 说明：

 用鼠标单击窗体，或者在代码中对窗体使用SHOW(显示)或SetFocus(设置焦点)等方法可以使该窗体成为活动窗体。

 只有当前窗体为可见时，Activate事件才会被触发。将窗体的Visible属性设置为True或者使用Show方法，可以使窗体可见。

 用Load语句可以加载窗体，但窗体不一定是可见的。 10、GotFocus事件

12

触发条件：当窗体获得焦点时，GotFocus事件将被触发 语法：Private Sub Form_GotFocus () 说明：

 在Windows和Windows的应用程序中，某一时刻只能有一个窗体或控件能够接收键盘输入或鼠标单击等操作，该窗体或控件以突出方式进行显示(如窗体的标题栏显示为蓝色)，此时称该窗体或控件具有焦点。

 单击窗体或在代码中使用SetFocus(改变焦点)等方法可以使窗体获得焦点。 11、LostFocus事件

触发条件：当窗体失去焦点时，LostFocus事件将被触发 语法：Private Sub Form_LostFocus () 说明：

 由于在Windows和Windows的应用程序中，某一时刻只能有一个窗体或控件具有焦点，所以当其他窗体或控件获得焦点时，原来具有焦点的窗体或控件将产生LostFocus(失去焦点)事件。 12、Paint事件

触发条件：当窗体被放大或移动以后，或当一个原本遮盖着该窗体的窗体被移开，并使该窗体部分或完全显露时，Paint事件被触发。

语法：Private Sub Form_Paint () 说明：

 当使用Refresh(刷新)方法时，会触发Paint事件，此时可以进行必要地重绘。当窗体的AutoRedraw(自动重绘)属性设置为True时，不必调用Paint事件，重新绘图将会自动进行。

 如果窗体的ClipControls属性设置为True，在窗体的Paint事件过程中使用绘图方法将影响该窗体中未被控件覆盖的所有区域。否则绘图方法仅影响该窗体刚刚显露出的区域。

13

13、Resize事件

触发条件：当窗体第一次显示或当窗体的状态发生改变(如一个窗体被最大化、最小化或还原)时，Resize事件被触发。 语法：Private Sub Form_Resize() 说明：

①、当调整窗体的大小时，可以使用Resize事件过程来调整窗体上各部件的显示位置和大小

②、在Resize事件中使用Refresh方法调用Paint事件，可以在调整窗体大小时保持图形的大小与窗体的大小成比例

③、在下列情况下，使用Resize事件比使用Paint事件可能更合适：

 移动一个窗体或控件，或者是调整其大小  调用Refresh方法

 改变与大小或外观有关的任何属性或变量的取值 14、KeyDown、KeyUp和KeyPress事件

触发条件：当控件焦点位于某对象上时，按下键盘任意键，则触发该对象上的KeyDown事件，释放该键，产生KeyUp事件，之后产生KeyPress事件。 语法：

Private Sub Form_ KeyDown (KeyCode As Integer，Shift As Integer)

Private Sub Form_ KeyUp (KeyCode As Integer，Shift As Integer)

Private Sub Form_ KeyPress (KeyAscii As Integer) 说明：

①、Shift指出一个用来表示Shift、Ctrl和Alt键状态的整数

 1：表示Shift键处于按下状态  2：表示Ctrl键处于按下状态

 3：表示Shift键和Ctrl键同时处于按下状态

14

 4：表示Alt键处于按下状态  5：Shift键和Alt键被同时按下

 6：表示Ctrl键和Alt键同时处于按下状态

 7：表示Ctrl键、Shift键和Alt键同时处于按下状态 三、窗体的方法 1、窗体的加载

语法：Load object 说明：

object表示一个对象，如窗体。 注：

 使用Load语句只能加载窗体，并不能显示窗体，因此除非在加载窗体时不需要显示窗体，否则不要对窗体使用Load语句。例如，在初始化时使用Load语句加载所有的窗体，而在必要的时候才显示这些窗体。  当一个应用程序启动时，会自动加载并显示该应用程序的启动窗体。

 当一个窗体尚未加载时，对该窗体的任何引用 (除非在Set或if…TypeOf语句中)都会自动加载该窗体。例如：使用SHOW方法显示窗体时首先会自动加载该窗体。  在加载窗体时，首先自动将窗体的各个属性设置为初始值，然后将执行窗体的Load事件过程。 2、窗体的显示

语法：object．Show 说明：

 如果调用show方法时指定的窗体还没有装载，则VB会自动装载该窗体。可见，使用show方法有自动装载窗体的功能。

 如果调用show方法时指定的窗体被其他窗体遮挡在后面，则该窗体会自动显示在最前面。

 在代码中调用show访求或都将窗体的“visible”(可见)属性设置为True，都可以使窗体可见。

15

3、窗体的隐藏

可以通过在代码中使用Hide方法来隐藏窗体。 语法：object．Hide 说明：

 使用Hide方法隐藏窗体时，窗体从屏幕上消失，同时窗体的visible属性自动设置为False

 使用Hide方法只能隐藏窗体，不能将窗体卸载。如果调用Hide方法时该窗体还没有加载，那么Hide方法会自动加载该窗体但并不予以显示。

 一个窗体被隐藏时，不能访问该窗体的控件。 4、窗体的卸载

要想卸载窗体，可以在代码中使用Unload语句。UnLoad语句具有从内存中卸载窗体的功能。 语法：UnLoad object 说明：

 当卸载窗体时，只是卸载窗体的显示部件，与该窗体模块相关联的代码依旧保存在内存中

 从内存中卸载窗体可以释放窗体占用的内存空间

 在卸载窗体的过程中，首先会触发QueryUnload事件过程，然后触发UnLoad事件过程。将事件过程的cancel参数设置为True可以阻止窗体的卸载。  当窗体被卸载后，在运行时添加到该窗体上的任何控件都不能被访问，在设计时添加到该窗体上的控件将保持不变。

 当窗体被卸载后，对窗体的任何引用(除非在Set或if…TypeOf语句中)都会自动加载该窗体。当窗体被重新加载时，在运行时对窗体属性的更改及对窗体各控件的更改将不被保留。 5、Move方法 功能：移动窗体

语法：object．Move left，top，width，height

16

说明：

 省略对象名，默认为当前窗体

 left为单精度数值，表示窗体左边框的水平坐标，即x轴坐标，该参数不可省。

 top为单精度数值，表示窗体上边框的垂直坐标，即y轴坐标，该参数可省。

 width为单精度数值，表示窗体的新宽度，该参数可省  height为单精度数值，表示窗体的新高度，该参数可省 注：

left，top，width，height参数中只有left参数是必不可少的，如果省略了某个参数，则该参数后面的所有参数都必须一同省略。

例：若没有指定top参数和width参数，就不能指定height参数。

6、Refresh方法

功能：对一个窗体进行全部重绘 语法：object．Refresh 说明：

 窗体的绘制一般是自动进行的，并不需要使用Refresh方法。如果需要窗体的显示被立即更新，就有必要使用Refresh方法。 7、SetFocus方法

功能：使窗体获得焦点 语法：object．SetFocus 说明：

 窗体调用SetFocus方法后将具有焦点，任何输入将指向该窗体

 只有可见的窗体才能具有焦点。即使窗体为可见的，当窗体的Enabled属性被设置为Flase时，也不能把焦点移到该窗体上，此时可以先将Enabled属性被设置为True然后再使用SetFocus方法使窗体获得焦点。

17

8、PopupMenu方法

功能：在窗体上的指定位置或者鼠标当前位置显示弹出式菜单

语法：[object．] PopupMenu menuname[，flags[，x[，y[，boldcommand]]]] 说明：

其中带有方括号的内容可以省略，各项内容含义如下：  menuname表示弹出式菜单的名称。注意：指定的菜单中至少含有一个菜单项

 flags指定一个数值或常数，该参数由位置常数和行为常数组成，可以定义弹出式菜单的显示位置与显示条件。  x，y指明弹出式菜单相对于指定窗体的横坐标和纵坐标，如果省略x和y，则弹出式菜单显示在鼠标指针的当前位置

 boldcommand指定在弹出式菜单中以粗体字体显示的菜单控件的名称，如果省略该参数，则弹出式菜单中没有以粗体字显示的内容。 9、print和cls

18