第2章 Vb简单的程序设计.ppt

《第2章 Vb简单的程序设计.ppt》由会员分享，可在线阅读，更多相关《第2章 Vb简单的程序设计.ppt（58页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、 山东科技大学（泰安）信息工程系山东科技大学（泰安）信息工程系第二章 VB基本控件及简单程序设计（1 1）理解面向对象程序设计的方法）理解面向对象程序设计的方法;（2 2）掌握窗体对象的常用属性、事件和方法及其使用）掌握窗体对象的常用属性、事件和方法及其使用;（3 3）掌握一个）掌握一个Visual BasicVisual Basic应用程序的组成应用程序的组成;（4 4）掌握开发一个）掌握开发一个Visual BasicVisual Basic应用程序的一般步骤。应用程序的一般步骤。本章主要任务：本章主要任务：1 山东科技大学（泰安）信息工程系山东科技大学（泰安）信息工程系2.1 VB2.1

2、 VB中的基本概念中的基本概念 一、对象与类一、对象与类1.对象对象 是基本的运行时的实体，如窗体、各种控件等，它包括作是基本的运行时的实体，如窗体、各种控件等，它包括作用于对象的操作（方法）和对象的响应（事件）。用于对象的操作（方法）和对象的响应（事件）。将数据和处理这些数据的过程封装在一起。将数据和处理这些数据的过程封装在一起。2.类类 类是一个抽象的整体概念类是一个抽象的整体概念，对象是类的实例化。，对象是类的实例化。类与对象是面向对象程序设计语言的基础。类与对象是面向对象程序设计语言的基础。以以“汽车汽车”为例，说明类与对象的关系。为例，说明类与对象的关系。汽车是一个笼统的名称，是整体

3、概念，我们把汽车看成一汽车是一个笼统的名称，是整体概念，我们把汽车看成一个个“类类”，一辆辆具体的汽车（比如你的汽车）就是这个类的，一辆辆具体的汽车（比如你的汽车）就是这个类的实例，也就是这个类的对象。实例，也就是这个类的对象。2 山东科技大学（泰安）信息工程系山东科技大学（泰安）信息工程系 工工具具箱箱的的各各种种控控件件并并不不是是对对象象，而而是是代代表表了了各各个个不不同同的的类类。通通过过类类的的实实例例化化，可可以以得得到到真真正正的的对对象象。当当在在窗窗体体上上画画一一个个控控件件时时，就就将将类类转转换换为为对对象象，即即创创建建了了一一个个控控件件对对象象，也也简简称称为为

4、控件。控件。VB中的类与对象2.1 VB2.1 VB中的基本概念中的基本概念 3 山东科技大学（泰安）信息工程系山东科技大学（泰安）信息工程系3、对、对 象的建立和命名象的建立和命名（1）对象的建立）对象的建立 方法一：方法一：单击工具箱控件对象单击工具箱控件对象 在窗体上按住在窗体上按住左键拖拉到所需要的大小后释放。左键拖拉到所需要的大小后释放。方法二：方法二：双击工具箱控件对象，则立即在窗体出现一双击工具箱控件对象，则立即在窗体出现一个默认大小的对象框。个默认大小的对象框。（2）编辑对象）编辑对象 先选中对象（单击对象），先选中对象（单击对象），放大、缩小放大、缩小 删除对象删除对象 复制

5、对象复制对象2.1 VB2.1 VB中的基本概念中的基本概念 4 山东科技大学（泰安）信息工程系山东科技大学（泰安）信息工程系（3）对象的命名）对象的命名 每一个对象都有有自己的名字每一个对象都有有自己的名字。每个窗体、控件对象在建每个窗体、控件对象在建立时立时VB系统给出了一个默认名。用户可通过属性窗口设置（名系统给出了一个默认名。用户可通过属性窗口设置（名称）来给对象命名。称）来给对象命名。命名的原则：命名的原则：1）必须由字母或汉字开头、随后可以是字母、汉字、数字、必须由字母或汉字开头、随后可以是字母、汉字、数字、下划线（最好不用）串组成。下划线（最好不用）串组成。2）长度长度=255个

6、字符。个字符。智能化命名规则智能化命名规则(参考参考)：用前用前3个小写字母组成前缀（指明对象的类型）和表示该个小写字母组成前缀（指明对象的类型）和表示该对象作用的缩写字母组成对象作用的缩写字母组成。例如用。例如用cmdDisp命名一个带有命名一个带有“显显示示”字样的命令按钮。字样的命令按钮。2.1 VB2.1 VB中的基本概念中的基本概念 5 山东科技大学（泰安）信息工程系山东科技大学（泰安）信息工程系二、属二、属 性（性（Property）属属 性性,即对象中的数据，所有对象都有自己的属性。即对象中的数据，所有对象都有自己的属性。它们是用来描它们是用来描述和反映对象特征的参数。例如：控件

7、名称（述和反映对象特征的参数。例如：控件名称（Name)、标题标题（Caption)、颜色（颜色（Color)、字体（字体（FontName)等属性决定了对象等属性决定了对象展现给用户的界面具有什么样的外观及功能。展现给用户的界面具有什么样的外观及功能。对象属性设置的方法：对象属性设置的方法：方法一：方法一：在设计模式下，通过属性窗口直接设置对象的属性。在设计模式下，通过属性窗口直接设置对象的属性。方法二：方法二：在程序的代码中通过赋值实现，其格式为：在程序的代码中通过赋值实现，其格式为：对象对象.属性属性=属性值属性值 例如：例如：cmdDisp.Caption=“显示显示”2.1 VB2.

8、1 VB中的基本概念中的基本概念 6 山东科技大学（泰安）信息工程系山东科技大学（泰安）信息工程系三、事件（三、事件（Event）及事件过程（及事件过程（Event Procedure）事件事件 可被对象识别的动作。可被对象识别的动作。事件过程事件过程 是指附在该是指附在该 对象上的程序代码，是事件触发对象上的程序代码，是事件触发后处理的程序。事件过程的形式如下：后处理的程序。事件过程的形式如下：Sub 对象名对象名_事件过程名事件过程名（参数列表）（参数列表）.(事件过程代码）事件过程代码）End Sub例如：例如：Sub cmdHide_Click()CmdHide.Visible=Fal

9、se End Sub2.1 VB2.1 VB中的基本概念中的基本概念 7 山东科技大学（泰安）信息工程系山东科技大学（泰安）信息工程系四、方四、方 法（法（Method）在对象上可操作的过程，是在对象上可操作的过程，是VB系统提供的一种特殊的过程系统提供的一种特殊的过程和函数和函数方法。方法是面向对象的，所以对象的方法调用一方法。方法是面向对象的，所以对象的方法调用一般要指明对象。般要指明对象。对象方法对象方法 调用形式：调用形式：对象对象.方法方法 参数列表参数列表 如省略对象，表示对当前对象，一般指窗体。如省略对象，表示对当前对象，一般指窗体。例如：例如：Form1.Print VB程序设

10、计程序设计 2.1 VB2.1 VB中的基本概念中的基本概念 8 山东科技大学（泰安）信息工程系山东科技大学（泰安）信息工程系v 在传统的面向过程的应用程序中，执行哪一部分在传统的面向过程的应用程序中，执行哪一部分代码和按何种顺序执行代码都由程序本身控制。代码和按何种顺序执行代码都由程序本身控制。而在面向对象的程序设计中，编程人员要以而在面向对象的程序设计中，编程人员要以“对对象象”为中心来设计模块，而不是以为中心来设计模块，而不是以“过程过程”为中为中心来考虑应用程序的结构，此外，在事件驱动应心来考虑应用程序的结构，此外，在事件驱动应用程序中，代码不是按预定的顺序执行，而是在用程序中，代码不

11、是按预定的顺序执行，而是在响应不同的事件时执行不同的代码段。响应不同的事件时执行不同的代码段。五、五、VB应用程序的工作方式应用程序的工作方式 VB应用程序采用的是以事件驱动应用程序的工作方式。应用程序采用的是以事件驱动应用程序的工作方式。9 山东科技大学（泰安）信息工程系山东科技大学（泰安）信息工程系v事件是可以由窗体或控件识别的操作。在响应事事件是可以由窗体或控件识别的操作。在响应事件时，事件驱动应用程序执行指定的代码。事件件时，事件驱动应用程序执行指定的代码。事件可以由用户操作触发，也可以由来自操作系统或可以由用户操作触发，也可以由来自操作系统或其他应用程序的消息触发，甚至由应用程序本身

12、其他应用程序的消息触发，甚至由应用程序本身的消息触发。这些事件的顺序决定了代码执行的的消息触发。这些事件的顺序决定了代码执行的顺序，因此，在事件驱动应用程序中，每次运行顺序，因此，在事件驱动应用程序中，每次运行时所执行的代码和所经过的时所执行的代码和所经过的“路径路径”是不一样的。是不一样的。10 山东科技大学（泰安）信息工程系山东科技大学（泰安）信息工程系v Visual Basic的每个窗体和控件都有一个预定义的每个窗体和控件都有一个预定义的事件集，当其中的某个事件发生，并且在相关的事件集，当其中的某个事件发生，并且在相关联的事件过程中存在代码时，联的事件过程中存在代码时，Visual B

13、asic将执行将执行这些代码。这些代码。v尽管尽管Visual Basic中的对象能自动识别预定义中的对象能自动识别预定义的事件集，但必须通过代码判定它们是否响应具的事件集，但必须通过代码判定它们是否响应具体事件以及如何响应具体事件，代码（即事件过体事件以及如何响应具体事件，代码（即事件过程）与每个事件对应。为了让窗体或控件响应某程）与每个事件对应。为了让窗体或控件响应某个事件，必须把代码放入这个事件的事件过程之个事件，必须把代码放入这个事件的事件过程之中。中。11 山东科技大学（泰安）信息工程系山东科技大学（泰安）信息工程系v对象所能识别的事件类型有很多种，但多数类型对象所能识别的事件类型有

14、很多种，但多数类型为大多数对象所共有。例如，大多数对象都能识为大多数对象所共有。例如，大多数对象都能识别别Click事件，即单击事件。如果单击窗体，则执事件，即单击事件。如果单击窗体，则执行窗体的单击事件过程中的代码；如果单击命令行窗体的单击事件过程中的代码；如果单击命令按钮，则执行命令按钮的单击事件过程中的代码。按钮，则执行命令按钮的单击事件过程中的代码。此外，某些事件可以在运行期间触发。例如，当此外，某些事件可以在运行期间触发。例如，当在运行期间改变文本框中的文本时，将引发文本在运行期间改变文本框中的文本时，将引发文本框的框的Change事件，如果事件，如果Change事件过程中含有代事件

15、过程中含有代码，则执行这些代码。码，则执行这些代码。12 山东科技大学（泰安）信息工程系山东科技大学（泰安）信息工程系五、五、VB应用程序的工作方式应用程序的工作方式 VB应用程序采用的是以事件驱动应用程序的工作方式。应用程序采用的是以事件驱动应用程序的工作方式。下面是事件驱动应用程序中的典型工作方式：下面是事件驱动应用程序中的典型工作方式：1、启动应用程序，装载和显示窗体。、启动应用程序，装载和显示窗体。2、窗窗体体（或或窗窗体体上上的的控控件件）接接收收事事件件。事事件件可可由由用用户户引引发发（例例如如通通过过键键盘盘或或鼠鼠标标操操作作），可可由由系系统统引引发发（例例如如定定时时器器

16、事事件件），也也可可由由代代码码间间接接引引发发（例例如如当当代代码码装装载载窗窗体体时时的的Load事件）。事件）。3、如如果果在在相相应应的的事事件件过过程程中中已已编编写写了了相相应应的的程程序序代代码码，就执行该代码。就执行该代码。4、应用程序等待下一次事件。、应用程序等待下一次事件。2.1 VB2.1 VB中的基本概念中的基本概念 13 山东科技大学（泰安）信息工程系山东科技大学（泰安）信息工程系2.2 窗体对象 窗体属性决定了窗体的外观与操作。窗体外观窗体属性决定了窗体的外观与操作。窗体外观 如下图如下图 最小化按钮最小化按钮14 山东科技大学（泰安）信息工程系山东科技大学（泰安）

17、信息工程系一一.属性属性（一）基本属性（一）基本属性1.Name名称属性（任何对象都具有的）名称属性（任何对象都具有的）创建的对象名称创建的对象名称,有默认的名有默认的名.在程序中，控件名是作为对在程序中，控件名是作为对象的标识而引用，不会显示在窗体上。象的标识而引用，不会显示在窗体上。2.Height、width、top和和left属性属性 单位为单位为twip：1 twip=1/20点点=1/1440英寸英寸=1/567cm 2.2 窗体对象 15 山东科技大学（泰安）信息工程系山东科技大学（泰安）信息工程系3Caption 标题属性：标题属性：决定出现在窗体的标题栏上的文本内容。决定出现

18、在窗体的标题栏上的文本内容。4.字体字体Font属性组属性组 FontName属性是字符型，决定对象上正文的字体（缺省为宋体）。属性是字符型，决定对象上正文的字体（缺省为宋体）。FontSize属性是整型，决定对象上正文的字体大小。属性是整型，决定对象上正文的字体大小。FontBold属性是逻辑型，决定对象上正文是否是粗体。属性是逻辑型，决定对象上正文是否是粗体。FontItalic属性是逻辑型，决定对象上正文是否是斜体。属性是逻辑型，决定对象上正文是否是斜体。FontStrikeThru属性是逻辑型，决定对象上正文是否加一删除线。属性是逻辑型，决定对象上正文是否加一删除线。FontUnder

19、Line属性是逻辑型，决定对象上正文是否带下划线。属性是逻辑型，决定对象上正文是否带下划线。2.2 窗体对象 16 山东科技大学（泰安）信息工程系山东科技大学（泰安）信息工程系窗体名窗体名.Caption=字字符串符串v窗体的属性窗体的属性Name：设置窗体的名称。设置窗体的名称。所有对象都具有该属性；所有对象都具有该属性；在同一范围内不允许该属性值相同；在同一范围内不允许该属性值相同；该属性只能通该属性只能通过属性窗口设置，在代码窗口中不能改变。过属性窗口设置，在代码窗口中不能改变。Caption：设置窗体标题栏上显示的内容。设置窗体标题栏上显示的内容。在代码窗口在代码窗口修改该属性值的语法

20、格式为：修改该属性值的语法格式为：注意它与注意它与Name属性的区别属性的区别NameCaptionCommand1.Caption=确定确定对象名对象名.属性名属性名=属性值属性值Sub 对象名对象名_事件名事件名()对象名对象名.方法方法(参数参数)17 山东科技大学（泰安）信息工程系山东科技大学（泰安）信息工程系5.Enabled属性（逻辑值）属性（逻辑值）决定控件是否可操作。决定控件是否可操作。True：允许用户进行操作，并对操作出响应允许用户进行操作，并对操作出响应（缺省（缺省值）值）。False：窗体上控件呈暗淡色，禁止用户进行操作。：窗体上控件呈暗淡色，禁止用户进行操作。6.Vi

21、sible属性（逻辑值）属性（逻辑值）决定控件是否可见决定控件是否可见 True：运行时控件可见运行时控件可见（缺省值）（缺省值）。False：运行时控件隐藏，用户看不到，但控件本身运行时控件隐藏，用户看不到，但控件本身是存在的。是存在的。2.2 窗体对象 18 山东科技大学（泰安）信息工程系山东科技大学（泰安）信息工程系窗体名窗体名.AutoRedraw=True|Falsev窗体的属性窗体的属性AutoRedraw：设置窗体被遮盖后是否要自动重绘窗体上设置窗体被遮盖后是否要自动重绘窗体上的内容。语法格式为：的内容。语法格式为：BackColor、ForeColor：返回或设置窗体的背景颜色

22、和返回或设置窗体的背景颜色和前景颜色。前景颜色。属性值是一个属性值是一个16进制的常数；通常在编写代码时，常用进制的常数；通常在编写代码时，常用Qbcolor或或RGB函数为其设置颜色。函数为其设置颜色。Form1.BackColor=&HFF0000 低字节到高字节依次低字节到高字节依次 表示红、绿和蓝的值表示红、绿和蓝的值Form1.BackColor=RGB(255,0,0)Form1.ForeColor=vbRedRGB颜色函数讲解颜色函数讲解 蓝蓝红红绿绿256等份等份256等份等份256等份等份Form1.BackColor=RGB(255,13,222)19 山东科技大学（泰安）

23、信息工程系山东科技大学（泰安）信息工程系（二）窗体的其它常用属性（二）窗体的其它常用属性 1MaxButton最大化按钮和最大化按钮和MinButton最小化按钮：最小化按钮：当当值为值为 True，有最大或最小化按钮，有最大或最小化按钮，False则无。则无。2Icon 控制图标属性：控制图标属性：返回或设置窗体左上角显示或返回或设置窗体左上角显示或最小化时显示的图标。最小化时显示的图标。注意：此属性必须在注意：此属性必须在ControlBox属性设置为属性设置为True才有效才有效 3ControlBox控制菜单框属性：控制菜单框属性：设置设置True为有，如为有，如设设置为置为False

24、则无控件菜单，同时窗体也无最大化按钮和最小化则无控件菜单，同时窗体也无最大化按钮和最小化按钮，即使按钮，即使MaxButton属性和属性和MinButton属性设置为属性设置为True。2.2 窗体对象 20 山东科技大学（泰安）信息工程系山东科技大学（泰安）信息工程系 4Picture图片属性：图片属性：设置窗体中要显示的图片。加载图片设置窗体中要显示的图片。加载图片操作同操作同Icon 控制图标属性。控制图标属性。5.BorderStyle：边框风格边框风格,通过改变通过改变 BorderStyle 属性，属性，可以控制窗体如何调整大小。可以控制窗体如何调整大小。0-None：无边框；无边

25、框；1-Fixed Single：单线边框，不可以改变窗口大小；单线边框，不可以改变窗口大小；2-Sizable：双线边框，可以改变窗口大小；双线边框，可以改变窗口大小；3-Fixed Double：双线框架，不可以改变窗口大小。双线框架，不可以改变窗口大小。4-Fixed Tool Window:窗体外观与工具条相似。有关闭按钮窗体外观与工具条相似。有关闭按钮，不，不可以改变窗口大小。可以改变窗口大小。5-Sizable Tool Window：窗体外观与工具条相似。有关闭按钮窗体外观与工具条相似。有关闭按钮，可以改变窗口大小。，可以改变窗口大小。2.2 窗体对象 21 山东科技大学（泰安）

26、信息工程系山东科技大学（泰安）信息工程系 6.WindowsState属性属性 0-Normal：正常窗口状态，有窗口边界；正常窗口状态，有窗口边界；1：最小化状态，以图标方式运行；：最小化状态，以图标方式运行；2：最大化状态，无边框，充满整个屏幕。：最大化状态，无边框，充满整个屏幕。7.AutoRedraw属性属性 该属性决定窗体被隐藏、改变大小或被另一窗口覆盖之后该属性决定窗体被隐藏、改变大小或被另一窗口覆盖之后重新显示，是否重新还原该窗体被隐藏或覆盖以前的画面。即重新显示，是否重新还原该窗体被隐藏或覆盖以前的画面。即是否重画如是否重画如Circle、Line、Pset和和Print等方法

27、的输出。等方法的输出。当为当为True时，重新还原该窗体以前的画面。时，重新还原该窗体以前的画面。当为当为False时，则不重画该窗体以前的画面。时，则不重画该窗体以前的画面。2.2 窗体对象 22 山东科技大学（泰安）信息工程系山东科技大学（泰安）信息工程系三、事件三、事件 最常用的事件最常用的事件1 Click/DblClick：单击单击/双击窗体触发。双击窗体触发。2 Load：窗体被装入时触发的事件。该事件通常用来在启窗体被装入时触发的事件。该事件通常用来在启动应用动应用 程序时对属性和变量进行初始化。程序时对属性和变量进行初始化。3、Unload事件事件 卸载窗体时触发该事件。卸载窗

28、体时触发该事件。4、Resize事件事件 无无论论是是因因为为用用户户交交互互，还还是是通通过过代代码码调调整整窗窗体体的的大大小小，都都会触发一个会触发一个Resize事件事件。2.2 窗体对象 23 山东科技大学（泰安）信息工程系山东科技大学（泰安）信息工程系v窗体的事件窗体的事件不同的对象对应不同事件的发生，不同的对象对应不同事件的发生，VB中窗体有很多事件。中窗体有很多事件。在一个窗体的代码窗口中列出了所有窗体事件。在一个窗体的代码窗口中列出了所有窗体事件。在此选中对象在此选中对象列出选中对象事件列出选中对象事件24 山东科技大学（泰安）信息工程系山东科技大学（泰安）信息工程系v窗体的

29、事件窗体的事件 ActivateActivate：当窗体变为激活的当前窗口时，引发本事件。当窗体变为激活的当前窗口时，引发本事件。Click：当用户单击窗体时触发本事件：当用户单击窗体时触发本事件。DblClickDblClick：当用户双击窗体时触发本事件。当用户双击窗体时触发本事件。DeactivateDeactivate：当窗体失去激活状态，即另一个窗体成为当当窗体失去激活状态，即另一个窗体成为当前窗口时，引发本事件。前窗口时，引发本事件。LoadLoad：当窗体被加载到内存时触发本事件。当窗体被加载到内存时触发本事件。Load事件往事件往往用于在启动程序时对属性和变量进行初始化。往用于

30、在启动程序时对属性和变量进行初始化。Unload：当关闭窗体时，触发卸载事件，将窗体从内存当关闭窗体时，触发卸载事件，将窗体从内存中卸载。中卸载。注意：注意：Load事件事件发发生生时时窗体是不活窗体是不活动动的，而的，而Activate事件事件发发生生时时窗体是活窗体是活动动的，的，Print方法不能在不活方法不能在不活动动窗体上使用，窗体上使用，因此因此Print不能用于不能用于Load事件中。事件中。“双击双击”实际上触发两个事件，第一次按实际上触发两个事件，第一次按鼠标按钮时产生鼠标按钮时产生Click单击事件，第二次按鼠单击事件，第二次按鼠标按钮时产生标按钮时产生DblClick事件

31、事件。Private Sub Form_Click()Form1.BackColor=vbRedEnd SubPrivate Sub Form_Click()Form1.BackColor=vbRedEnd Sub 当触发了当触发了Form对象的对象的Click事件时，该事件时，该事件过程事件过程Form_Click就会被执行。就会被执行。？窗体名称为窗体名称为Form1 当用户双击窗体时，当用户双击窗体时，窗体不断变小，窗体不断变小，则应则应该添加什么事件过程该添加什么事件过程？25 山东科技大学（泰安）信息工程系山东科技大学（泰安）信息工程系v Print在在Load和和Activate事

32、件中的区别。事件中的区别。Private Sub Form_Load()Print*End SubPrivate Sub Form_Activate()Print*End Sub26 山东科技大学（泰安）信息工程系山东科技大学（泰安）信息工程系&例：程序运行时，用户在窗体上输入字符时，窗体例：程序运行时，用户在窗体上输入字符时，窗体上显示输入结果。上显示输入结果。分析：分析：添加什么事件过程添加什么事件过程在窗体上显示输入结果用什么代码在窗体上显示输入结果用什么代码当用户输入当用户输入a时触发了时触发了Form_KeyPress事件过程，该过程的参数事件过程，该过程的参数KeyAscii值是多

33、少？通过什么方法在窗体上显示出值是多少？通过什么方法在窗体上显示出a？代码：代码：Form_KeyPress97Private Sub Form_KeyPress(KeyAscii As Integer)Print Chr(KeyAscii)End SubForm1.printchr(x)函数：将函数：将ASCII码转换为对应的字符码转换为对应的字符;27 山东科技大学（泰安）信息工程系山东科技大学（泰安）信息工程系v窗体的方法窗体的方法在代码窗口中，输入在代码窗口中，输入“form1.”后，会显示该窗体对象后，会显示该窗体对象的所有属性和方法。的所有属性和方法。对象的属性和方法对象的属性和方

34、法属性属性方法方法28 山东科技大学（泰安）信息工程系山东科技大学（泰安）信息工程系常常用方法用方法窗体常用的方法有：窗体常用的方法有：打印输出打印输出Print 移动移动Move 清除清除Cls 显示显示Show 隐藏隐藏Hide等方法。等方法。方法的使用的形式方法的使用的形式:对象对象.方法方法 参数参数 2.2 窗体对象 29 山东科技大学（泰安）信息工程系山东科技大学（泰安）信息工程系Show(显示显示)方法方法 Show方方法法用用于于在在屏屏幕幕上上显显示示一一个个窗窗体体，调调用用 Show 方方法法与与设置窗体设置窗体 Visible 属性为属性为 True 具有相同的效果。具

35、有相同的效果。其调用格式如下：其调用格式如下：窗体名窗体名.Show vbModal|vbModeless说说明明:（1）它它有有两两种种可可能能值值：vbModal 或或 vbModeless（缺缺省省）。当当参参数数为为vbModal时时，要要求求用用户户必必须须对对当当前前的的窗窗口口或或对话框做出响应，才能切换到其他窗口。对话框做出响应，才能切换到其他窗口。（2）如如果果要要显显示示的的窗窗体体事事先先未未装装入入，该该方方法法会会自自动动装装入该窗体再显示。入该窗体再显示。（补充）窗体对象 30 山东科技大学（泰安）信息工程系山东科技大学（泰安）信息工程系Hide（隐藏）方法隐藏）方

36、法 Hide方方法法用用于于使使指指定定的的窗窗体体不不显显示示，但但不不从从内内存存中中删删除除窗体。其调用格式为：窗体。其调用格式为：窗体名窗体名.Hide 说说明明：当当一一个个窗窗体体从从屏屏幕幕上上隐隐去去时时，其其Visible属属性性被被设设置置成成False，并并且且该该窗窗体体上上的的控控件件也也变变得得不不可可访访问问，但但对对运运行行程程序序间间的的数数据据引引用用无无影影响响。若若要要隐隐去去的的窗窗体体没没有有装装入入，则则Hide方法会装入该窗体但不显示。方法会装入该窗体但不显示。（补充）窗体对象 31 山东科技大学（泰安）信息工程系山东科技大学（泰安）信息工程系例

37、例 实现将指定的窗体在屏幕上进行显示或隐藏的切换。实现将指定的窗体在屏幕上进行显示或隐藏的切换。为为了了实实现现这这一一功功能能，可可以以在在窗窗体体Forml的的“代代码码”窗窗口口中中输入下列代码：输入下列代码：Private Sub Form_Click()Form1.Hide 隐藏窗体隐藏窗体 MsgBox 单击确定按钮，使窗体重现屏幕单击确定按钮，使窗体重现屏幕 显示信息显示信息 Form1.Show 重现窗体重现窗体End Sub（补充）（补充）窗体对象窗体对象 32 山东科技大学（泰安）信息工程系山东科技大学（泰安）信息工程系v窗体的方法窗体的方法Print：用于将文本输出到窗体

38、的一行上。调用格式：用于将文本输出到窗体的一行上。调用格式：对象名对象名.Print 输出项列表输出项列表;|,对象除了窗体外，还可以是图片框对象除了窗体外，还可以是图片框(PictureBox)、Debug或打印或打印机机(Printer)，若缺省对象名，表示将文本输出到当前窗体上。若缺省对象名，表示将文本输出到当前窗体上。输出项列表：是由输出项列表：是由0个、个、1个或多个待输出的数值表达式或字符串个或多个待输出的数值表达式或字符串表达式构成；当输出项是由多个项构成，则中间必须用逗号或分表达式构成；当输出项是由多个项构成，则中间必须用逗号或分号分隔；若号分隔；若Print后什么都不跟，则表

39、示输出一个空行。后什么都不跟，则表示输出一个空行。如下代码：如下代码：Private Sub Form_Click()Print 1,-2 Print Print We,studyEnd Sub标准格式标准格式33 山东科技大学（泰安）信息工程系山东科技大学（泰安）信息工程系v窗体的方法窗体的方法Print：用于将文本输出到窗体的一行上。调用格式：用于将文本输出到窗体的一行上。调用格式：对象名对象名.Print 输出项列表输出项列表;|,对象除了窗体外，还可以是图片框对象除了窗体外，还可以是图片框(PictureBox)、Debug或打印或打印机机(Printer)，若缺省对象名，表示将文本输

40、出到当前窗体上。若缺省对象名，表示将文本输出到当前窗体上。输出项列表：是由输出项列表：是由0个、个、1个或多个待输出的数值表达式或字符串个或多个待输出的数值表达式或字符串表达式构成；当输出项是由多个项构成，则中间必须用逗号或分表达式构成；当输出项是由多个项构成，则中间必须用逗号或分号分隔；若号分隔；若Print后什么都不跟，则表示输出一个空行。后什么都不跟，则表示输出一个空行。如下代码：如下代码：Private Sub Form_Click()Print 1;-2 Print Print We;studyEnd Sub紧缩格式紧缩格式注意：注意：标准格式即参数以标准格式即参数以“,”分割，下一

41、个输出项将与上一分割，下一个输出项将与上一个输出项间隔个输出项间隔14列；紧缩格式即参数以列；紧缩格式即参数以“;”分割，下分割，下一个输出项将以紧凑格式，紧跟着上一个输出项输出。一个输出项将以紧凑格式，紧跟着上一个输出项输出。Print方法输出的位置是由窗体的绘图坐标方法输出的位置是由窗体的绘图坐标CurrentX和和CurrentY属性决定的，默认为对象的左上角属性决定的，默认为对象的左上角(0,0)。该方法可以结合定位输出函数一起使用：该方法可以结合定位输出函数一起使用：Spc(n)：在下一个输出项前插入在下一个输出项前插入n个空格；个空格；Tab(n)：输出定位在绝对输出定位在绝对n列

42、号上。列号上。代码：代码：1197513111591317Private Sub Form_Click()End Sub Print Tab(11);A Print Tab(9);B;Spc(3);B Print Tab(7);C;Spc(3);C;Spc(3);C Print Tab(5);D;Spc(3);D;Spc(3);D;Spc(3);D1086433333334 山东科技大学（泰安）信息工程系山东科技大学（泰安）信息工程系v窗体的方法窗体的方法Cls方法：用于清除运行时窗体上或图形上的用方法：用于清除运行时窗体上或图形上的用Print方方法生成的文本和图形。语法格式：法生成的文本和

43、图形。语法格式：对象名对象名.Cls对象名可以是窗体或图片框。当对象名缺省时，表示对象名可以是窗体或图片框。当对象名缺省时，表示清除当前窗体上的内容。清除当前窗体上的内容。例如：例如：Form1.ClsCls Picture1.Cls35 山东科技大学（泰安）信息工程系山东科技大学（泰安）信息工程系v窗体的方法窗体的方法Move(移动移动)方法：用于移动对象，并且可以在移动时方法：用于移动对象，并且可以在移动时变化对象的大小。变化对象的大小。语法格式：语法格式：对象名对象名.Move Left,Top,Width,Height其中，对象名可以是窗体和除时钟、菜单以外其中，对象名可以是窗体和除时

44、钟、菜单以外的所有控件。窗体名缺省的所有控件。窗体名缺省(即未选对象名即未选对象名)时，默时，默认为当前窗体。认为当前窗体。Move方法中的方法中的Left、Top、Width、Height4个参数，单位为个参数，单位为twip(像素像素)。36 山东科技大学（泰安）信息工程系山东科技大学（泰安）信息工程系&例：编写一个程序，实现功能：每单击窗体一次，例：编写一个程序，实现功能：每单击窗体一次，窗体向右移动。窗体向右移动。思路：窗体向右移动是一个动作，应该执行什么方法；思路：窗体向右移动是一个动作，应该执行什么方法；该动作是被什么对象的什么事件触发的？该动作是被什么对象的什么事件触发的？代码：

45、代码：Private Sub Form_Click()Form1.Move Left+1500 End Submove窗体窗体click Form1.Move Left+1500,Top,Width+1500End Sub？每次移动并变大如何实现每次移动并变大如何实现37 山东科技大学（泰安）信息工程系山东科技大学（泰安）信息工程系v编程实现：单击和双击窗体时分别改变标签和窗体编程实现：单击和双击窗体时分别改变标签和窗体标题栏的文字，单击单选按钮改变标签文字。标题栏的文字，单击单选按钮改变标签文字。v界面设计界面设计对对象象属性属性属性属性值值FormNameForm1Caption学学习习之

46、道之道LabelNameLabel1Caption空白空白BackColor&H00FFC0C0&OptionButtonNameOption1Caption上上课课OptionButtonNameOption2Caption复复习习属性设置属性设置38 山东科技大学（泰安）信息工程系山东科技大学（泰安）信息工程系v编写代码编写代码Private Sub Form_Click()窗体的单击事件过程窗体的单击事件过程 Label1.Caption=成功通过考试！成功通过考试！End SubPrivate Sub Form_DblClick()窗体的双击事件过程窗体的双击事件过程 Form1.Ca

47、ption=欢迎你学习欢迎你学习VB！End SubPrivate Sub Option1_Click()单选按钮的单击事件过程单选按钮的单击事件过程 Label1.Caption=听明白听明白 勤思考勤思考 记下来！记下来！End SubPrivate Sub Option2_Click()单选按钮的单击事件过程单选按钮的单击事件过程 Label1.Caption=多上机多上机 善提问善提问 多总结！多总结！End Sub39 山东科技大学（泰安）信息工程系山东科技大学（泰安）信息工程系一、一、创建应用程序的步骤创建应用程序的步骤：分析问题，确定程序要完成什么任务，按下面的步骤创建分析问题，

48、确定程序要完成什么任务，按下面的步骤创建应用程序。应用程序。（1 1）新建工程。）新建工程。创建一个应用程序首先要打开一个新的工程。创建一个应用程序首先要打开一个新的工程。（2 2）创建应用程序界面。）创建应用程序界面。（3 3）设置属性值。）设置属性值。（4 4）对象事件过程的编程。）对象事件过程的编程。（5 5）保存文件。）保存文件。（6 6）程序运行与调试）程序运行与调试;再次保存修改后的程序。再次保存修改后的程序。2.2 简单应用程序的建立40 山东科技大学（泰安）信息工程系山东科技大学（泰安）信息工程系v1.建立用户界面建立用户界面v用户界面由对象，即窗体和控件组成，所有的控件都放在

49、用户界面由对象，即窗体和控件组成，所有的控件都放在窗体上（一个窗体最多可容纳窗体上（一个窗体最多可容纳255个控件），程序中的所个控件），程序中的所有信息都要通过窗体显示出来，它是应用程序的最终用户有信息都要通过窗体显示出来，它是应用程序的最终用户界面。在应用程序中要用到哪些控件，就在窗体上建立相界面。在应用程序中要用到哪些控件，就在窗体上建立相应的控件。程序运行后，将在屏幕上显示由窗体和控件组应的控件。程序运行后，将在屏幕上显示由窗体和控件组成的用户界面。成的用户界面。v启动启动Visual Basic后，屏幕上将显示一个窗体，默认名称为后，屏幕上将显示一个窗体，默认名称为Form1，可以在

50、这个窗体上设置用户界面。如果要建立新，可以在这个窗体上设置用户界面。如果要建立新的窗体，可以单击的窗体，可以单击“工程工程”“添加窗体添加窗体”命令来实现。命令来实现。41 山东科技大学（泰安）信息工程系山东科技大学（泰安）信息工程系v2.设置窗体和控件的属性设置窗体和控件的属性v建立界面后，就可以设置窗体和每个控件的属性。建立界面后，就可以设置窗体和每个控件的属性。在实际的应用程序设计中，建立界面和设置属性在实际的应用程序设计中，建立界面和设置属性可以同时进行，即每画完一个控件，接着就设置可以同时进行，即每画完一个控件，接着就设置该控件的属性。当然，也可以在所有的对象建立该控件的属性。当然，