《VB程序设计概述》PPT课件.ppt

《《VB程序设计概述》PPT课件.ppt》由会员分享，可在线阅读，更多相关《《VB程序设计概述》PPT课件.ppt（78页珍藏版）》请在金锄头文库上搜索。

1、 Visual Basic Visual Basic程序设计教程程序设计教程单击此处编辑母版副标题样式单击此处编辑母版副标题样式学时数：学时数：30理论课时理论课时+18实验课时实验课时理论上机都在机房进行、边讲边练理论上机都在机房进行、边讲边练 课前预习与课后复习课前预习与课后复习 单击此处编辑母版副标题样式单击此处编辑母版副标题样式考核方式考核方式本门课考核方式为闭卷考试。本门课考核方式为闭卷考试。学科成绩学科成绩 ：平时：平时 40% 实验实验 30% 笔试笔试 30%总总 目目 录录第一单元第一单元 VB程序设计概述程序设计概述 第二单元第二单元 VB语言语法基础语言语法基础 第三单元

2、第三单元 顺序结构程序设计顺序结构程序设计 第四单元第四单元 选择结构程序设计选择结构程序设计第五单元第五单元 循环结构程序设计循环结构程序设计第六单元第六单元 VB常用控件常用控件 第七单元第七单元 数组数组第八单元第八单元 过程过程 第九单元第九单元 用户界面设计用户界面设计 第十单元第十单元 图形操作图形操作 第十一单元第十一单元 文件的操作文件的操作程序设计基础程序设计基础-VB语言语言第一单元第一单元 概述概述第一单元第一单元 概述概述第一节第一节 VBVB语言概述语言概述第二节第二节 VBVB对象、事件与事件过程对象、事件与事件过程第三节第三节 窗体与控件窗体与控件实验实验本节知识

3、点本节知识点： 内容主要包括内容主要包括内容主要包括内容主要包括Visual BasicVisual Basic语言简介、特语言简介、特语言简介、特语言简介、特点，点，点，点，Visual BasicVisual Basic集成开发环境以及开发一集成开发环境以及开发一集成开发环境以及开发一集成开发环境以及开发一个个个个Visual BasicVisual Basic程序的全过程。程序的全过程。程序的全过程。程序的全过程。 第一节 VB语言概述1.1 Visual Basic1.1 Visual Basic语言简介语言简介1.2 Visual Basic1.2 Visual Basic的特点的特

4、点 1 1）面向对象的程序设计）面向对象的程序设计 2 2）结构化程序设计语言）结构化程序设计语言 3 3）事件驱动编程机制）事件驱动编程机制 4 4）强大的数据库功能）强大的数据库功能 5 5）动态数据交换）动态数据交换(DDE) (DDE) 6 6）强大的多媒体功能）强大的多媒体功能 7 7）动态链接库）动态链接库(DLL)(DLL) 第一节 VB语言概述1.3 1.3 Visual Visual BasicBasic集成开发环境集成开发环境 第一节 VB语言概述启动方法： 单击单击“开始开始” -“程序程序”- “Microsoft Visual Basic 6.0中文版中文版” ，它的

5、右边出现，它的右边出现Visual Basic 6.0程序组，如图所示：程序组，如图所示：“新建新建”选项卡用于建选项卡用于建立新的工程。立新的工程。 “现存现存”选项卡用于选选项卡用于选择和打开现有的工程。择和打开现有的工程。“最新最新”选项卡用于列选项卡用于列出最近使用过新的工程。出最近使用过新的工程。“新建新建” -“标准标准EXE”-“打开打开”，即进入如图所示的，即进入如图所示的 Visual Basic6.0 的可视化编程环境。的可视化编程环境。标题栏菜单栏工具栏工具箱工程窗口属性窗口窗体窗口1.3 1.3 Visual Visual BasicBasic集成开发环境集成开发环境1

6、.3.1 1.3.1 标题栏标题栏 标题栏是位于集成开发环境最上面的水平条，用来标题栏是位于集成开发环境最上面的水平条，用来显示打开的工程名和系统的工作状态。显示打开的工程名和系统的工作状态。 工作状态有工作状态有“设计设计”、“运行运行”和和“中断中断”三种状三种状态，分别当程序在设计、运行和调试时显示。态，分别当程序在设计、运行和调试时显示。 例如，如图显示了启动例如，如图显示了启动VBVB时标题栏的显示，工程名时标题栏的显示，工程名为为“工程工程1”1”，工作状态为，工作状态为“运行运行”。 图1.1 Visual Basic标题栏第一节 VB语言概述1.3.21.3.2菜单栏菜单栏 V

7、BVB的菜单栏提供了的菜单栏提供了1313个下拉菜单，除了标准的个下拉菜单，除了标准的“文文件件”、“编辑编辑”、“视图视图”、“工具工具”、“窗口窗口”和和“帮助帮助”菜单之外，还提供了编程专用的菜单菜单之外，还提供了编程专用的菜单“工程工程”、“格式格式”、“运行运行”、“外接程序外接程序”和和“调试调试”，另外，另外还有用于数据库操作的还有用于数据库操作的“查询查询”和和“图表图表”菜单。菜单。图1.2Visual Basic集成开发环境的菜单栏第一节 VB语言概述1.3.3 1.3.3 工具栏工具栏 VBVB有有“标准标准”、“编辑编辑”、“窗体编辑器窗体编辑器”和和“调调试试”四组工

8、具栏，工具栏是对常用命令的快速访问，集四组工具栏，工具栏是对常用命令的快速访问，集成开发环境中启动成开发环境中启动VBVB之后显示的标准工具栏示，单击工之后显示的标准工具栏示，单击工具栏上的按钮则执行该按钮所代表的操作，当鼠标停留具栏上的按钮则执行该按钮所代表的操作，当鼠标停留在工具栏按钮上时可显示出该按钮的功能。在工具栏按钮上时可显示出该按钮的功能。 标准工具栏编辑工具栏调 试 工 具栏窗 体 编 辑器图1.3 工具栏第一节 VB语言概述1.3.41.3.4控件箱控件箱 工具箱（工具箱（ToolboxToolbox）也称为控件箱，提供了用于开发）也称为控件箱，提供了用于开发应用程序的各种控件

9、，用户设计界面时可以从中选择所应用程序的各种控件，用户设计界面时可以从中选择所需的控件拖放到窗体中。需的控件拖放到窗体中。指针(Pointer)标签(Label)框架(Frame)检查框(Checkbox)组合框(ComboBox)水平滚动条(HScrollBox)计时器(Timer)目录列表框(DirListBox)形状(Shape)图像(Image)对象链接与嵌入(OLE)图形框(PictureBox)文本框(TextBox)命令按钮(Command)单选按钮(OptionButton)列表框(ListBox)垂直滚动条(VScrollBox)驱动器列表框(DriverListBox)文件

10、列表框(File ListBox)直线(Line)数据控件(Data)图1.4 控件箱第一节 VB语言概述1.3.5 1.3.5 工程资源管理器工程资源管理器 工程资源管理器窗口以工程资源管理器窗口以树状结构列出应用程序中所树状结构列出应用程序中所有的文件清单，包括窗体和有的文件清单，包括窗体和模块等，三个按钮分别是模块等，三个按钮分别是“查看代码查看代码”、“查看对象查看对象”和和“切换文件夹切换文件夹”。图1.5 工程资源管理器窗口第一节 VB语言概述1.3.6 1.3.6 窗体设计器窗口窗体设计器窗口 窗体设计器窗口中显示窗体设计器窗口中显示的是一个空白的窗体，窗体的是一个空白的窗体，窗

11、体是用户用来显示的程序界面，是用户用来显示的程序界面，用户可以通过在窗体上放置用户可以通过在窗体上放置控件来设计界面。当打开控件来设计界面。当打开VBVB时，程序默认创建一个空白时，程序默认创建一个空白窗体名称为窗体名称为Form1Form1，编程人，编程人员可以修改它的名称，操作员可以修改它的名称，操作区中布满了小点，这些小点区中布满了小点，这些小点是用来对齐控件位置的。是用来对齐控件位置的。 图1.6 窗体设计器窗口第一节 VB语言概述1.3.7 1.3.7 属性设置窗口属性设置窗口 属性窗口用于列出当前选定属性窗口用于列出当前选定窗体和控件的属性设置，每个对窗体和控件的属性设置，每个对象

12、都是用属性来表示其特征的。象都是用属性来表示其特征的。左侧为左侧为“属性名属性名”是显示属性的是显示属性的名称；名称； 右侧为右侧为“属性值属性值”是属性名是属性名对应的设置值，可以在此设置和对应的设置值，可以在此设置和修改属性值。修改属性值。图1.7属性设置窗口第一节 VB语言概述1.3.8 1.3.8 代码设计窗口代码设计窗口 代码窗口又称为代码编辑器窗口，有代码窗口又称为代码编辑器窗口，有4 4种方法都可以种方法都可以打开代码窗口：双击窗体的任何地方；单击鼠标右键，打开代码窗口：双击窗体的任何地方；单击鼠标右键，选择快捷菜单中的选择快捷菜单中的“查看代码查看代码”菜单项；单击工程资源菜单

13、项；单击工程资源管理器窗口中的管理器窗口中的“查看代码查看代码”按钮；选择按钮；选择“视图视图”菜单菜单中的中的“代码窗口代码窗口”菜单项。菜单项。第一节 VB语言概述1.4 1.4 开发一个开发一个Visual BasicVisual Basic程序的全过程程序的全过程1.4.1 1.4.1 建立应用程序的步骤建立应用程序的步骤创建应用程序的界面。创建应用程序的界面。设置窗体和控件的属性。设置窗体和控件的属性。对象事件过程以及编程。对象事件过程以及编程。运行和调试程序。运行和调试程序。生成可执行程序。生成可执行程序。第一节 VB语言概述1.4.2 1.4.2 简单应用程序实例简单应用程序实例

14、实例1：设计一个程序，在运行时若用鼠标单击窗体，在窗体上显示出“Visual Basic欢迎你”一行文字。第一节 VB语言概述因为题目要求在程序运行时，若单击窗体就显示出一行字符，所以应按下列步骤操作。 在代码窗口的对象框中选择Form（窗体）。 在过程框中选择Click。本程序进入运行状态后，用鼠标单击窗体，窗体上就会出新“Visual Basic欢迎你！”，再单击一次再显示一行。图所示的是单击五次窗体的结果。第一节 VB语言概述实例2：编写一个应用程序，运行结果如图所示。编写一个应用程序，运行结果如图所示。 当程序运行时，单击当程序运行时，单击“中文问候中文问候”按钮时输出按钮时输出“上午

15、好！上午好！”，单击，单击“英文问候英文问候”按钮时，则输出按钮时，则输出“Good Morning！”。1建立用户界面建立用户界面向窗体添加的控件：向窗体添加的控件：向窗体添加的控件：向窗体添加的控件：1 1个标签（个标签（个标签（个标签（labellabel）、）、）、）、1 1个图像框（个图像框（个图像框（个图像框（imageimage）、）、）、）、2 2个命令按钮（个命令按钮（个命令按钮（个命令按钮（commandcommand）2对象属性的设置对象属性的设置 对象 属性属性值command1 Caption中文问候command2 Caption英文问候label1 Caption

16、 空image1 picture图片的路径属性设置后的界面：属性设置后的界面：属性设置后的界面：属性设置后的界面：3. 编写代码编写代码（1）打开代码窗口）打开代码窗口（2）编写代码）编写代码在代码编辑区输入如下代码：在代码编辑区输入如下代码：Private Sub Command1_Click() Label1.Caption=上午好！上午好！End SubPrivate Sub Command2_Click() Label1.Caption=Good Morning！End Sub4. 运行程序运行程序运行一个Visual Basic程序，可以通过以下几种途径： 1. 从菜单栏中选择“运行

17、”菜单的“启动”命令; 2. 按F5键; 3. 从工具栏中选择“启动”图标。 如果想终止程序的运行，可从菜单栏中选择“运行”菜单的“结束”命令，或从工具栏中选择“结束”图标。5. 保存程序保存程序 一个Visual Basic程序称为一个工程（即一个项目），一个工程中往往包含多个不同类型的文件。这些文件需要分别保存。 如果想使应用程序不在Visual Basic环境中运行，就必须对应用程序进行编译生成exe文件。1.启动启动Visual Basic2.设计程序的界面设计程序的界面3.设置对象的属性设置对象的属性4.写代码写代码5.程序运行和调试程序运行和调试6.保存程序，并生成可执行文件保存程

18、序，并生成可执行文件VB 应用程序设计步骤应用程序设计步骤实例3：输入两个数，然后实现加法功能，程序的运行界输入两个数，然后实现加法功能，程序的运行界面如图所示。面如图所示。图1.9 运行结果第一节 VB语言概述本节知识点本节知识点： 面向对象的概述；对象的概念、属性、方法面向对象的概述；对象的概念、属性、方法面向对象的概述；对象的概念、属性、方法面向对象的概述；对象的概念、属性、方法和事件。和事件。和事件。和事件。第二节 VB对象、事件与事件过程第二节 VB对象、事件与事件过程2 2.1.1 面向对象的概述面向对象的概述2 2.2.2 Visual Basic Visual Basic中的对

19、象中的对象2.1 2.1 面向对象的概念面向对象的概念 对象的三要素对象的三要素 在面向对象的系统中，世界被看成是独立在面向对象的系统中，世界被看成是独立“对象对象”的的集合。即属性、方法、事件构成一个对象的三要素。集合。即属性、方法、事件构成一个对象的三要素。属性属性 描述对象的特征描述对象的特征方法方法 反映对象动作的行为反映对象动作的行为事件事件 对象对象可能发生的一切活动可能发生的一切活动 如一个人作为对象有姓名、身高、体重等属性；有走如一个人作为对象有姓名、身高、体重等属性；有走路、思考、开车等行为；还有在一定条件下发生的事件。路、思考、开车等行为；还有在一定条件下发生的事件。 第二

20、节 VB对象、事件与事件过程2.2 Visual Basic2.2 Visual Basic中的对象中的对象 2.2.1 2.2.1 对象的概念对象的概念 VBVB的一个对象是指将数据和处理该数据的过程（函数和的一个对象是指将数据和处理该数据的过程（函数和子程序）捆绑在一起的一个程序部件。对象是具有属性子程序）捆绑在一起的一个程序部件。对象是具有属性（数据）和行为（方法）的实体。（数据）和行为（方法）的实体。VBVB的对象分为两类：的对象分为两类：1 1）预定义对象）预定义对象 由系统设计好提供给用户使用，如窗体、控件、打印机、调试、由系统设计好提供给用户使用，如窗体、控件、打印机、调试、剪贴

21、板、屏幕等；剪贴板、屏幕等；2 2）用户建立对象）用户建立对象 建立一个对象，就是新建窗体以及在窗体上绘制控件的过程；对建立一个对象，就是新建窗体以及在窗体上绘制控件的过程；对象也可通过程序来建立，但必须由用户在程序中为对象命名。如窗体象也可通过程序来建立，但必须由用户在程序中为对象命名。如窗体Form1Form1，按钮，按钮( (控件控件)button)button等。等。 第二节 VB对象、事件与事件过程2.2 Visual Basic2.2 Visual Basic中的对象中的对象 2.2.2 2.2.2 对象的属性、方法和事件对象的属性、方法和事件 在在VBVB环境下建立一个对象后，其

22、操作通过与该对象环境下建立一个对象后，其操作通过与该对象有关的属性、方法和事件来描述。有关的属性、方法和事件来描述。 1 1）对象的属性）对象的属性 属性（属性（PropertyProperty）是描）是描述对象特征的数据。如气述对象特征的数据。如气球属性有直径、颜色、状球属性有直径、颜色、状态态( (充气或未充气充气或未充气) )、寿命、寿命等。等。第二节 VB对象、事件与事件过程2.2 Visual Basic2.2 Visual Basic中的对象中的对象 2.2.2 2.2.2 对象的属性、方法和事件对象的属性、方法和事件1 1）对象的属性）对象的属性 不同对象有不同的属性。不同对象有

23、不同的属性。VBVB对象常见属性有标题对象常见属性有标题（CaptionCaption）、控件名称（）、控件名称（NameName）、颜色（）、颜色（ColorColor）、字）、字体大小（体大小（FontsizeFontsize）、是否加粗（）、是否加粗（FondBoldFondBold）、是否可）、是否可见（见（VisibleVisible）等。）等。 可以通过修改对象的属性值来改变对象的特征，设可以通过修改对象的属性值来改变对象的特征，设置对象的属性值有置对象的属性值有两种方式两种方式： 利用利用“属性窗口属性窗口”设置对象的属性（操作见设置对象的属性（操作见2.4.42.4.4） 在程

24、序中设置对象的属性（赋值语句）在程序中设置对象的属性（赋值语句） 其语法格式：其语法格式： 对象名对象名.属性名属性名= =属性值属性值 第二节 VB对象、事件与事件过程2.2.2 2.2.2 对象的属性、方法和事件对象的属性、方法和事件1 1）对象的属性）对象的属性 读写对象的属性值读写对象的属性值 对象的对象的大多数属性是可读取大多数属性是可读取的，但的，但不是所有的属性都不是所有的属性都是可改写的是可改写的。 例如，在用户窗体例如，在用户窗体Form1Form1上有二个文本框控件，对象上有二个文本框控件，对象名分别为名分别为Text1Text1和和Text2Text2，该控件有一属性，该

25、控件有一属性TextText，属性值，属性值则是文本框的显示内容。则是文本框的显示内容。 读写对象属性的赋值语句如下：读写对象属性的赋值语句如下： Text1.Text=Text1.Text=欢迎光临欢迎光临 （改写对象属性）（改写对象属性） Text2.Text=Text1.Text Text2.Text=Text1.Text （读取对象属性）（读取对象属性）第二节 VB对象、事件与事件过程2.2.2 2.2.2 对象的属性、方法和事件对象的属性、方法和事件2 2）对象的方法）对象的方法 方法是描述对象行为的过程，指对象能执行的动作方法是描述对象行为的过程，指对象能执行的动作或功能，如显示或

26、打印、绘图、移动等。或功能，如显示或打印、绘图、移动等。 对于对于VBVB预定义对象，其方法是封装在对象中用来操预定义对象，其方法是封装在对象中用来操作对象属性的代码段（特殊的过程或函数），是不可见作对象属性的代码段（特殊的过程或函数），是不可见和不可改写的。和不可改写的。 不同的对象有不同的方法不同的对象有不同的方法, ,有些方法可适用于多种类有些方法可适用于多种类型的对象，而有些方法只适用于几种对象。如大部分对型的对象，而有些方法只适用于几种对象。如大部分对象具有方法象具有方法MoveMove（移动位置），而按钮和文本框控件对（移动位置），而按钮和文本框控件对象都具有方法象都具有方法Set

27、FocusSetFocus（将焦点移至指定对象）。（将焦点移至指定对象）。 第二节 VB对象、事件与事件过程2.2.2 2.2.2 对象的属性、方法和事件对象的属性、方法和事件2 2）对象的方法）对象的方法 调用对象的方法：调用对象的方法： 其语法格式：其语法格式： 对象名对象名.方法名方法名 参数列表参数列表 例例1 1：在用户窗体：在用户窗体Form1Form1上有一名为上有一名为txtnametxtname的文本框控件，用来输入的文本框控件，用来输入用户名，调用方法用户名，调用方法MoveMove移动文本框位置；调用方法移动文本框位置；调用方法SetFocusSetFocus将焦点（光将

28、焦点（光标）移至文本框以便接收信息。标）移至文本框以便接收信息。 Txtname.MoveTxtname.Move 300,300 300,300 Txtname.SetFocusTxtname.SetFocus （将光标置于用户名框）（将光标置于用户名框） 例例2 2：使用方法：使用方法PrintPrint在当前窗体在当前窗体Form1Form1或打印机上输出字符串或打印机上输出字符串 欢迎使欢迎使用用VBVB。 Print “Print “欢迎使用欢迎使用VB” VB” （缺省对象为当前窗体（缺省对象为当前窗体Form1Form1） Printer.PrintPrinter.Print “

29、 “欢迎使用欢迎使用VB” VB” （打印机对象名（打印机对象名PrinterPrinter）第二节 VB对象、事件与事件过程2.2.2 2.2.2 对象的属性、方法和事件对象的属性、方法和事件3 3）对象的事件）对象的事件(1)(1)事件事件 事件是事件是VBVB预先设置好的、能够被对象识别的动作，如预先设置好的、能够被对象识别的动作，如ClickClick（单击）、（单击）、DblClickDblClick（双击）、（双击）、MouseMoveMouseMove（移动（移动鼠标）、鼠标）、LoadLoad（装入）等。（装入）等。 不同的对象能识别的事件也不一样。例如，窗体能识不同的对象能识

30、别的事件也不一样。例如，窗体能识别装载别装载Load()Load()、单击、单击Click()Click()、活动、活动Activate()Activate()等事件；等事件；命令按钮能识别单击命令按钮能识别单击Click()Click()、双击、双击DblClickDblClick()()、获得焦、获得焦点点GotFocusGotFocus()()等事件。等事件。 事件一般发生在用户与应用程序交互时，如单击控件、事件一般发生在用户与应用程序交互时，如单击控件、键盘输入、移动鼠标等。也有部分事件是由系统触发，键盘输入、移动鼠标等。也有部分事件是由系统触发，如计时器事件、程序启动时窗体加载如计时

31、器事件、程序启动时窗体加载Form_LoadForm_Load( (）事件。）事件。 第二节 VB对象、事件与事件过程2.2.2 2.2.2 对象的属性、方法和事件对象的属性、方法和事件3 3）对象的事件）对象的事件(2)(2)事件过程事件过程 事件过程是对某个对象事件所执行的操作。响应某个事件过程是对某个对象事件所执行的操作。响应某个事件后所执行的操作是通过一段程序代码来实现的。事件后所执行的操作是通过一段程序代码来实现的。 一个对象可以识别一个或多个事件，因而可以拥有一一个对象可以识别一个或多个事件，因而可以拥有一个或多个事件过程。每个事件过程必须由用户或系统启个或多个事件过程。每个事件过

32、程必须由用户或系统启动相应事件后，才会执行该事件响应程序代码。动相应事件后，才会执行该事件响应程序代码。 事件过程的一般格式如下：事件过程的一般格式如下： Private sub Private sub 对象名称对象名称_ _事件名称事件名称()() 事件响应程序代码事件响应程序代码 End subEnd sub 第二节 VB对象、事件与事件过程2.2.2 2.2.2 对象的属性、方法和事件对象的属性、方法和事件3 3）对象的事件）对象的事件(2)(2)事件过程事件过程 例如，以下事件过程例如，以下事件过程Command1_Click()Command1_Click()是单击命令按钮是单击命令

33、按钮Command1Command1控件时所执行的操作。控件时所执行的操作。 Private sub Command1_Click()Private sub Command1_Click() Text1.FontName= Text1.FontName=黑体黑体 Text1.ForeColor= Text1.ForeColor=vbRedvbRed Text1.Text= Text1.Text=欢迎使用欢迎使用VBVB End Sub End Sub 当用户单击命令按钮当用户单击命令按钮Command1Command1控件，将触发单击事件控件，将触发单击事件Command1_ClickComm

34、and1_Click()()，从而执行该响应程序代码，在，从而执行该响应程序代码，在Text1Text1文本框中显示文本框中显示 欢迎使用欢迎使用VB,VB,其字其字体为黑体，文字为红色。体为黑体，文字为红色。第二节 VB对象、事件与事件过程本节知识点本节知识点： 窗体常用的属性、事件和方法；几个常用控窗体常用的属性、事件和方法；几个常用控窗体常用的属性、事件和方法；几个常用控窗体常用的属性、事件和方法；几个常用控件：标签、文本框、命令按钮的属性、方法件：标签、文本框、命令按钮的属性、方法件：标签、文本框、命令按钮的属性、方法件：标签、文本框、命令按钮的属性、方法和事件和事件和事件和事件及其应

35、用。及其应用。及其应用。及其应用。第三节 窗体与控件3.1 3.1 窗体窗体 窗体与窗体与WindowsWindows下窗口的结构或特性都十分类似。下窗口的结构或特性都十分类似。在设计程序时，窗体是程序员的工作台；而运行程序在设计程序时，窗体是程序员的工作台；而运行程序时，每个窗体对应于一个窗口。窗体是一个特殊的控时，每个窗体对应于一个窗口。窗体是一个特殊的控件对象，是其他控件的容器。在窗体上可以布局其它件对象，是其他控件的容器。在窗体上可以布局其它控件，直观地建立应用程序。控件，直观地建立应用程序。 窗体窗体(Form)(Form)能够成为用户设计的数据输入输出界面。能够成为用户设计的数据输

36、入输出界面。通过用户窗体和控件可方便地输入数据、输出结果以通过用户窗体和控件可方便地输入数据、输出结果以及控制应用程序的执行。及控制应用程序的执行。 窗体作为窗体作为VBVB的对象，具有自己的属性、方法和事件。的对象，具有自己的属性、方法和事件。 第三节 窗体与控件3.1 3.1 窗体窗体1 1）窗体的常用属性）窗体的常用属性 有两种方法可以设置窗体属性。有两种方法可以设置窗体属性。P P1919 Name Name：窗体对象的名字，默认值窗体对象的名字，默认值Form1Form1。 CaptionCaption：窗体标题的名字（字符串）窗体标题的名字（字符串） BackColorBackCo

37、lor：窗体背景颜色：窗体背景颜色, ,如如vbRedvbRed( (红红) )、vbBluevbBlue( (蓝蓝) ) ForeColorForeColor：设置文本或图形的前景颜色。设置文本或图形的前景颜色。 BorderStyleBorderStyle：窗体的边框样式，可取窗体的边框样式，可取0 05 5的整数。的整数。 Height,WidthHeight,Width：指定窗体的高度和宽度。指定窗体的高度和宽度。 其设置格式如下：其设置格式如下： 对象对象.Height =.Height =数值数值 对象对象.Width =.Width =数值数值 如果不设置该属性，则窗口大小与设计

38、时的窗体大小相同。如果不设置该属性，则窗口大小与设计时的窗体大小相同。第三节 窗体与控件3.1 3.1 窗体窗体2 2）窗体的常用事件）窗体的常用事件 Click(Click(单击单击) )事件：事件：单击窗体内（除控件外）某位置，触发单击窗体内（除控件外）某位置，触发Form_Click()单击事件过程。单击事件过程。 DblClickDblClick( (双击双击) )事件：事件：双击窗体某个位置，触发双击窗体某个位置，触发Form_ DblClick()事件过程事件过程。 Load(Load(装入装入) )事件事件: :把窗体装入工作区触发该事件过程。把窗体装入工作区触发该事件过程。 U

39、nload(Unload(卸载卸载) )事件事件: :清除一个窗体时触发该事件过程。清除一个窗体时触发该事件过程。 Activate(Activate(活动活动) )事件事件: :窗体变为活动窗口触发该事件过程。窗体变为活动窗口触发该事件过程。 Paint(Paint(绘画绘画) )事件事件: :当窗体被移动或放大当窗体被移动或放大触发该事件过程。触发该事件过程。第三节 窗体与控件3.1 3.1 窗体窗体3 3）窗体的常用方法）窗体的常用方法 PrintPrint方法方法用于在窗体（用于在窗体（Form）、图片框（）、图片框（Picture）、打印机）、打印机(Printer)上输出上输出字符

40、或数值。字符或数值。 ClsCls（清屏）方法（清屏）方法清除窗体上由清除窗体上由Print方法显示的字符和数值，或图片框中显示的图形。方法显示的字符和数值，或图片框中显示的图形。 MoveMove方法方法 用来移动窗体和控件，并可改变其大小。用来移动窗体和控件，并可改变其大小。 ShowShow或或HideHide方法方法 主要用于多窗体程序设计中，显示或隐藏指定的窗体。主要用于多窗体程序设计中，显示或隐藏指定的窗体。第三节 窗体与控件3.1 3.1 窗体窗体3 3）窗体的常用方法）窗体的常用方法 PrintPrint方法举例如下：方法举例如下： 例例1 1，某窗体的单击事件过程，某窗体的单

41、击事件过程Form1_Click()Form1_Click()中，响应程中，响应程序代码使用序代码使用PrintPrint方法的示例如下：方法的示例如下：Private Sub Private Sub Form_ClickForm_Click()() Form1.Print how are you;? Form1.Print 123456,ABCDEF Picture1.Print 计算机世界计算机世界 Picture1.Print 教材书教材书;5+20; 本本End SubEnd Sub 第三节 窗体与控件3 3）窗体的常用方法）窗体的常用方法 MoveMove方法举例如下：方法举例如下：

42、 例例2 2，在窗体的任意位置画一个文本框控件，在窗体的任意位置画一个文本框控件Text1Text1，使用，使用MoveMove方法移动窗体和文本框的位置并改变其大小。窗体单击方法移动窗体和文本框的位置并改变其大小。窗体单击事件过程事件过程Form1_Click()Form1_Click()如下：如下： Private Sub Private Sub Form_ClickForm_Click()() Move 500,500,3800,2500 Move 500,500,3800,2500 Text1.Move 200,200,1500,1000 Text1.Move 200,200,1500

43、,1000 End Sub End Sub 该事件过程先把窗体移到距屏幕左边界该事件过程先把窗体移到距屏幕左边界500,500,上边界上边界500500的位置处，并的位置处，并将其大小设置为宽度将其大小设置为宽度38003800和高度和高度25002500；然后把文本框移到窗体的；然后把文本框移到窗体的（200,200200,200）处，把大小设置为宽）处，把大小设置为宽15001500，高，高10001000。 第三节 窗体与控件3.2 3.2 控件的使用控件的使用 在设计用户界面时，需要在窗体上画出各种所需的控在设计用户界面时，需要在窗体上画出各种所需的控件，控件是构成用户界面的基本元素。

44、件，控件是构成用户界面的基本元素。1 1）控件的类型）控件的类型 VBVB的控件分为以下三类的控件分为以下三类 标准控件（也称内部控件）标准控件（也称内部控件） 内部控件以图标形式在工具箱中列出，不能添加或删除。如标签、内部控件以图标形式在工具箱中列出，不能添加或删除。如标签、文本框、图片框、命令按钮、列表框等。文本框、图片框、命令按钮、列表框等。 ActiveXActiveX控件控件 各种版本各种版本VBVB提供的控件，仅在专业版和企业版中提供的控件，以提供的控件，仅在专业版和企业版中提供的控件，以及第三方提供的及第三方提供的ActiveXActiveX控件。控件。 可插入对象可插入对象 该

45、对象能添加到工具箱中，可以被当做控件。该对象能添加到工具箱中，可以被当做控件。 第三节 窗体与控件3.2 3.2 控件的使用控件的使用2 2）控件的画法）控件的画法 建立用户界面的主要工作是画控件，通过两种方建立用户界面的主要工作是画控件，通过两种方法可以在窗体上画一个控件。法可以在窗体上画一个控件。 控件画法一控件画法一（略）（略） 控件画法二控件画法二 即双击工具箱中某种控件图标，即在当前窗体的中即双击工具箱中某种控件图标，即在当前窗体的中心位置自动画出（显示）该控件。心位置自动画出（显示）该控件。注意：注意： 用画法一画控件的过程中，所画控件的大小和位置用画法一画控件的过程中，所画控件的

46、大小和位置是可变的；而用画法二所画控件的大小和位置是固定是可变的；而用画法二所画控件的大小和位置是固定的。两种方法画完控件后，均可重新调整控件的大小的。两种方法画完控件后，均可重新调整控件的大小和位置。和位置。 工具箱工具箱工具箱工具箱第三节 窗体与控件3.2 3.2 控件的使用控件的使用3 3）控件的基本操作）控件的基本操作 对控件的所有操作都是针对活动控件对控件的所有操作都是针对活动控件( (该控件的边该控件的边框上有八个黑色小方块框上有八个黑色小方块) )进行的，不活动的控件不能进行的，不活动的控件不能进行任何操作。进行任何操作。 控件的选择控件的选择 控件的缩放和移动控件的缩放和移动

47、控件的复制和删除控件的复制和删除 多个控件的对齐与调整多个控件的对齐与调整 第三节 窗体与控件3.3 3.3 常用控件常用控件 本小节仅介绍几个常用控件：标签、文本框、命令本小节仅介绍几个常用控件：标签、文本框、命令按钮以及它们的属性、方法和事件。按钮以及它们的属性、方法和事件。1 1）常用控件的公共属性）常用控件的公共属性 NameName（控件的名字）（控件的名字） CaptionCaption（控件上显示的文字内容）（控件上显示的文字内容） VisibleVisible（取值（取值TureTure或或FlaseFlase，决定对象是否可见），决定对象是否可见） FontFont系列系列（

48、字符格式）（字符格式） FontNameFontName（字体：宋体）（字体：宋体） FontSizeFontSize（字号）、（字号）、FontBoldFontBold（粗体字）（粗体字） FontItalicFontItalic（斜体字）、（斜体字）、FontUnderlineFontUnderline（下划线）（下划线）第三节 窗体与控件3.3 3.3 常用控件常用控件 1 1）常用控件的公共属性）常用控件的公共属性 LeftLeft、TopTop和和HeightHeight、WidthWidth（整型数）整型数） 确定界面对象的坐标位置和尺寸大小。确定界面对象的坐标位置和尺寸大小。 F

49、oreColorForeColor（前景色）：（前景色）：与窗体该属性相同与窗体该属性相同。 BackColorBackColor（背景色）：（背景色）：与窗体与窗体该该属性相同属性相同。 BorderStyleBorderStyle（边框样式）：（边框样式）： 取值取值0-0-控件无边框线，取值控件无边框线，取值1-1-控件周围加单线边框。控件周围加单线边框。 EnabledEnabled（逻辑型）（逻辑型） 用来确定对象是否有效（可用），即一个窗体和控件是否能够对用来确定对象是否有效（可用），即一个窗体和控件是否能够对用户产生的事件做出反应。取值用户产生的事件做出反应。取值True Tru

50、e ，允许对象对事件做出反应；，允许对象对事件做出反应；取值取值FlaseFlase，禁止对事件做出反应。，禁止对事件做出反应。第三节 窗体与控件3.3 3.3 常用控件常用控件 2 2）标签（）标签（LabelLabel）控件）控件 标签主要标签主要用来显示文本信息用来显示文本信息，其默认名称（，其默认名称（NameName）和）和标题（标题（CaptionCaption）为）为Label1Label1、Label2Label2、Label3Label3，它显示，它显示的文本信息只能用的文本信息只能用CaptionCaption属性来设置或修改，不能直接属性来设置或修改，不能直接编辑。编辑。

51、 标签常用来标注本身不具有标签常用来标注本身不具有CaptionCaption属性的控件，如文属性的控件，如文本框、列表框和组合框等。在窗体中添加这些控件时，可本框、列表框和组合框等。在窗体中添加这些控件时，可用标签为它们附加描述性文字。用标签为它们附加描述性文字。 标签的部分属性除了与大多数控件的共同属性相同外，标签的部分属性除了与大多数控件的共同属性相同外，还有一些特殊的属性。还有一些特殊的属性。 第三节 窗体与控件2 2）标签（）标签（LabelLabel）控件）控件(1)(1)标签特有属性标签特有属性 属 性 名功 能 说 明Alignment设置控件中文本的对齐方式，有3种方式： 0

52、左对齐（默认的）、1右对齐、2居中对齐AutoSize设置为True，可以在水平方向调整控件的大小且不换行，以适应其内容长度的变化；默认值为False，表示标签的尺寸不能自动调整，超出尺寸范围的内容不予显示。BorderStyle设置标签的边框，有2种方式：0无边框、1为标签加上边框WordWrap设置标签标题（Caption）显示方式，True，标签将在垂直方向变化，水平方向的大小与原来所画的相同；False（默认的），标签水平扩展，文字不换行。（为了使WordWrap起作用，应把AutoSize设置为True ）第三节 窗体与控件2 2）标签（）标签（LabelLabel）控件）控件(2)

53、(2)标签标签的常用方法和事件的常用方法和事件 标签常用标签常用MoveMove方法，方法，ClickClick（单击）（单击）事件和事件和DblClickDblClick（双击）事件。（双击）事件。 例如，标签单击事件过程如下：例如，标签单击事件过程如下：Private Sub Label1_Click()Private Sub Label1_Click() Label1.AutoSize = True Label1.AutoSize = True Caption = Caption = 标签示例标签示例 Label1.Caption = Label1.Caption = 请输入密码请输入密

54、码: Label1.FontName = Label1.FontName = 华文彩云华文彩云“ “ Label1.FontBold = TrueLabel1.FontBold = True Label1.FontSize = 24 Label1.FontSize = 24End SubEnd Sub 单击标签，单击标签，触发该事件过触发该事件过程，执行响应程序代码，程，执行响应程序代码，其运行结果如图所示其运行结果如图所示 第三节 窗体与控件 思考题思考题（标签的使用）：（标签的使用）： -利用标签的属性 第三节 窗体与控件该标签有边框、文本居中显示、背景色是白色该标签无边框、文本内容可以自

55、动换行显示 对象属性设置对象属性设置如表所示。如表所示。对 象属 性设 置窗体Caption居中对齐标签1Alignment2BorderStyle1BackColor白色Caption居中对齐标签2AutoSizeTrueWordWrapTrueCaption自动换行命令按钮1Caption按此即可3.3 3.3 常用控件常用控件 3 3）文本框（）文本框（TextBoxTextBox）控件）控件 文本框是一个文本编辑区域，也称为文字编辑文本框是一个文本编辑区域，也称为文字编辑控件控件, ,其对象类名为其对象类名为TextBoxTextBox，默认名称（，默认名称（NameName）和标题（

56、和标题（CaptionCaption）为）为Text1Text1、Text2Text2。 在设计阶段或运行时可以在在设计阶段或运行时可以在文本框输入、修改文本框输入、修改和显示文本和显示文本。通常用于为程序提供输入数据的窗。通常用于为程序提供输入数据的窗口。口。 控件的公共属性也可以用于文本框，此外文本控件的公共属性也可以用于文本框，此外文本框控件还具有如下的特殊属性。框控件还具有如下的特殊属性。第三节 窗体与控件3.3 3.3 常用控件常用控件 3 3）文本框（）文本框（TextBoxTextBox）控件）控件(1)(1)文本框的常用属性文本框的常用属性 TextText：设置文本框中显示的

57、内容。设置文本框中显示的内容。 MaxLenghtMaxLenght：允许在文本框中输入的最大字符数。允许在文本框中输入的最大字符数。 MultilineMultiline：确定文本框是否允许输入或显示多行文本。取值确定文本框是否允许输入或显示多行文本。取值True-True-多多行，取值行，取值FlaseFlase- -单行。单行。 ScrollBarsScrollBars：确定文本框中是否有滚动条确定文本框中是否有滚动条。 PasswordCharPasswordChar：确定所键入的字符或占位符在文本框中是否显示出来，确定所键入的字符或占位符在文本框中是否显示出来，主要用来输入口令。主要

58、用来输入口令。 AlignmentAlignment：确定文本框中文字的对齐方式确定文本框中文字的对齐方式。 LockedLocked（逻辑型）：（逻辑型）：确定文本框是否可被编辑。确定文本框是否可被编辑。 取取False(False(默认值默认值)-)-可编辑可编辑, ,取值取值True-True-不能编辑。不能编辑。 第三节 窗体与控件3 3）文本框（）文本框（TextBoxTextBox）控件）控件(2)(2)文本框的常用方法和事件文本框的常用方法和事件 SetFocusSetFocus方法方法 用于将焦点（输入光标）移到指定的文本框中，以便接用于将焦点（输入光标）移到指定的文本框中，以

59、便接收输入信息。即该方法把光标置于所需的文本框。收输入信息。即该方法把光标置于所需的文本框。 ChangeChange事件事件 用户改变文本框正文或通过程序代码把用户改变文本框正文或通过程序代码把TextText属性设置为属性设置为新值时，将触发新值时，将触发ChangeChange事件。事件。 GetFocusGetFocus事件事件 该事件在文本框获得焦点时触发。可通过按该事件在文本框获得焦点时触发。可通过按TabTab键、单键、单击对象以及在代码中调用击对象以及在代码中调用SetFocusSetFocus方法等接收到焦点。方法等接收到焦点。 LostFocusLostFocus事件事件

60、当按下当按下TabTab键使光标（焦点）离开当前文本框或者鼠标键使光标（焦点）离开当前文本框或者鼠标选择窗体中其他对象时触发该事件。选择窗体中其他对象时触发该事件。第三节 窗体与控件文本框的常用方法和事件举例：文本框的常用方法和事件举例： 例如，建立两个文本框，当第一例如，建立两个文本框，当第一个文本框获得焦点时，将两个文本个文本框获得焦点时，将两个文本框内容清除，设置该文本框的文字框内容清除，设置该文本框的文字为红色、加粗；在第一文本框输入为红色、加粗；在第一文本框输入文字后按文字后按TabTab键离开时，第二个文键离开时，第二个文本框内容与第一个文本框内容相同。本框内容与第一个文本框内容相

61、同。文本框获得焦点时触发事件过程：文本框获得焦点时触发事件过程：Private Sub Text1_GotFocus()Private Sub Text1_GotFocus() Text1.Text = Text1.Text = Text2.Text = Text2.Text = Text1.FontBold = True Text1.FontBold = True Text1.ForeColor = Text1.ForeColor = vbRedvbRed End SubEnd Sub离开文本框触发事件过程离开文本框触发事件过程Sub Text1_LostFocus()Sub Text1_L

62、ostFocus() Text2.Text = Text1.Text Text2.Text = Text1.TextEnd SubEnd Sub第三节 窗体与控件 思考题思考题1 1： -利用Change事件 在窗体上画出3个文本框和两个命令按钮，如图所示。 当程序运行时，用户在第一个文本框内输入一行文字时，在另外两个文本框中同时显示出相同的内容，但显示的字体大小不同。最多只能输入20个字符。第三节 窗体与控件 思考题思考题2 2： -利用Change事件 设计一个程序，窗体中有两个文本框、两个命令按钮，窗体外观如图所示。 当在第一个文本框中输入信息时，立刻在第二个文本框中显示相同的内容；或在

63、第二个文本框中输入信息时，立刻在第一个文本框中显示相同的内容。第三节 窗体与控件3.3 3.3 常用控件常用控件 4 4）按钮（）按钮（CommandButtonCommandButton）控件）控件 按钮控件是指命令按钮，其对象的类名为按钮控件是指命令按钮，其对象的类名为CommandButtonCommandButton，默认名称，默认名称(Name)(Name)和标题（和标题（CaptionCaption）为）为Command1Command1、Command2Command2，它是，它是VBVB应用程序中最常用的控应用程序中最常用的控件。件。 命令按钮通常用来在命令按钮通常用来在单击时

64、执行指定的操作单击时执行指定的操作，即由用，即由用户控制事件的发生，实现一个过程的开始、中断或结束，户控制事件的发生，实现一个过程的开始、中断或结束，提供用户与应用程序间的交互。提供用户与应用程序间的交互。 大多数控件的公共属性都可用于命令按钮，此外命令大多数控件的公共属性都可用于命令按钮，此外命令按钮还有如下的特殊属性：按钮还有如下的特殊属性： 第三节 窗体与控件命令按钮的常用属性命令按钮的常用属性属 性 名功 能 说 明Default设置为True，按回车键操作相当于单击此按钮Cancel设置为True，按“Esc”键操作相当于单击此按钮Enabled控件是否可用，有效/无效Visible

65、控件是否可见，可见/不可见命令按钮的方法和事件：命令按钮的方法和事件： SetFocusSetFocus方法方法 用于将焦点移到指定的命令按钮。即该按钮被激活或获得焦点，该用于将焦点移到指定的命令按钮。即该按钮被激活或获得焦点，该按钮在其按钮在其内侧有一个虚线框内侧有一个虚线框。 ClickClick事件事件 单击命令按钮时发生。它不支持单击命令按钮时发生。它不支持DblClickDblClick( (双击双击) )事件。事件。第三节 窗体与控件 命令按钮的方法和事件举例：命令按钮的方法和事件举例： 例如：例如：设计一个程序，拟在窗体上装入一个图片，在图片上画3个标签。窗体还有三个命令按钮，各

66、控件的位置如图1所示。程序进入运行状态后如图2所示。当单击“显示文本1”命令按钮后，在图片上显示出一些文字，同时此命令按钮变成浅灰色，表示“失效”。若单击“显示文本2”命令按钮，则图片上换成另一段文字，此时“显示文本2”按钮失去作用，而“显示文本1”按钮恢复原状，可以使用。第三节 窗体与控件单击单击单击单击单击单击单击单击1. 用户界面用户界面- 3个标签、三个命令按钮个标签、三个命令按钮图图 12. 属性设置属性设置 窗体的窗体的picture属性属性 命令按钮的命令按钮的caption属性属性 标签的标签的caption属性为空以及属性为空以及Backstyle属性为属性为0（透明）。（透

67、明）。 3. 编写代码编写代码根据题目要求，在程序运行后，若根据题目要求，在程序运行后，若单击单击“显示文本显示文本1”命令按钮命令按钮，应显示出一些文字，并使该命令按钮失效。据此写出应显示出一些文字，并使该命令按钮失效。据此写出command1_Click事件过程（事件过程（command1是命令按钮是命令按钮1的名字）。的名字）。Private Sub Command1_Click() Command1.Enabled = False Command2.Enabled = True Label1.Caption = 锄禾日当午锄禾日当午 Label2.Caption = 汗滴禾下土汗滴禾下

68、土 Label3.Caption = End Sub在执行在执行command1_Click事件过程后，事件过程后，“显示文本显示文本1”命令按钮已变命令按钮已变成灰色（如图成灰色（如图3所示）。所示）。图图 3若若单击单击“显示文本显示文本2”命令按钮命令按钮，则图片上换成另一段文字，此时，则图片上换成另一段文字，此时“显示文本显示文本2”按钮失去作用，而按钮失去作用，而“显示文本显示文本1”按钮恢复原状，可按钮恢复原状，可以使用。以使用。Private Sub Command2_Click() Command1.Enabled = True Command2.Enabled = False

69、 Label1.Caption = Label2.Caption = Label3.Caption = 谁知盘中餐谁知盘中餐 & vbCrLf & 粒粒皆辛苦粒粒皆辛苦End Sub在单击在单击“显示文本显示文本2”命令按钮后，屏幕显示如图命令按钮后，屏幕显示如图4所示。所示。图图 4改进：改进：当当单击单击“显示文本显示文本1”命令按钮后，在图片上显示出一些文字，命令按钮后，在图片上显示出一些文字，同时此命令按钮不可见。同时此命令按钮不可见。按钮不可见按钮不可见按钮不可见按钮不可见若若单击单击“显示文本显示文本2”命令按钮，则图片上换成另一段文字，此命令按钮，则图片上换成另一段文字，此时时“

70、显示文本显示文本2”按钮不可见，而按钮不可见，而“显示文本显示文本1”按钮可以看见。按钮可以看见。 按钮不可见按钮不可见按钮不可见按钮不可见Private Sub Command1_Click() Command1.Visible = False Command2.Visible = True Label1.Caption = 锄禾日当午锄禾日当午 Label2.Caption = 汗滴禾下土汗滴禾下土 Label3.Caption = End SubPrivate Sub Command2_Click() Command1.Visible = True Command2.Visible = False Label1.Caption = Label2.Caption = Label3.Caption = 谁知盘中餐谁知盘中餐 & vbCrLf & 粒粒皆辛苦粒粒皆辛苦End Sub注：注：Enabled和和Visible属性不仅可用于命令按钮，也可用于窗体。属性不仅可用于命令按钮，也可用于窗体。