Visual Basic语言程序的设计教程第4章 常标准控件

《Visual Basic语言程序的设计教程第4章 常标准控件》由会员分享，可在线阅读，更多相关《Visual Basic语言程序的设计教程第4章 常标准控件（91页珍藏版）》请在装配图网上搜索。

1、1本章的学习要点本章的学习要点 标签、文本框的常用属性、事件、方法标签、文本框的常用属性、事件、方法 命令按钮的常用属性、事件和方法命令按钮的常用属性、事件和方法 图片框、图像框的属性、事件、方法；图形文件的载入图片框、图像框的属性、事件、方法；图形文件的载入 框架的属性和功能框架的属性和功能 复选框、单选按纽的常用属性、事件、方法复选框、单选按纽的常用属性、事件、方法 列表框、组合框的常用属性、事件、方法列表框、组合框的常用属性、事件、方法 滚动条、计时器的常用属性、事件、方法滚动条、计时器的常用属性、事件、方法2 工具箱控件图解工具箱控件图解4.1 概述概述指示器指示器标签标签框架框架复选

2、框复选框组合框组合框水平滚动条水平滚动条时钟时钟目录列表框目录列表框形状形状图象框图象框OLE图片框图片框文本框文本框命令按钮命令按钮单选按钮单选按钮列表框列表框垂直滚动条垂直滚动条驱动器列表驱动器列表文件列表文件列表LINEData3 控件是控件是VB中预先定义好了的、程序中能够直接使用的对象，中预先定义好了的、程序中能够直接使用的对象，每个控件都有自己的属性、事件和方法。每个控件都有自己的属性、事件和方法。 VB有三种控件：有三种控件： 标准控件：标准控件：存在于工具栏中，不可删除。被封装在存在于工具栏中，不可删除。被封装在VB的的 .exe文件中，不可以删除。文件中，不可以删除。 Act

3、iveX控件：控件：由第三方制造的，以独立文件存在，扩展名由第三方制造的，以独立文件存在，扩展名为为.ocx,使用前必须添加到工具栏中。使用前必须添加到工具栏中。 可插入的对象：可插入的对象：如如Execl, Word等能添加到工具栏中，所以也等能添加到工具栏中，所以也是控件。是控件。 向工具箱中添加控件的方法向工具箱中添加控件的方法 如果想使用标准工具箱中没有的控件，则必须将该控件添加如果想使用标准工具箱中没有的控件，则必须将该控件添加到工具箱中。到工具箱中。 添加过程如下：添加过程如下： 4.1 概述概述4 向窗体上添加控件，有三种方法：向窗体上添加控件，有三种方法： 方法一：方法一： 单

4、击工具箱中的某控件图标，该图标反相显示；单击工具箱中的某控件图标，该图标反相显示； 移动鼠标至窗体上，光标变为移动鼠标至窗体上，光标变为“+”，按下鼠标左键不放，向右，按下鼠标左键不放，向右下方拖动鼠标；下方拖动鼠标； 当控件为合适大小时松开鼠标，一个控件就添加好了。当控件为合适大小时松开鼠标，一个控件就添加好了。 方法二：方法二： 双击工具箱中的某控件图标，在窗体中就添加了该控件，与第双击工具箱中的某控件图标，在窗体中就添加了该控件，与第一种方法不同的是，所添加控件大小、位置是固定的。一种方法不同的是，所添加控件大小、位置是固定的。 方法三：方法三： 按如下步骤操可以添加多个某种类型的控件：

5、按如下步骤操可以添加多个某种类型的控件： 按住按住Ctrl键，不要松开；键，不要松开； 单击工具箱中要画的控件的图标，然后松开单击工具箱中要画的控件的图标，然后松开Ctrl键；键； 按第一种方法在窗体上画出控件按第一种方法在窗体上画出控件(可以画一个或多个可以画一个或多个)； 画完控件后，单击工具箱中的指针图标画完控件后，单击工具箱中的指针图标(或其他图标或其他图标)。4.1 概述概述5 标签控件主要用于标注没有标签控件主要用于标注没有Caption属性的控件的用途或向属性的控件的用途或向用户显示运行结果的。标签在运行时不具有交互性用户显示运行结果的。标签在运行时不具有交互性 ，不能，不能响应

6、用户事件。响应用户事件。 标签控件的属性标签控件的属性 Alignment：设置标签中文本的对齐方式。语法格式：设置标签中文本的对齐方式。语法格式：4.2 标签标签(Label)对象名对象名.Alignment=0 | 1 | 2属性值属性值说说 明明0(默认值默认值)从左边开始显示标题，即左对齐从左边开始显示标题，即左对齐1从右边开始显示标题，即右对齐从右边开始显示标题，即右对齐2从中间开始显示标题，即居中对齐从中间开始显示标题，即居中对齐6 标签控件的属性标签控件的属性 AutoSize：设置标签是否能够自动调整大小以显示所有的：设置标签是否能够自动调整大小以显示所有的内容。内容。 语法格

7、式：语法格式： 其中：其中： 属性值为属性值为False(默认值默认值)表示显示控件的原始大小，属性值为表示显示控件的原始大小，属性值为True表示根据控件中的内容自动调整控件大小。表示根据控件中的内容自动调整控件大小。 BackStyle：设置标签的背景样式。语法格式：设置标签的背景样式。语法格式： 其中：其中： 属性值为属性值为1(默认值默认值)表示背景是不透明的；属性值为表示背景是不透明的；属性值为0表示背表示背景是透明的。景是透明的。4.2 标签标签(Label)对象名对象名.AutoSize= True | False对象名对象名.BackStyle= 0 | 17 标签控件的属性标

8、签控件的属性 BorderStyle：设置标签的边框样式。语法格式：设置标签的边框样式。语法格式： 其中：其中： 属性值为属性值为0(默认值默认值)表示无边框；属性值为表示无边框；属性值为1表示单线边框。表示单线边框。 Caption：设置标签的文本内容。：设置标签的文本内容。 语法格式：语法格式： 4.2 标签标签(Label)对象名对象名.Caption =字符串字符串对象名对象名.BorderStyle=0 | 18 标签控件的事件和方法标签控件的事件和方法 标签具有标签具有Click(单击单击)，DbClick(双击双击)等事件，但一般不需等事件，但一般不需要编写代码。要编写代码。 标

9、签的方法中常用的只有标签的方法中常用的只有Move，其基本语法如下：，其基本语法如下： 其中其中： left，top，width，height分别表示移动目的位置的坐标和分别表示移动目的位置的坐标和大小。大小。left为必要参数，其他三个为可选参数。为必要参数，其他三个为可选参数。 4.2 标签标签(Label)对象名对象名. Move left,top,width,height9例例4.1 设计一个界面说明标签的基本属性的使用设计一个界面说明标签的基本属性的使用 界面设计界面设计属性设置属性设置对象名对象名属性名属性名属性值属性值Label1Label1CaptionCaption默认值默认

10、值Label2Label2CaptionCaption学习学习VBVBAutoSizeAutoSizeTrueTrueBackStyleBackStyle0(0(透明透明) )BorderStyleBorderStyle1(1(单线边框单线边框) )运行结果运行结果10 文本框是一个文本编辑区域，主要用于接收用户的输入、文本框是一个文本编辑区域，主要用于接收用户的输入、输出、修改等信息，可以输入单行文本，也可以输入多输出、修改等信息，可以输入单行文本，也可以输入多行文本，在程序运行过程中具有良好的交互性。行文本，在程序运行过程中具有良好的交互性。 文本框控件的属性文本框控件的属性 Name：设

11、置文本框的名称。：设置文本框的名称。 Text：设置文本框中显示的文本内容。语法格式：设置文本框中显示的文本内容。语法格式： 4.3 文本框文本框(TextBox)对象名对象名.Text=字符串字符串11 文本框控件的属性文本框控件的属性 Locked：设置文本框是否可以被编辑。语法格式：设置文本框是否可以被编辑。语法格式： 其中：其中： 属性值为属性值为False（默认值）表示文本内容可以编辑；属性值为（默认值）表示文本内容可以编辑；属性值为True表示文本内容只能读但不能修改。表示文本内容只能读但不能修改。 MaxLength：设置文本框中输入的字符串最大长度。：设置文本框中输入的字符串最

12、大长度。 其中：其中： 属性值属性值为为0（默认值）表示文本框中字符串的长度为任意值，（默认值）表示文本框中字符串的长度为任意值，只受操作系统内存的限制；属性值为只受操作系统内存的限制；属性值为大于大于0的整数的整数，该整数表，该整数表示能够输入的最大字符数目。示能够输入的最大字符数目。4.3 文本框文本框(TextBox)对象名对象名. Locked = True | False12 文本框控件的属性文本框控件的属性 MultiLine：设置文本框是否可以输入多行文本。：设置文本框是否可以输入多行文本。 语法格式：语法格式： 其中：其中： 属性值为属性值为False（默认值）表示只能单行显示

13、，不能显示多行；（默认值）表示只能单行显示，不能显示多行；属性值设置为属性值设置为True，表示可以多行显示文本，若文本行数超，表示可以多行显示文本，若文本行数超过文本框宽度，系统会自动为文本框添加滚动条。过文本框宽度，系统会自动为文本框添加滚动条。 PasswordChar：设置是否在文本框中显示用户所输入的字：设置是否在文本框中显示用户所输入的字符串。语法格式为：符串。语法格式为： 其中：其中： 该属性如被设置为某一字符，如该属性如被设置为某一字符，如“*”，则无论在，则无论在Text属性值属性值中输入什么，在文本框中都只显示中输入什么，在文本框中都只显示“*”。 4.3 文本框文本框(T

14、extBox)对象名对象名.MultiLine = True | False 对象名对象名. PasswordChar= * 注意：该属性有效的前提是注意：该属性有效的前提是MultiLine属性必须属性必须设置为设置为False。13 文本框控件的属性文本框控件的属性 ScrollBars：设置文本框滚动条的模式。语法格式：设置文本框滚动条的模式。语法格式： 4.3 文本框文本框(TextBox)对象名对象名.ScrollBars=0 | 1 | 2 | 3属性值属性值说说 明明0 0（默认值）表示没有滚动条（默认值）表示没有滚动条1 1表示只有水平滚动条表示只有水平滚动条2 2表示只有垂直

15、滚动条表示只有垂直滚动条3 3表示既有水平滚动条又有垂直滚动条表示既有水平滚动条又有垂直滚动条14 文本框控件的属性文本框控件的属性 SelLength、SelStart和和SelText：控制文本框中的插入点和：控制文本框中的插入点和文本选定操作，这些属性仅能在运行时使用。语法格式：文本选定操作，这些属性仅能在运行时使用。语法格式： 其中：其中： SelLength设置选定文本的长度，只能在代码中使用，若值为设置选定文本的长度，只能在代码中使用，若值为0，表示未选中任何内容。，表示未选中任何内容。 SelStart设置选定文本的起始点，只能在代码中使用，第一个设置选定文本的起始点，只能在代码

16、中使用，第一个字符位置是字符位置是0。 SelText设置当前选定文本的内容，只能在代码中使用设置当前选定文本的内容，只能在代码中使用4.3 文本框文本框(TextBox) 对象名对象名. SelLength =数值数值 对象名对象名. SelStart =数值数值 对象名对象名. SelText =字符串字符串Text1.SelStart = 1Text1.SelLength = 3Text2.Text = Text1.SelText15 文本框控件的事件文本框控件的事件 Change：当用户改变文本框的内容时，该文本框的：当用户改变文本框的内容时，该文本框的Change事件被触发，该事件对

17、应的代码结构如下：事件被触发，该事件对应的代码结构如下：4.3 文本框文本框(TextBox) Private Sub Text1_Change() End Sub164.3 文本框文本框(TextBox)&例：程序运行时，通过用户输入，同步设置窗体的标题，例：程序运行时，通过用户输入，同步设置窗体的标题，即用户输入什么，窗体标题就同步显示什么。即用户输入什么，窗体标题就同步显示什么。 分析：分析： 接收用户输入接收用户输入 用户输入的内容保存在文本框的什么属性中用户输入的内容保存在文本框的什么属性中 窗体的标题与文本框内容一致窗体的标题与文本框内容一致赋值将文本框内容赋值将文本框内容Text

18、赋予窗赋予窗体的标题属性体的标题属性Caption 同步显示同步显示 代码：代码：文本框文本框textForm1.caption=text1.text文本框文本框Change事件事件Private Sub Text1_Change() Form1.Caption = Text1.TextEnd Sub174.3 文本框文本框(TextBox)&例：程序运行时，用户输入密码时，在另一个文本框中显例：程序运行时，用户输入密码时，在另一个文本框中显示用户输入的密码。示用户输入的密码。 分析：分析： 接收用户输入接收用户输入 用户输入的内容保存在文本框的什么属性中用户输入的内容保存在文本框的什么属性中

19、 文本框文本框2与文本框与文本框1内容一致内容一致 同步显示同步显示 代码：代码：文本框文本框TextText2.text=text1.text文本框文本框Change事件事件Private Sub Text1_Change() End SubText2.Text = Text1.Text18 文本框控件的事件文本框控件的事件 KeyPress：当文本框被选中时，按任意键该文本框的：当文本框被选中时，按任意键该文本框的KeyPress事件被触发，该事件对应的代码结构如下：事件被触发，该事件对应的代码结构如下： 其中：其中： KeyAscii是按键事件的参数，反映了按键对应键名的是按键事件的参数

20、，反映了按键对应键名的ASCII码码值，输入数据时，通过值，输入数据时，通过KeyPress事件过程来识别输入字符是事件过程来识别输入字符是否正确，达到判断检查的功能。否正确，达到判断检查的功能。 一般经常用以上两个事件过程中设置代码，来实现对输入文一般经常用以上两个事件过程中设置代码，来实现对输入文本框中的内容进行检查、验证和确认本框中的内容进行检查、验证和确认4.3 文本框文本框(TextBox) Private Sub Text_KeyPress(KeyAscii As Integer) End Sub194.3 文本框文本框(TextBox)&例：判断文本框中输入的内容是否为数字例：判

21、断文本框中输入的内容是否为数字 按键盘上某键，如果输入的值不是按键盘上某键，如果输入的值不是09之间的数字，则在窗之间的数字，则在窗体上显示相关的提示信息，否则没有任何提示。体上显示相关的提示信息，否则没有任何提示。Private Sub Text1_KeyPress(KeyAscii As Integer) If KeyAscii Asc(9) Then Print 你输入的不是数字你输入的不是数字 End IfEnd Sub20 文本框控件的方法文本框控件的方法 SetFocus：可以设置焦点，其获得焦点的显示效果是焦点：可以设置焦点，其获得焦点的显示效果是焦点（光标）在文本框中闪动。语法

22、格式：（光标）在文本框中闪动。语法格式： 让指定的对象获得焦点。设置焦点，本方法可使指定的文本让指定的对象获得焦点。设置焦点，本方法可使指定的文本框框(或其他有聚焦能力的对象或其他有聚焦能力的对象)成为焦点，也就是当前文本框，成为焦点，也就是当前文本框，成为焦点的文本框中具有闪动的光标成为焦点的文本框中具有闪动的光标.4.3 文本框文本框(TextBox)对象名对象名. SetFocus21口令口令口令口令口令口令 例例 设计一个程序可检查密码是否正确，密码为设计一个程序可检查密码是否正确，密码为“12345”口令口令口令口令4.3 文本框控件文本框控件 (TextBox)22 命令按钮通常在

23、命令按钮通常在Click事件中编写一段程序，当用户用鼠事件中编写一段程序，当用户用鼠标单击这个按钮时，就会启动这段程序，执行某一特定标单击这个按钮时，就会启动这段程序，执行某一特定的功能。的功能。 命令按钮控件的属性命令按钮控件的属性 Caption：设置命令按钮的标题。：设置命令按钮的标题。 Default：设置命令按钮是否为默认按钮，即当运行程序时，：设置命令按钮是否为默认按钮，即当运行程序时，用户按回车键时，就激活它。语法格式：用户按回车键时，就激活它。语法格式： 其中，属性值为其中，属性值为False（默认值）表示该按钮不响应（默认值）表示该按钮不响应Default事件；属性值为事件；

24、属性值为True表示该命令响应表示该命令响应Default事件，事件，即当用户按即当用户按Enter键时，与单击该按钮效果相同。键时，与单击该按钮效果相同。 Cancel：设置命令按钮是否为：设置命令按钮是否为Cancel按钮，即当用户按按钮，即当用户按Esc键时，是否触发它的键时，是否触发它的Click事件。语法格式：事件。语法格式： 4.4 命令按钮命令按钮 (CommandButton)对象名对象名.Cancel= True | False对象名对象名.Default=True | False注意：注意： 在一个窗体内，只能有一个在一个窗体内，只能有一个Default命令按钮命令按钮,也

25、只能有也只能有一个一个Cancel命令按钮命令按钮;23 命令按钮控件的属性命令按钮控件的属性 Enabled：设置命令按钮是否能被按下。语法格式：设置命令按钮是否能被按下。语法格式： 其中其中: 属性值为属性值为True（默认值）表示该按钮能被响应；属性值为（默认值）表示该按钮能被响应；属性值为False表示该按钮不能被响应，以灰色显示。表示该按钮不能被响应，以灰色显示。 Picture：设置命令按钮上显示的图形。语法格式：设置命令按钮上显示的图形。语法格式： 4.4 命令按钮命令按钮 (CommandButton)对象名对象名.Enabled=True | False对象名对象名.Pict

26、ure=LoadPicture(图形文件名图形文件名)24 命令按钮控件的属性命令按钮控件的属性 Style：设置命令按钮的类型。语法格式：设置命令按钮的类型。语法格式： ToolTipText：设置当鼠标在命令按钮上暂停时显示的文本。：设置当鼠标在命令按钮上暂停时显示的文本。 4.4 命令按钮命令按钮 (CommandButton)对象名对象名.Style=0 | 1属性值属性值说说 明明0(默认值默认值)表示为标准按钮，只显示表示为标准按钮，只显示Caption属性设置的文本属性设置的文本1表示为图形风格，只显示由表示为图形风格，只显示由Picture属性指定的图片属性指定的图片对象名对象

27、名. ToolTipText=字符串字符串25 命令按钮控件的事件命令按钮控件的事件 Click、MouseDown、MouseUp：当单击鼠标时就会触发该：当单击鼠标时就会触发该三个事件。他们触发的顺序为三个事件。他们触发的顺序为MouseDown、 Click、 MouseUp 事件。事件。 4.4 命令按钮命令按钮 (CommandButton)对象名对象名.Default=True | False注意：注意： MouseDown和和MouseUp只能通过单击鼠标触发；而只能通过单击鼠标触发；而Click既可通过单击鼠标触发，还可以在按钮获得焦点既可通过单击鼠标触发，还可以在按钮获得焦点

28、时按空格或回车键触发。时按空格或回车键触发。264.4 命令按钮命令按钮(CommandButton) 命令按钮的主要命令按钮的主要方法方法 SetFocus：设置焦点。设置为焦点的按钮在其表面有一：设置焦点。设置为焦点的按钮在其表面有一个虚边框个虚边框 注意：注意： 命令按钮不支持双击事件。命令按钮不支持双击事件。 BackColor属性和属性和Picture属性在属性在Style属性值为属性值为1（图形方（图形方式）下，才能显示出来。式）下，才能显示出来。274.4 命令按钮命令按钮(CommandButton) 28&例：设计一个窗体，说明命令按钮的基本属性、事件、方例：设计一个窗体，说

29、明命令按钮的基本属性、事件、方法的使用。法的使用。4.4 命令按钮命令按钮(CommandButton) 界面设计界面设计属性设置见课本属性设置见课本P52运行结果运行结果29代码如下：代码如下：Private Sub Command1_Click() Label4.Caption = + Text3.Text = Val(Text1.Text) + Val(Text2.Text)End SubPrivate Sub Command2_Click() Label4.Caption = - Text3.Text = Val(Text1.Text) - Val(Text2.Text)End Sub

30、Private Sub Command3_Click() Label4.Caption = * Text3.Text = Val(Text1.Text) * Val(Text2.Text)End SubPrivate Sub Command4_Click() Label4.Caption = / Text3.Text = Val(Text1.Text) / Val(Text2.Text)End Sub304.5 图形控件图形控件VB中的图形控件分为中的图形控件分为、直线控件和形状控件。图形控件的使用能、直线控件和形状控件。图形控件的使用能美化界面和增加界面的趣味性。美化界面和增加界面的趣味性。

31、图片框控件可以用来显示图片框控件可以用来显示.bmp.bmp、.ico.ico、.jpeg .jpeg 、.jpg .jpg 、.gif.gif等图片类型的文件，且可以等图片类型的文件，且可以绘制绘制图形、显示图形、显示文本或计算结果，还文本或计算结果，还可以作为容器放置其它控件。可以作为容器放置其它控件。 314.5 图形控件图形控件 常用属性常用属性 Align：设置图片框在窗体中的显示方式，语法格式：设置图片框在窗体中的显示方式，语法格式： 对象名对象名. Align =0 | 1 | 2 | 3 | 4 属性值属性值说说 明明0-None默认值，表示无特殊显示默认值，表示无特殊显示1-

32、Align Top表示图片框停靠在窗体上端并与窗体一样宽表示图片框停靠在窗体上端并与窗体一样宽2-Align Bottom表示图片框停靠在窗体底部并与窗体一样宽表示图片框停靠在窗体底部并与窗体一样宽3-Align Left表示图片框停靠在窗体左端并与窗体一样高表示图片框停靠在窗体左端并与窗体一样高4-Align Right表示图片框停靠在窗体右端并与窗体一样高表示图片框停靠在窗体右端并与窗体一样高324.5 图形控件图形控件 常用属性常用属性 AutoSize：设置控件是否能自动调整大小以适应图片：设置控件是否能自动调整大小以适应图片内容。内容。 语法格式：语法格式： 其中其中: 属性值为属性

33、值为False（默认值）表示图片框（默认值）表示图片框不能自动改不能自动改变大小以适应其中的图形变大小以适应其中的图形，保持原始尺寸，如果，保持原始尺寸，如果图形比图片框大，则超出的部分将被剪切掉；图形比图片框大，则超出的部分将被剪切掉； 属性值为属性值为True表示图片框表示图片框可以自动调整图片框大可以自动调整图片框大小以显示图片的全部内容小以显示图片的全部内容。对象名对象名. AutoSize =True | False334.5 图形控件图形控件 常用属性常用属性 Picture：设置图片框控件中显示的图片。：设置图片框控件中显示的图片。 在界面设计时，可直接利用属性窗口中的在界面设计

34、时，可直接利用属性窗口中的Picture属属性设置相应图片的目录装入图片；在程序运行时，可性设置相应图片的目录装入图片；在程序运行时，可使用使用LoadPicture函数装载图片，语法格式为：函数装载图片，语法格式为：对象名对象名.Picture = LoadPicture(图形文件名图形文件名)344.5 图形控件图形控件 图片框控件的事件图片框控件的事件 图片框常用的事件是图片框常用的事件是Click和和DblClick，分别是单击和双击图片，分别是单击和双击图片框时发生的事件。框时发生的事件。 图片框控件的方法图片框控件的方法 图片框常用的方法有图片框常用的方法有Print、Cls、Mo

35、ve和和SetFocus。同时，图片。同时，图片框支持框支持Pset、Point、Circle和和Line等绘图方法等绘图方法 。 装载图片装载图片 装载图片有三种方法：装载图片有三种方法： 方法方法1：在界面设计时，通过：在界面设计时，通过Picture属性装载图片，在属性装载图片，在Picture属性中选择需要装入的图形文件名。属性中选择需要装入的图形文件名。 方法方法2：在程序运行期间，用：在程序运行期间，用LoadPicture函数装载。函数装载。 方法方法3：在界面设计时，利用菜单中的：在界面设计时，利用菜单中的“编辑编辑”“粘贴粘贴”功功能，将剪贴板中的图片粘贴到图形控件中。能，将

36、剪贴板中的图片粘贴到图形控件中。354.5 图形控件图形控件 卸载图片卸载图片 语法格式：语法格式： 保存图片保存图片 SavePicture函数的功能是用来保存在图片框中处理过函数的功能是用来保存在图片框中处理过的图像。语法格式：的图像。语法格式： 例如：例如： SavePicture Picture1.Image,aa.bmp 对象对象.Picture=LoadPicture(“ ”)SavePicture 对象名对象名.Image, 保存文件名保存文件名36&例：设计一个窗体，通过命令按钮单击实现两个图片框控例：设计一个窗体，通过命令按钮单击实现两个图片框控件中图片之间的切换。件中图片之

37、间的切换。4.5 图形控件图形控件界面设计和运行结果界面设计和运行结果374.5 图形控件图形控件对象对象属性属性属性值属性值CommandButtonNameCommand1Caption交换交换PictureBoxNamePicture1Pictured:6.jpgPictureBoxNamePicture2Pictured:7.jpg属性设置如下表：属性设置如下表：384.5 图形控件图形控件代码编写如下代码编写如下Private Sub Command1_Click() Picture1.Picture = Picture2.Picture Picture2.Picture = Loa

38、dPicture(d:6.jpg)End Sub394.5 图形控件图形控件图像框也是用来显形图片，如图像框也是用来显形图片，如.bmp.bmp、.ico.ico、.jpeg .jpeg 、.jpg .jpg 图片格式图片格式。其装载显示图片的速度较图。其装载显示图片的速度较图片框快片框快。 常用属性常用属性 Appearance:设置图像框在运行时是否以设置图像框在运行时是否以3D效果显效果显示示. Picture：设置图像框控件中显示的图形。图像框：设置图像框控件中显示的图形。图像框的的Picture属性与图片框使用方法相同，既可以通属性与图片框使用方法相同，既可以通过属性窗口设置图像框的

39、过属性窗口设置图像框的Picture属性来添加图片，属性来添加图片，也可以通过也可以通过LoadPicture函数来装载图片。函数来装载图片。 404.5 图形控件图形控件图像框图像框 常用属性常用属性 Stretch：设置是否调整图形的大小以适应图像框控件。：设置是否调整图形的大小以适应图像框控件。图像框没有图像框没有Autosize属性，但可以使用属性，但可以使用Stretch属性来属性来拉伸图像大小，使其适应图像框的大小。拉伸图像大小，使其适应图像框的大小。 其中其中: 属性值为属性值为False（默认值）表示当图形载入时，（默认值）表示当图形载入时，图图像框本身调整大小，使得图形可以填

40、满图像框像框本身调整大小，使得图形可以填满图像框； 属性值为属性值为True表示当图形载入时，表示当图形载入时，图形自动按照图图形自动按照图像框的大小来调整大小，使图形填满整个图像框像框的大小来调整大小，使图形填满整个图像框。414.5 图片控件图片控件 图像框控件的事件和方法图像框控件的事件和方法 图像框常用的事件和方法都不多。常用的事件有：图像框常用的事件和方法都不多。常用的事件有：DbClick、Click、MouseDown、MouseMove、MouseUp。常用的方法有：。常用的方法有：Move方法。方法。图片框和图像框的区别：图片框和图像框的区别： 图片框图片框可以作为可以作为“

41、容器容器”，可以存放其他控件，可以存放其他控件，图像图像框框不可以；不可以； 图片框图片框可以通过可以通过Print方法输出文本也可以用绘图方法方法输出文本也可以用绘图方法绘制图形，绘制图形，图像框图像框不可以；不可以； 图像框图像框比比图片框图片框占用内存少，显示速度快，如只显示占用内存少，显示速度快，如只显示图片则优先使用图像框；图片则优先使用图像框； 图片框图片框有有Autosize属性，而属性，而图像框图像框有有Stretch属性属性42&例：设计一个窗体，说明图像框中例：设计一个窗体，说明图像框中Stretch属性的应用。属性的应用。4.5 图片控件图片控件界面设计界面设计434.5

42、 图片控件图片控件属性设置如下属性设置如下:对象对象属性属性属性值属性值CommandButtonNameCommand1Caption交换交换PictureBoxNamePicture1PictureBoxNamePicture2VisibleFalseImageNameImage1StretchTrue444.5 图片控件图片控件代码编写如下代码编写如下Private Sub Form_Load()Picture1.Picture = LoadPicture(C:JadeVista.jpg)Image1.Picture = LoadPicture(C:风景风景06.jpg)End SubP

43、rivate Sub Command1_Click()Picture2.Picture = Picture1.PicturePicture1.Picture = Image1.PictureImage1.Picture = Picture2.PictureEnd Sub454.6 框架和选择控件框架和选择控件 在在VB中，可以作为其他对象容器的有窗体、图片框中，可以作为其他对象容器的有窗体、图片框和框架。框架的主要作用是将窗体上的控件进行分和框架。框架的主要作用是将窗体上的控件进行分组，让窗体界面整齐。组，让窗体界面整齐。 框架控件的属性框架控件的属性 Caption：设置框架的标题，说明框架

44、的功能。：设置框架的标题，说明框架的功能。 Enabled：设置框架及框架内控件是否可用。属：设置框架及框架内控件是否可用。属性值为性值为True（默认值）表示框架可用，属性值为（默认值）表示框架可用，属性值为False则表示框架和其上的控件不可用。则表示框架和其上的控件不可用。 Visible：设置框架及框架内控件是否可见。：设置框架及框架内控件是否可见。 464.6 框架和选择控件框架和选择控件 框架控件的事件框架控件的事件 框架的常用事件是框架的常用事件是ClickClick，在框架上单击鼠标，在框架上单击鼠标时触发。时触发。 向框架添加控件的方法向框架添加控件的方法 先框架后控件：先添

45、加一个框架，在框架处先框架后控件：先添加一个框架，在框架处于激活状态时，在工具栏中选择要添加的控于激活状态时，在工具栏中选择要添加的控件添加到框架中。件添加到框架中。 先控件后框架：即添加窗体中已存在的控件先控件后框架：即添加窗体中已存在的控件到框架中。先添加一个框架，然后将窗体中到框架中。先添加一个框架，然后将窗体中要添加的控件剪贴到框架中。要添加的控件剪贴到框架中。 判断一个控件是否已添加到框架上，主判断一个控件是否已添加到框架上，主要是看移动框架时该控件是否也跟随一起要是看移动框架时该控件是否也跟随一起移动。移动。474.6 框架和选择控件框架和选择控件 单选按钮控件是多选一控件，只能从

46、多个选项中单选按钮控件是多选一控件，只能从多个选项中选择一个，各选项间的关系是互斥的，同一时刻选择一个，各选项间的关系是互斥的，同一时刻只能选择同一组中的一个单选按钮。只能选择同一组中的一个单选按钮。 单选按钮控件的属性单选按钮控件的属性 Caption：设置单选按钮的标题。：设置单选按钮的标题。 Alignment：设置单选按钮中文字的对齐方式。：设置单选按钮中文字的对齐方式。 其中：其中：属性值为属性值为0（默认值）表示靠左对齐，圆形按（默认值）表示靠左对齐，圆形按钮位于控件的左边，文字显示在右边；属性值钮位于控件的左边，文字显示在右边；属性值为为1表示靠右对齐。表示靠右对齐。对象名对象名

47、.Alignment=0 | 1484.6 框架和选择控件框架和选择控件 单选按钮控件的属性单选按钮控件的属性ValueValue：设置单选按钮在执行时是否被选中。：设置单选按钮在执行时是否被选中。语法格式：语法格式： 其中：其中： 属性值为属性值为FalseFalse（默认值）表示单选按（默认值）表示单选按钮处于未选中状态；为钮处于未选中状态；为TrueTrue表示单选按钮表示单选按钮被选中。被选中。在在一组一组单选按钮控件中，有且只单选按钮控件中，有且只有一个单选按钮能被选中，该控件的有一个单选按钮能被选中，该控件的ValueValue值变成值变成TrueTrue的同时，其他控件的的同时，

48、其他控件的ValueValue属性属性将自动变成将自动变成FalseFalse。 对象名对象名. Value=True | False494.6 框架和选择控件框架和选择控件单选按钮控件的属性单选按钮控件的属性StyleStyle：设置单选按钮的显示方式。：设置单选按钮的显示方式。 语法格式：语法格式： 其中：其中： 属性值为属性值为0 0（默认值）表示单选按钮用（默认值）表示单选按钮用标准方式（标准方式（StandardStandard）显示；为）显示；为1 1表示单选表示单选按钮用图形方式（按钮用图形方式（GraphicalGraphical）显示。）显示。此属此属性与命令按钮的性与命令按

49、钮的StyleStyle属性相似属性相似。 对象名对象名. Style=0 | 1504.6 框架和选择控件框架和选择控件 单选按钮控件的属性单选按钮控件的属性 Picture：给单选按钮装载图形。：给单选按钮装载图形。 注意：只有在注意：只有在StyleStyle属性设置为图形属性设置为图形方式时方式时PicturePicture属性才有效。属性才有效。514.6 框架和选择控件框架和选择控件 单选按钮控件的事件单选按钮控件的事件 单选按钮的常用事件为单选按钮的常用事件为Click，当用户在一个，当用户在一个单选按钮上单击时触发。单选按钮上单击时触发。524.6 框架和选择控件框架和选择控件

50、例例4.9 4.9 设计一个窗体选择不同字体、不同字号的选设计一个窗体选择不同字体、不同字号的选项，文本框的文字会产生相应的变化。项，文本框的文字会产生相应的变化。界面设计界面设计属性设置见书属性设置见书P60534.6 框架和选择控件框架和选择控件 代码设计：代码设计：Private Sub Option1_Click() If Option1.Value = True Then Label1.FontName = 宋体宋体End SubPrivate Sub Option2_Click() If Option2.Value = True Then Label1.FontName = 隶书隶

51、书End SubPrivate Sub Option3_Click() If Option3.Value = True Then Label1.FontName = 黑体黑体End Sub544.6 框架和选择控件框架和选择控件 代码设计：代码设计：Private Sub Option4_Click() If Option4.Value = True Then Label1.FontSize =30End SubPrivate Sub Option5_Click() If Option5.Value = True Then Label1.FontSize = 40End SubPrivate

52、Sub Option6_Click() If Option6.Value = True Then Label1.FontSize = 50End Sub554.6 框架和选择控件框架和选择控件 运行结果运行结果564.6 框架和选择控件框架和选择控件 复选框控件的属性复选框控件的属性 Caption：设置复选框标题。：设置复选框标题。 Value：设置复选框在执行时的状态。语法格式：设置复选框在执行时的状态。语法格式： 对象名对象名. Value=0 | 1 | 2属性值属性值说说 明明0(默认值默认值)未选中，此时复选框前面小方块没有未选中，此时复选框前面小方块没有“”标志标志1选中状态，此

53、时复选框前面小方块带有选中状态，此时复选框前面小方块带有“”标志标志2处于禁止选择状态，复选框呈现处于禁止选择状态，复选框呈现“”标志但以灰色显示。标志但以灰色显示。574.6 框架和选择控件框架和选择控件 复选框控件的属性复选框控件的属性 Style：设置复选框的显示方式。：设置复选框的显示方式。 Picture：用于给图形复选框装载图形。：用于给图形复选框装载图形。 注意：只有在注意：只有在StyleStyle属性设置为图形方式时属性设置为图形方式时PicturePicture属性才有效。属性才有效。584.6 框架和选择控件框架和选择控件 复选框控件的事件和方法复选框控件的事件和方法 复

54、选框的常用事件为复选框的常用事件为Click，当用户在一个复，当用户在一个复选框上单击鼠标按钮时发生。选框上单击鼠标按钮时发生。复选框复选框不支持不支持鼠标双击事件鼠标双击事件，系统把一次双击解释为两次，系统把一次双击解释为两次单击事件。单击事件。 复选框支持的方法较少，常用的主要有：复选框支持的方法较少，常用的主要有：SetFoucs、Move。 59复选框应用复选框应用 设计一个窗体，说明复选框的基本应用方法。设计一个窗体，说明复选框的基本应用方法。 界面设计界面设计60对象对象属性属性属性值属性值LabelNameLabel1Caption我的爱好是我的爱好是CheckBoxNameCh

55、eck1Caption音乐音乐CheckBoxNameCheck2Caption足球足球CheckBoxNameCheck3Caption看书看书CheckBoxNameCheck4Caption购物购物CommandButtonNameCommand1Caption确定确定CommandButtonNameCommand2Caption清除清除614.6 框架和选择控件框架和选择控件代码设计：代码设计： Private Sub Command1_Click() a = Check1.Caption b = Check2.Caption c = Check3.Caption d = Check

56、4.Caption If Check1.Value = 1 Then Label1.Caption = Label1.Caption & & a If Check2.Value = 1 Then Label1.Caption = Label1.Caption & & b If Check3.Value = 1 Then Label1.Caption = Label1.Caption & & c If Check4.Value = 1 Then Label1.Caption = Label1.Caption & & dEnd SubPrivate Sub Command2_Click() a =

57、 b = c = d = Label1.Caption = 我的爱好是：我的爱好是：End Sub624.7 列表框和组合框列表框和组合框 列表框和组合框都是通过列表的形式显示多个选项，供用列表框和组合框都是通过列表的形式显示多个选项，供用户来选择。户来选择。 列表框是一个为用户提供选择的列表，用户可从中单击选取列表框是一个为用户提供选择的列表，用户可从中单击选取自己所需的一个或多个选项。如果选项太多，超出列表框设自己所需的一个或多个选项。如果选项太多，超出列表框设计的大小时，不能一次全部显示，计的大小时，不能一次全部显示，VB会自动加上垂直滚动条。会自动加上垂直滚动条。 组合框的功能与列表框

58、相近，其主要特点是它组合框的功能与列表框相近，其主要特点是它综合了列表框综合了列表框和文本框的特性和文本框的特性。在程序运行时，用户既可以在组合框中选。在程序运行时，用户既可以在组合框中选择已有的选项，选中的内容自动放入文本框中；又能够在文择已有的选项，选中的内容自动放入文本框中；又能够在文本框中直接输入所需的内容。本框中直接输入所需的内容。列表框控件列表框控件组合框控件组合框控件634.7 列表框和组合框列表框和组合框 列表框控件的属性列表框控件的属性 List：设置列表框中列表项的内容。：设置列表框中列表项的内容。List属性值是一个一维数组，属性值是一个一维数组，每个数组元素是列表框中的

59、一个选项。每个数组元素是列表框中的一个选项。 其中：其中： 该属性既可以在设计时通过属性窗口设置，又可在代码窗口该属性既可以在设计时通过属性窗口设置，又可在代码窗口中设置；中设置； 属性窗口设置时，每添加一个列表项，按属性窗口设置时，每添加一个列表项，按Ctrl+Enter键可以键可以换行继续添加下一个列表项，直接按换行继续添加下一个列表项，直接按Enter键表示添加结束；键表示添加结束； 代码窗口设置时，采用如下格式：代码窗口设置时，采用如下格式： 例如：例如： List1.list(0)= 武汉武汉 列表框的第一项列表框的第一项 List1.list(2)= 北京北京 列表框的第三项列表框

60、的第三项对象名对象名.list(下标下标) = 字符串字符串注意：注意： List数组的第一个元素的下标是数组的第一个元素的下标是0，即，即List(0)为第一个元素，往后为第一个元素，往后依次为依次为List(1)、List(2)、List(3)，如果，如果List数组中有数组中有n个元素，个元素，则最后一个列表项对应的数组元素为则最后一个列表项对应的数组元素为List(n-1)。644.7 列表框和组合框列表框和组合框 列表框控件的属性列表框控件的属性 ListCount：表示当前列表框中选项的总数。：表示当前列表框中选项的总数。 注意：注意：任何列表框中的选项从任何列表框中的选项从0开始

61、，到开始，到ListCount-1结结束，通常和束，通常和List属性一起使用，此属性只能在程属性一起使用，此属性只能在程序中引用。序中引用。654.7 列表框和组合框列表框和组合框 列表框控件的属性列表框控件的属性 ListIndex：设置和返回选中的选项，即下标序号。如果没有任何选项选：设置和返回选中的选项，即下标序号。如果没有任何选项选中，其值为中，其值为-1。 Sorted：设置列表框中的选项是否按字母表顺序排序。语法格式：设置列表框中的选项是否按字母表顺序排序。语法格式： 其中：其中： 属性值为属性值为True表示列表框中的选项按字母表顺序排序；属性值为表示列表框中的选项按字母表顺序

62、排序；属性值为False则表示列表框中的选项不按字母表顺序排序。则表示列表框中的选项不按字母表顺序排序。 Sorted属性必须在属性窗口时设置，在运行时是只读的。属性必须在属性窗口时设置，在运行时是只读的。 list1.sorted=true 按字母顺序排列按字母顺序排列 list1.sorted=false按加入时的顺序排列按加入时的顺序排列 如果选中列表框的第五个元素，则如果选中列表框的第五个元素，则ListIndex值为多少？值为多少？对象名对象名.Sorted=True | False664.7 列表框和组合框列表框和组合框 列表框控件的属性列表框控件的属性 Text：返回或设置最后选

63、中的列表项的文本内容。只读属性，不：返回或设置最后选中的列表项的文本内容。只读属性，不能直接修改其值，用于获取选定列表项的内容。能直接修改其值，用于获取选定列表项的内容。 MultiSelect：设置该列表框是否能选择多项。语法格式：设置该列表框是否能选择多项。语法格式： 对象名对象名. MultiSelect =0 | 1 | 2属性值属性值说说 明明0 (None)单选，一次只能选择一个选项单选，一次只能选择一个选项1 (Simple)简单多选，鼠标单击或按简单多选，鼠标单击或按Space键选取或取消选项键选取或取消选项2(Extended)高级多选，用高级多选，用Ctrl键与鼠标单击来选

64、中或取消不连续的键与鼠标单击来选中或取消不连续的选项；用选项；用Shift键与鼠标单击来选中或取消连续的选项键与鼠标单击来选中或取消连续的选项注意：注意： 若选择多项，则若选择多项，则ListIndex和和Text的属性只表示最后一次所选的属性只表示最后一次所选择的选项值。择的选项值。674.7 列表框和组合框列表框和组合框 列表框控件的属性列表框控件的属性 SelCount：表示列表框中所选择的选项的数目。：表示列表框中所选择的选项的数目。通常与通常与Selected一起使用，以处理控件中所选一起使用，以处理控件中所选的选项。的选项。 注意：注意：注意：注意：SelCount属性使用的前提是

65、属性使用的前提是MultiSelect属性设置为属性设置为1或或2。684.7 列表框和组合框列表框和组合框 列表框控件的属性列表框控件的属性 Selected：与：与List数组中的各个元素相对应的一数组中的各个元素相对应的一个数组，记录个数组，记录List数组中每个选项是否被选取。数组中每个选项是否被选取。例如，如果例如，如果List(1)被选取，则被选取，则Selected(1)的值的值为为True，如果，如果List(1)未被选取，则未被选取，则Selected(1)的值为的值为False。 如：如：list1.selected(0)=true表示选中第一项表示选中第一项694.7 列

66、表框和组合框列表框和组合框 列表框控件的属性列表框控件的属性 Style：设置列表框控件的外观。：设置列表框控件的外观。 语法格式：语法格式： 属性值属性值说说 明明0(标准样式标准样式)不带复选框不带复选框1(复选框样式复选框样式)当复选框中出现当复选框中出现“”时表示选中该选项时表示选中该选项对象名对象名. Style =0 | 1 704.7 列表框和组合框列表框和组合框 列表框控件的事件列表框控件的事件 Click事件：在列表框获得焦点时用户单击某个选项，或按下方向事件：在列表框获得焦点时用户单击某个选项，或按下方向键，或按下选项的第一个英文字母，会触发该事件。键，或按下选项的第一个英文字母，会触发该事件。 DblClick事件：双击某个选项会触发该事件。事件：双击某个选项会触发该事件。 列表框控件的方法列表框控件的方法 AddItem：向列表框中添加列表项。语法格式：向列表框中添加列表项。语法格式： 对象名对象名.AddItem 选项字符串选项字符串 ,索引值索引值其中：其中：选项字符串是要添加到列表框中的字符表达式；选项字符串是要添加到列表框中的字符表达式；索引值是可选参数