第一讲 简单的Visual Basic程序设计

3.2 窗体
2.常用事件
①Click事件
当用户将鼠标置于窗体上，按下鼠标左键并立即 释放（即单击事件），此时，便会在窗体上触发 Click事件。 事件过程格式为： Private Sub Form_Click() ...... End Sub
2013-8-15
3.2 窗体
② DblClick事件
例如：Form1. Print "Visual Basic程序设计"
若当前窗体是Form1，则可省略对象名Form1：
Print "Visual Basic程序设计"
2013-8-15
2、对象的属性、方法和事件
（3）事件
事件是预先定义的、对象能够识别的动作。
例如：单击(Click)事件、双击(DblClick)事件、 装入(Load）事件、改变（Change）事件、鼠 标移动（MouseMove）事件和获取焦点 （GotFocus）事件等。
2013-8-15
3.2 窗体
③Move方法 Move方法用于在屏幕上移动窗体或在窗体上移动控 件，并可以改变其大小，其语法格式如下： [窗体名.] Move Left[，Top[，Width[，Height]]] 其中： Left：表示窗体相对于屏幕左边缘的水平坐标(x轴)。 Top：表示窗体相对于屏幕顶部的垂直坐标(y轴)。 Width：表示窗体的新宽度。 Height：表示窗体的新高度。
2013-8-15
2、对象的属性、方法和事件
设置对象的属性 例：按钮变颜色
(1)在设计阶段，利用属性窗口对选定的对象进行属 性设置。 举例： 如图3-2所示。
图3-2
属性值设置示例
2013-8-15
2、对象的属性、方法和事件
(2).在程序代码中，用赋值语句设置， 使程序 在运行时实现对对象属性的设置 其格式为：
2013-8-15
3.2 窗体
【例3-4】设计应用程序，在 窗体上添加两个标签，要求 当用户单击窗体时，窗体自 己向右下移动(100,100)的位 移，同时窗体的宽和高均放 大1.5倍，并在2个标签中分 别显示窗体当前的坐标信息， 如图3-18所示。
图3-18 【例3-4】运行结果
2013-8-15
2013-8-15
3.2 窗体
【例】设计应用程序，要求程序运行时，当用户单击 窗体，在窗体上显示“Visual Basic程序设计教程”， 要求字体类型为楷体，字体大小为20磅，字形为粗 斜体并且文字下具有下划线，如图3-16所示；当用 户双击窗体，清除窗体上的所有内容。
图3-16 【例3-2】运行结果
2013-8-15
3.2 窗体
⑥WindowState属性
WindowState属性用于设置该窗体首次出现 时的状态，其取值如下表所示：
属性值
0 1
2
2013-8-15
状态名称
Normal（缺省值）
意义
正常状态 最小化状态，以图标方式运行
最大化状态，无边框，充满整个屏幕
Minimized
Maximized
2013-8-15
3.2 窗体
Private Sub Form_Load() Form1.Caption = "窗体的装入事件"
Form1.Picture = LoadPicture(App.Path + "\niao.jpg")
End Sub
Private Sub Form_Click() Form1.Picture = LoadPicture("") Form1.Caption = "窗体的单击事件" End Sub
内 容
☞ 一、 Visual Basic可视化编程的基本概念
☞ 二、 建立简单的Visual Basic应用程序
☞ 三、 窗体和基本控件
☞ 四、焦点
☞ 五、 Visual Basic应用程序的结构和工作方式
1
一、Visual Basic可视化编程的基本概念 1.Visual Basic对象的概念 ①对象 ②类
3.1 对象的公共属性
3.Visible属性
Visible属性用以设置程序运行时对象是否可见，属 性值有： True：默认值，程序运行时对象可见。
False：程序运行时对象不可见，但仍然存在。
2013-8-15
3.1 对象的公共属性
4.TabStop属性
TabStop属性决定在程序运行时，当用户按下 Tab键时焦点能否停留在该对象上，属性值有： True：默认值，当用户按下Tab键时焦点停留在 该控件上。
<对象名>. <属性名>＝<属性值> 例如设置命令按钮Command1的Caption属 性为“确定”的程序代码为： Command1.Caption="确定"
2013-8-15
2、对象的属性、方法和事件
（2）方法
方法是对象本身内含的特殊过程和函数，它定义了 在对象上可以进行的操作。 对象方法的使用格式为： [对象名称. ] 方法名 [参数列表]
False：当用户按下Tab键时焦点不停留在该控 件上。
2013-8-15
3.1 对象的公共属性
5.TabIndex属性
TabIndex属性决定了焦点在各控件上移动的顺 序。 按对象添加到窗体的先后顺序，各对象的此默认 属性值依次为0、1、2等，当然，用户可以根据 需要修改此默认属性值。 只有在TabStop为True的前提下，TabIndex才会 有意义。
图3-12 对象的Name属性
2013-8-15
3.1 对象的公共属性
2.位置属性（Left、Top、Width、Height）
Left和Top属性决定对象左上角在它所在容器对象 里的相对位置坐标。 Width和Height属性决定对象自身的宽度和高度。
图3-13 对象的位置属性
2013-8-15
2013-8-15
图3-15 窗体的Caption属性
3.2 窗体
②MinButton、MaxButton属性
MinButton属性和MaxButton属性分别用于设置窗体 右上角的最大化按钮和最小化按钮。 ③Icon属性 Icon属性用于改变系统提供的默认窗体图标。可以 单击属性窗口中Icon项右边的“...”按钮，选择一个 存在的图标文件装入即可。
2013-8-15
2、对象的属性、方法和事件
事件过程的一般格式为：
Private Sub <对象名称>_<事件名称>( [参数列表] )
<消息处理过程，用户自定义> End Sub 例如：Private Sub Form_Click() Form1.Caption = "我是窗体的单击 事件" End Sub
图3-3 【例3-1】的运行界面
2013-8-15
三、 窗体和基本控件
1.对象的公共属性 2.窗体
3.基本控件
2013-8-15
3.1 对象的公共属性
（名称）属性
对象都有名字，称为对象的 Name属性。 例如首次在工程中添加窗体 对象时，该窗体对象的Name 属性的默认值为Form1，如 图3-12所示。
3.2 窗体
Private Sub Form_Click()
Form1.Move Form1.Left + 100, Form1.Top + 100, Form1.Width * 1.5, Form1.Height * 1.5 Label1.Caption = Form1.Left Label2.Caption = Form1.Top
3
4
5
2013-8-15
3.2 窗体
⑤Picture属性
Picture属性用于设置在窗体上显示的背景图片。在程序代 码中设置该属性的方法如下： [Form1.]Picture=LoadPicture (图形文件源路径及文件名) 如果装入的图片与应用程序在同一文件夹，图形文件源路径 及文件名为： App.Path + "\文件名"
15
3.1 对象的公共属性
在设计阶段用户可在属性框里相应的属性下 用调色板直接选取，如图3-14所示。
图3-14 对象的BackColor属性
2013-8-15
3.2 窗体
1.常用属性
①Caption属性
用于设置窗体标题栏中显示的内容，默认标题为 Form1。该属性可在属性窗口或程序中设置，如 图3-15所示。
2013-8-15
3.2 窗体
④BorderStyle属性
BorderStyle属性用于设置窗体的边框样式。 BorderStyle属性取值如下表所示。
属性值 样式名称 意义
0
1
None
Fixed Single
无边框。无法移动及改变大小
固定单边框。可以包含控制菜单框，标 题栏，最大化按钮和最小化按钮。只有 使用最大化和最小化按钮才能改变大小
图3-3
窗体的单击事件
2013-8-15
二、 建立简单的Visual Basic应用程序
使用Visual Basic开发应用程序时的步骤：
1. 创建工程。
2. 设计界面。
3. 设置对象属性。
4. 编写代码。
5. 调试运行。 6. 保存工程。
2013-8-15
【例3-1】设计一个应用程序， 其运行界面如图3-3所示。 要求程序运行时，当用户 单击“显示”按钮时，标 签上显示“你好！欢迎学 习Visual Basic程序设计。” 的欢迎信息；当用户单击 “退出”按钮时，退出应 用程序。