VB教程第6章

• Caption属性：
用于设置窗体标题栏上的标题内容。
• Appearance属性：
用于设置窗体的外观是平面还是三维的 0 平面 1 三维
• BackColor和ForeColor属性：
设置窗体的背景色和前景色，可用以下函数在代码中设置， （1）RGB(参数1，参数2，参数3） 参数：0~255 如：RGB（255，255，255）返回白色，RGB（255，0，0）返回红色 （2）QBColor(颜色码)
6
6.1.3窗体的基本属性
窗体属性指窗体的名称、大小、颜色等一系列 外观或内部构造的特征。 • 设置窗体的属性
①可在程序设计时在属性窗口中手工设置 ②也可以在程序运行时由代码实现
• “属性”窗口，属性显示顺序：按字母排序，按 分类排序
7
一些常用的窗体属性：
• Name属性：
用于设置窗体的名称。指定窗体的名称。只读，不能在应用程序中修改
print例1
12
• Enabled属性 用来确定窗体是否可用。 True: 窗体能对用户操作做出响应 False:不能响应 • Height和Width属性： 确定窗体的初始高度和宽度 • Left和Top属性： 确定窗体的左上角在屏幕上的横、纵坐标 • Icon： 设置窗体标题栏上的控制菜单的图标。 • Picture属性： 用于在窗体上设置背景图片。按Del键取消.
例6.3
17
3、系统事件
系统自动触发的事件
(1) Load(装载)事件 把窗体从磁盘或从磁盘缓冲区读入内存时触发本事件，在 启动程序时对属性和变量进行初始化。 (2) Unload(卸载)事件 当窗体卸载时触发本事件，将窗体从内存中卸载。 （3） QueryUnload事件
在一个窗体或应用程序关闭之前触发，在Unload事件之前 发生。
8
• BorderStyle:用于设置边框的样式。 0 无边框、无标题栏 1 固定单边框。即边框尺寸不可改变 2 可调整边框。（默认值） 3 固定对话框。只包含控制菜单和标题栏，边 框尺寸不可改变。 4 固定工具窗口。显示关闭按钮并用缩小字体 显示标题。 5 可变尺寸工具窗口。无控制菜单，可变大小， 显示关闭按钮并用缩小字体显示标题。
25
要将焦点赋给控件，有以下几种方法：
(1)用鼠标选定对象 (2)按快捷键选定对象 (3)按Tab键或Shift+Tab键在当前窗体的各对象之间切换 焦点 (4)在代码中用SetFocus方法来设置焦点。 例如： Text1.SetFocus ′把焦点设置在文本框Text1
2. Tab键序
Tab键序是指用户按Tab键时，焦点在控件间移动的顺序 反映在控件的TabIndex属性
Sub 对象名_事件名() 处理事件的程序代码 End Sub
23
3. 方法：对象能够执行的动作 它是对象本身内含的函数或过程，用于完成某种特定 的功能。 一般格式：［对象名.］方法名［(参数)］
如：Form1.Cls ´消除窗体Form1上的内容 Form1.Print “Visual BASIC” ´在当前窗体上显示 注：可以把属性看作一个对象的性质，把方法看作对象的动 作，把事件看作对象的响应。
4
6.1.2 添加窗体、移除窗体
1、添加窗体 “工程” | “添加窗体” 2、移除窗体 在“工程资源管理器”窗口，选中要删除 的窗体，单击鼠标右键，选择移除
5
属性、方法、事件概述
• Visual Basic的窗体和控件是具有自己的属性、方法和事 件的对象。 • 可以把属性看作一个对象的性质，把方法看作对象的动作， 把事件看作对象的响应。 • 例如，如把某人看作一个对象，他同样具有属性、方法和 事件。 （1）他所具有的属性有：姓名、性别、年龄的等等特征或 性质。 （2）他能够执行的动作和行为有吃饭、睡觉、唱歌、跳舞 就都是这个人所具有的方法。 （3）他所具有的事件，即对某种外部条件或改变的响应有： 如，天冷了，会加衣服；中了彩票会高兴等等。
27
(2)编写程序代码。编写的三个按钮的Click事件过程代码： Private Sub CmdPrt_Click() ′单击“显示”按钮 BackColor = RGB(255, 255, 255) ′ QBColor(15) ForeColor = RGB(0, 0, 255) ′QBColor(9) FontName = “隶书" FontSize = 20 ′字号 FontBold = True ′粗体 CurrentX = 1200:CurrentY = 350 ′显示位置 Print "静夜思(唐诗)" ‟字体颜色（前景） 为蓝色； 背景为白 Print 色；标题为隶书、 FontName = “宋体" 大小20磅、粗体； FontSize = 13 正文为宋体、大小 Print Spc(6); "床前明月光，疑是地上霜" 为13磅； Print Print Spc(6); "举头望明月，低头思故乡" 28 End Sub
对标准控件的扩充，需利用菜单将对应文件加载到工程 中。 “工程” | “部件”
包括：鼠标事件、键盘事件、系统事件
在“代码编辑器”中，左栏选“Form”对象，右栏 就会出现Form的所有事件。 窗体事件过程的一般格式为： Private Sub Form_事件名([参数表]) …… End
演示
15
1、鼠标事件 • 由鼠标操作触发的事件。 • 包括：Click（单击）、DblClick（双击）、 MouseMove（移动）、MouseDown（按 下）、MouseUp（释放）事件。 • 如：鼠标单击窗体事件过程语法结构如下： Private Sub Form_Click( Box、Maxbutton和Minbutton属性： 用于设置控制菜单、最大化和最小化按钮 True 显示 False 不显示 • CurrentX、CurrentY 用于设置下一次打印或绘图的水平（CurrentX） 或垂直（CurrentY）坐标。 只能在代码中设置，设计状态不可用，所以在属 性列表中找不到。 [Object.]CurrentX=x [Object.]CurrentY=y
13
• Visible(可见性)： 设置对象的可见性， True : 可见,默认值为True False: 不可见。 • WindowState属性 – 用于设置窗体运行时的状态。 – 0 正常显示 – 1 最小化 – 2 最大化
14
6.1.4 窗体的事件
事件：预先设置好的能被对象识别的一组动作。
16
2、键盘事件
• 由键盘操作触发的事件 • 包括：KeyDown（键按下）、KeyUp（键弹 起）、KeyPress（键按下松开）事件
如：KeyPress其事件过程的格式为：
Private Sub 对象_KeyPress(KeyAscii As Integer) …… End Sub 参数KeyAscii返回所按键的ASCII
19
(2) Show方法：用于快速显示一个窗体，使该窗体变成活动 窗体，同时窗体的Visible属性被设为True。 语法：窗体名.Show [0|1]
说明：当参数为0或被省略时，显示窗体后，继续执行 后面的语句。此时显示为无模式窗体。当参数为1时，显 示窗体并暂停执行后面的语句，为模式窗体。有模式的窗 体不允许用户同时与应用程序的其他窗体交互，无模式窗 体则允许，Style缺省值是无模式的。
10
窗体坐标系统
(0, 0)
CurrentY
X
CurrentX
Y
坐标原点(0, 0)在窗体的左上角 坐标轴刻度单位为缇(Twip,567缇为1厘米) 当前位置的横坐标(CurrentX)和纵坐标(CurrentY)
11
窗体或图片框的CurrentX、CurrentY两个属性决定 print输出文字左上角的坐标。 Private Sub Form_Click() form1.currentX=500 form1.CurrentY=1000 Print “abc” End Sub
26
例6.1 显示唐诗“静夜思”
例3.3
设置以下3个命令按钮： ‟字体颜色（前景）为 “显示”按钮：用于显示唐诗“静夜思” 蓝色； 背景为白色， “清除”按钮：用于清除所生成的文本 标题为隶书、大小20 磅，正文为宋体、大 “结束”按钮：结束程序的运行 小为13磅； 设计步骤如下： (1)创建应用程序的用户界面和设置对象的属性
（4 ）Paint事件
当窗体被移动或放大时，或者窗体移动时覆盖了一个窗体时， 18 触发本事件。
6.1.5
窗体的方法
方法是一个对象具有的动作和行为，是封装 在对象中的一段代码。
(1) Hide方法：用于隐藏窗体对象，但不能使其卸载。 语法：窗体名.Hide 说明：Hide方法隐藏窗体并将窗体的Visible属性设为 False。
Private Sub CmdHide_Click() Hide End Sub
„打印
„清屏
„隐藏
窗体方法例
22
对象的属性、事件与方法(小结)
1.属性：对象的特性 如 Form1.Caption，Label1.BackColor等 设置方法：(1) 在属性窗口中设置 (2) 在程序中更改对象的属性 如 Text1.Text = “ABCDE” 2.事件：由系统预先设置好的、能被对象识别的动作，即对象 对外部刺激的响应。 例如：鼠标的移动(MouseMove)、单击(Click)等 用来引发事件过程，其格式如下：
窗体是用户与应用程序进行 交互的界面。控件是包括在窗体 对象内的对象。窗体和控件都是 创建图形用户界面的基本构成模 块，也是创建应用程序所使用的 对象。
1
本章主要内容
窗体
命令按钮
标准控件
程序举例
标签和文本框
提供选择的控件 其他控件
2
6.1 窗体
窗体(Form)是设计VB应用程序的基本
平台。
窗体本身是一个对象，又是其他对象 的载体或容器。 多数应用程序是从窗体开始执行的 ; 一 个程序可以有多个窗体。
3
6.1.1 窗体的结构
• 标题栏：用于显示窗口中的标题。
Form1.Caption • 控制菜单：点击它显示菜单命令。 Form1.ControlBox • 最小化按钮： Form1.MinButton • 最大化按钮： Form1.MaxButton
.Caption
.MinButton .MaxButton
Private Sub CmdCls_Click() Cls End Sub
′单击“清除”按钮
Private Sub CmdEnd_Click() End End Sub
′单击“结束”按钮
程序运行后，单击“显示”按钮，输出结果
29
控件
• 标准控件(固有控件)
常用控件，存在于工具箱中。
• ActiveX控件(扩展控件)
24
6.1.6 焦点与Tab键序
1. 焦点(Focus，光标)
焦点是对象接收鼠标或键盘输入的能力。 在程序运行时，窗体上有一个且只有一个是用户当前选 择的控件。就是指该控件有焦点。 如果一个控件得到了焦 点，那么它就可以响应用户对它的操作。
并不是每种控件都能够得到焦点，如label控件，由于 它只显示文本，而不能由用户对其编辑操作，所以就不具 有焦点。当TextBox控件获得焦点时，所显示的是文本框中 有一个闪烁的小光标。
(3) Move(移动)方法：用于移动并改变窗体或控件的位置 和大小。
语法：窗体名.move left[,top,width,height] 说明：left参数是必须的。指定任何一个参数时，必须 先指定其前面的全部参数。 (4) Print方法：用于在窗体上输出表达式的值。 （5）Cls方法：用于清除运行时在窗体中显示的文本或图形。 语法：窗体名.Cls
说明：使用Picture属性设置的背景图片和放置的控件 不受Cls影响。
21
窗体方法举例
Private Sub CmdMove_Click() „移动 Form1.Move 3000, 5000 ，6000 End Sub
Private Sub CmdPrint_Click() Print "窗体事件实例" End Sub Private Sub CmdCls_Click() Cls End Sub