VisualBasic 程序设计第6章

6.1.1 窗体
窗体是容纳控件的容器，通过在窗体上添加 各种各样的控件，才能设计出具有交互功能的友 好界面。作为Visual Basic 6.0常有对象之一，窗 体有着自己独有的属性、事件和方法。 窗体常用属性 ① 【名称】属性。 • 功能：返回或设置窗体的名字。 • 说明：【名称】属性就如同控件的“姓名”， 通过该“姓名”便可以访问窗体。
窗体的删除 在程序设计阶段，如果想删除某个窗体，方 法如下。 ① 在【工程】面板中单击想要删除窗体对应 的图标。 ② 在图标上单击鼠标右键，在弹出的快捷菜 单中选择【移除窗体】命令。 ③ 如果窗体被修改过，则会弹出如图6-3所示 的保存窗体提示框，单击按钮 ，则在删 除窗体的同时保存窗体；单击按钮 ，则 在删除窗体的同时不保存窗体。 ④ 如果窗体未被修改过，则直接删除窗体。
• •
• •
窗体常用事件 Load事件 窗体最常用事件，双击窗体的空白处便可以为窗体添 加该事件，常用来初始化变量或控件的位置。 鼠标事件 窗体和大多数控件都能响应的事件，包括单击（Click） 事件、双击（DblClick）事件、鼠标按下 （MouseDown）事件、鼠标弹起（MouseUp）事件、 鼠标移动（MouseMove）事件等，各事件的语法结构 如下：
Click事件是鼠标事件中应用最广的事件，大多数控 件包括窗体都能响应该事件。在控件或窗体上单击鼠标， 便会激发Click事件；在控件或窗体上按下鼠标，便会激 发MouseDown事件；松开鼠标，便会激发MouseUp事件； 在控件或窗体上移动鼠标，便会激发MouseMove事件。 MouseDown事件、MouseUp事件和MouseMove事件都含 有相同的事件参数：“Button”、“Shift”、“X”和“Y”。 其中“Button”，“X”和“Y”3个参数最为常用，各参数
当在窗体或控件上按下键盘上的某个键时，除了激发 KeyPress事件之外，还会激发KeyDown事件；松开所按 下的键时，便会激发KeyUp事件。在这3个事件中，都有 一个用来获取当前所按键键码的参数，KeyPress事件获 取的是按键上字符的ASCII，即“KeyAsciic”参数；而 KeyDown、KeyUp事件获取的是按键的扫描码，即 “KeyCode”参数。
Hide方法 语法结构如下： 窗体名.Hide 使用Hide方法只是将窗体隐藏起来，即在屏 幕上看不到窗体，但与窗体有关的代码还在 继续执行。 除了以上两种常用方法之外，窗体还支持一 些绘图方法，这将在以后章节进行介绍。
窗体的添加和删除 窗体的添加 在启动Visual Basic时，默认情况下，系统会自动为 程序添加一个窗体，用户也可以向程序中添加多个窗体， 添加方法如下 。 ① 选择【工程】/【添加窗体】命令，弹出如图6-1所示 的【添加窗体】对话框。 ② 单击窗体列表框中的窗体，默认情况下，标准窗体被 选中。也可以切换到【现存】选项卡，然后选择已经存 在的窗体。 ③ 选中窗体后，单击按钮 ，便向程序中添加了一个 新的窗体，这时的【工程】面板如图6-2所示。 在程序运行时如果想显示或隐藏某个窗体，可使用Show 方法或Hide方法。
第6章 窗体和常用控件
6.1
知识解析
案例1——双色球自动选号程序
6.2
6.3
案例2——简单通讯录设计
6.4
案例3——计算器设计
案例4——简单考试系统设计
6.5
6.1 知识解析
用Visual Basic 6.0来设计程序的方法和画画类似。在 画画之前，首先要了解画布的性质，如颜色、纸张特性 等，然后再在画布上画一些图案，如人、动物、植物等， 而在画画的过程中，要对每个图案的特点（如颜色、姿 势等）做到心中有数。控件可看做是画中的图案，是用 户界面最基本的组成元素，而窗体可看做是画布，是容 纳控件的容器。要设计一个完美的程序界面，除了要了 解窗体的属性之外，对每个控件的属性也必须熟悉。当 然，在画布上画出的画是静止的，而设计的程序是“活 动”的，要让程序能够“动起来”，还必须灵活使用窗 体和控件事件。
②【Appearance】属性。 功能：返回或设置窗体的的外观样式。 说明：【Appearance】属性有两个取值：0或1。【Appearance】 属性为0时，表示将窗体的外观设为平面的样式；【Appearance】属 性为1时，表示将窗体的外观设为三维的样式。 ③【BackColor】属性。 功能：返回或设置窗体背景的颜色。 说明：设置【BackColor】属性将会直接改变窗体的底色。 ④【Caption】属性。 功能：返回或设置窗体标题栏中所显示的文字。
的说明如下。
“Button”参数 Button”是一个整型参数，用来获取用户所 按下的鼠标键，其取值如表6-1所示。 “X”、“Y”参数 X”、“Y”参数用于记录鼠标指针所在的位 置，其中“X”参数记录指针的横坐标，“Y” 参数记录指针的纵坐标。
键盘事件
窗体和大多数控件都能响应的事件，包括按键 （KeyPress）事件、键按下（KeyDown）事件、键
知识链接
窗体常用方法 窗体常用方法包括数据输出（Print方法）、窗体显 示（Show方法）、窗体隐藏（Hide方法）。 Show方法 语法结构如下： 窗体名.Show 样式 其中“样式”参数用来指定窗体的模式，为可选参 数，它的值为0或1。该参数取1（默认值）时，表示 窗体是模态的，即用户只能操作所显示的窗体，而 不能操作其他窗体；取0时，表示窗体是非模态的， 即用户既能操作所显示的窗体，又可以操作其他窗 体。
Private Sub 窗体或控件名_Click() End Sub Private Sub 窗体或控件名_DblClick() End Sub Private Sub 窗体或控件名_MouseDown(Button As Integer, Shift As Integer, X As Single, _Y As Single) End Sub Private Sub 窗体或控件名_MouseMove(Button As Integer, Shift As Integer, X As Single, _Y As Single) End Sub Private Sub 窗体或控件名_MouseUp(Button As Integer, Shift As Integer, X As Single, _Y As Single) End Sub
6.1.2 控件基本操作
控件添加 工具箱中列出来的控件是Visual Basic 6.0中最常 用的控件，向窗体中添加控件可按以下两种方式 来完成。 在工具箱中，双击对应的控件图标。 在工具箱中，单击对应的控件图标，然后将 鼠标指针移到窗体上，这时鼠标指针变为“＋” 字形，在窗体上按住鼠标左键并拖曳，在拖曳 到一定范围后，松开鼠标左键。
RGB(x,y,z)函数用于设置颜色，其中“x,y,z”为正整数，0≤x≤255， 0≤y≤255， 0≤z≤255。 程序运行时，在窗体上执行某项操作时会激发相应的事件。窗体 被显示时会激发Load事件；按下鼠标会激发MouseDown事件；松开 鼠标会激发MouseUp事件；单击鼠标会激发Click事件；在窗体上双 击鼠标会激发DblClick事件；移动鼠标会激发MouseMove事件；按 下键盘键会激发KeyDown事件；松开键盘键会激发KeyUp事件；按 下或松开键盘键都会激发KeyPress事件。如例6-1中，便是通过Click 事件、DblClick事件来实现多变的窗体。
⑤【Enabled】属性。 功能：返回或设置窗体是否可用。 说明：【Enabled】属性有两个取值：True或False。 【Enabled】属性为True（默认值）时，表示控件可用， 可以响应用户的操作；【Enabled】属性为False时，控件 为灰色，表示控件不可用，不能响应用户的操作。 ⑥【ForeColor】属性。 功能：返回或设置窗体的前景颜色。 说明：设置【ForeColor】属性将会影响图形及文本的 颜色。
弹起（KeyUp）事件，各事件的语法结构如下：
Private Sub 窗体或控件名_KeyPress(KeyAscii As Integer) End Sub Private Sub 窗体或控件名_KeyDown(KeyCode As Integer, Shift As Integer) End Sub Private Sub 窗体或控件名_KeyUp(KeyCode As Integer, Shift As Integer) End Sub
【例6-1ห้องสมุดไป่ตู้多变窗体设计
具体操作步骤见教材
知识链接
StartUpPosition属性用于返回或设置窗体在屏 幕中的位置，有0、1、2、3共4个取值，取0时， 表示出现在屏幕的左上角；取1时，表示出现在 所有者的中心；取2时，表示出现在屏幕的中心； 取3（默认值）时，表示出现在默认位置，即坐 标为（0，0）的位置。
图6-1【添加窗体】对话框
图6-2【工程】面板
图6-2 保存窗体提示框
选中窗体 应用程序有了多个窗体之后，每个窗体界面 设计都是独立完成。在设计某个窗体界面时， 需先激活该窗体，即将窗体置于最上层。双 击【工程】面板中对应窗体的图标，该窗体 即被选中，并被置于最上层；在【工程】面 板中单击对应窗体的图标 ，然后单击查看对 象按钮 ，也可以选中窗体，并将窗体置于 最上层。
⑦【Font】属性。 功能：返回或设置窗体文本所用的字体名、字体样式及 字体大小。 说明：【Font】属性是通过【字体】对话框来设置的， 包括字体名、字体样式、字体大小等有关字体的属性。 ⑧【Height】属性、【Width】属性。 功能：【Height】属性返回或设置窗体的高度； 【Width】属性返回或设置窗体的宽度。 说明：窗体的大小可以通过拖动窗体边角来改变，也可 以通过设置【Height】，【Width】属性来改变。
【AutoReDraw】属性。 功能：返回或设置是否允许更新窗体上的内容。 说明：【AutoReDraw】属性在前面几章中经常用到，它有两个取 值：True或False。【AutoReDraw】属性为True时，表示允许更新 窗体上的内容，因此要在窗体上显示文字或在窗体上画图，必须将 【AutoReDraw】属性设为True；【AutoReDraw】属性为False时， 表示不允许更新窗体上的内容，窗体不能显示任何文字或图形。 【BorderStyle】属性。 功能：设置窗体的边框风格。 说明：【BorderStyle】属性有6个取值：0－None、1－Fixed Single、2－Sizable、3－Fixed Dialog、4－Fixed ToolWindow、5－ Sizable ToolWindow。