06第六章 常用控件与多窗体.ppt

《06第六章 常用控件与多窗体.ppt》由会员分享，可在线阅读，更多相关《06第六章 常用控件与多窗体.ppt（71页珍藏版）》请在得力文库 - 分享文档赚钱的网站上搜索。

1、第第6章章 常用控件与多窗体常用控件与多窗体第第第第3 3章章章章介介介介绍绍绍绍了了了了窗窗窗窗体体体体的的的的使使使使用用用用及及及及最最最最基基基基本本本本控控控控件件件件的的的的属属属属性性性性、事事事事件件件件和和和和方方方方法法法法。本本本本章章章章介介介介绍绍绍绍另另另另外外外外的的的的几几几几个个个个常常常常用用用用控控控控件件件件以以以以及及及及多多多多窗窗窗窗体体体体。主主主主要要要要内内内内容容容容有有有有：图图图图片片片片框框框框与与与与图图图图像像像像框框框框、定定定定时时时时器器器器、单单单单选选选选钮钮钮钮与与与与复复复复选选选选框框框框、框框框框架架架架、列列列

2、列表表表表框框框框与与与与组组组组合合合合框框框框滚滚滚滚动动动动条条条条、焦焦焦焦点点点点与与与与TabTab顺顺顺顺序序序序、多窗体。多窗体。多窗体。多窗体。退出退出6.1 图片框与图像框图片框与图像框6.2 定时器定时器6.3 单选钮与复选框单选钮与复选框6.4 容器与框架容器与框架6.5 列表框与组合框列表框与组合框6.6 滚动条滚动条6.7 焦点与焦点与Tab顺序顺序6.8 多窗体多窗体6.1 图片框与图像框图片框与图像框图图图图 片片片片 框框框框 控控控控 件件件件（PictureBoxPictureBox）和和和和 图图图图 像像像像 框框框框 控控控控 件件件件（ImageB

3、oxImageBox）主主主主要要要要用用用用于于于于在在在在窗窗窗窗体体体体的的的的指指指指定定定定位位位位置置置置显显显显示示示示图图图图形形形形信信信信息息息息。支支支支持持持持 .bmp.bmp、.ico.ico、.wmf.wmf、.emf.emf、.jpg.jpg、.gif.gif等等等等格格格格式的图形文件。式的图形文件。式的图形文件。式的图形文件。6.1.16.1.16.1.16.1.1图片框、图像框的常用属性图片框、图像框的常用属性图片框、图像框的常用属性图片框、图像框的常用属性1 1PicturePicture属性属性属性属性图图图图片片片片框框框框和和和和图图图图像像像像框

4、框框框中中中中显显显显示示示示的的的的图图图图片片片片由由由由PicturePicture属属属属性性性性决决决决定定定定。图图图图形形形形文文文文件件件件可可可可以以以以在在在在设设设设计计计计阶阶阶阶段段段段装装装装入入入入，也也也也可可可可以以以以在在在在运运运运行行行行期期期期间间间间装装装装入。入。入。入。（1 1）在设计阶段装入）在设计阶段装入）在设计阶段装入）在设计阶段装入在设计阶段，可以用属性窗口中的在设计阶段，可以用属性窗口中的在设计阶段，可以用属性窗口中的在设计阶段，可以用属性窗口中的Picture Picture 属性装属性装属性装属性装入图形文件。入图形文件。入图形文件

5、。入图形文件。（2 2）在运行期间装入）在运行期间装入）在运行期间装入）在运行期间装入在运行期间，可以用在运行期间，可以用在运行期间，可以用在运行期间，可以用LoadPictureLoadPicture函数把图形文件函数把图形文件函数把图形文件函数把图形文件装入图片框或图像框中。语句格式如下：装入图片框或图像框中。语句格式如下：装入图片框或图像框中。语句格式如下：装入图片框或图像框中。语句格式如下：对象名对象名对象名对象名.Picture=LoadPicture.Picture=LoadPicture（filenamefilename）2 2AutoSizeAutoSize属性属性属性属性该属

6、性用于图片框。决定控件是否自动改变大小该属性用于图片框。决定控件是否自动改变大小该属性用于图片框。决定控件是否自动改变大小该属性用于图片框。决定控件是否自动改变大小以显示图像全部内容。缺省值为以显示图像全部内容。缺省值为以显示图像全部内容。缺省值为以显示图像全部内容。缺省值为FalseFalse，此时保持控件，此时保持控件，此时保持控件，此时保持控件大小不变，超出控件区域的内容被裁减掉；若值为大小不变，超出控件区域的内容被裁减掉；若值为大小不变，超出控件区域的内容被裁减掉；若值为大小不变，超出控件区域的内容被裁减掉；若值为TrueTrue时，自动改变控件大小以显示图片全部内容（注时，自动改变控

7、件大小以显示图片全部内容（注时，自动改变控件大小以显示图片全部内容（注时，自动改变控件大小以显示图片全部内容（注意：不是图形改变大小）。意：不是图形改变大小）。意：不是图形改变大小）。意：不是图形改变大小）。3 3stretch stretch 属性属性属性属性用于图像框。当该属性的取值为用于图像框。当该属性的取值为用于图像框。当该属性的取值为用于图像框。当该属性的取值为FalseFalse时，图像控时，图像控时，图像控时，图像控件将自动改变大小以与图形的大小相适应；当其值为件将自动改变大小以与图形的大小相适应；当其值为件将自动改变大小以与图形的大小相适应；当其值为件将自动改变大小以与图形的大

8、小相适应；当其值为TrueTrue时，显示在控件中的图像的大小将完全适合于控时，显示在控件中的图像的大小将完全适合于控时，显示在控件中的图像的大小将完全适合于控时，显示在控件中的图像的大小将完全适合于控件的大小，这时，图片可能会变形。件的大小，这时，图片可能会变形。件的大小，这时，图片可能会变形。件的大小，这时，图片可能会变形。6.1.26.1.26.1.26.1.2图片框、图像框的区别图片框、图像框的区别图片框、图像框的区别图片框、图像框的区别（1 1）图片框控件可以作为其它控件的容器。）图片框控件可以作为其它控件的容器。）图片框控件可以作为其它控件的容器。）图片框控件可以作为其它控件的容器

9、。（2 2）图图图图片片片片框框框框可可可可以以以以通通通通过过过过PrintPrint方方方方法法法法接接接接收收收收文文文文本本本本，而而而而图图图图像像像像框则不能接收用框则不能接收用框则不能接收用框则不能接收用PrintPrint方法输入的信息。方法输入的信息。方法输入的信息。方法输入的信息。（3 3）图像框比图片框占用的内存少，显示速度快。）图像框比图片框占用的内存少，显示速度快。）图像框比图片框占用的内存少，显示速度快。）图像框比图片框占用的内存少，显示速度快。6.2 定时器定时器VBVB提提提提供供供供了了了了一一一一种种种种叫叫叫叫定定定定时时时时器器器器（TimerTimer

10、）的的的的控控控控件件件件。定定定定时时时时器器器器每每每每隔隔隔隔一一一一定定定定的的的的时时时时间间间间间间间间隔隔隔隔就就就就产产产产生生生生一一一一次次次次TimerTimer事事事事件件件件（可可可可理理理理解解解解为为为为报报报报时时时时），用用用用户户户户可可可可以以以以根根根根据据据据这这这这个个个个特特特特性性性性设设设设置置置置时时时时间间间间间间间间隔隔隔隔控控控控制制制制某些操作或用于计时。某些操作或用于计时。某些操作或用于计时。某些操作或用于计时。1 1属性属性属性属性定定定定时时时时器器器器控控控控件件件件的的的的属属属属性性性性不不不不是是是是很很很很多多多多，最

11、最最最常常常常用用用用的的的的是是是是IntervalInterval属属属属性性性性，该该该该属属属属性性性性用用用用来来来来决决决决定定定定两两两两次次次次调调调调用用用用定定定定时时时时器器器器的的的的间间间间隔隔隔隔，以以以以msms为为为为单单单单位位位位，取取取取值值值值范范范范围围围围为为为为0 06553565535，所所所所以以以以最最最最大大大大时时时时间间间间间间间间隔隔隔隔不不不不能能能能超超超超过过过过66s66s，该该该该属属属属性性性性的的的的缺缺缺缺省省省省值值值值为为为为0 0，即即即即定定定定时时时时器器器器控控控控件件件件不不不不起起起起作作作作用用用用。

12、如如如如果果果果希希希希望望望望每每每每秒秒秒秒产产产产生生生生n n个个个个事事事事件件件件，则则则则应应应应设设设设置置置置属属属属性性性性IntervalInterval的值为的值为的值为的值为1000/1000/n n。2 2事件事件事件事件定时器只支持定时器只支持定时器只支持定时器只支持TimerTimer事件。对于一个含有定时器控事件。对于一个含有定时器控事件。对于一个含有定时器控事件。对于一个含有定时器控件的窗体，每经过一段由属性件的窗体，每经过一段由属性件的窗体，每经过一段由属性件的窗体，每经过一段由属性IntervalInterval指定的时间间隔，指定的时间间隔，指定的时间

13、间隔，指定的时间间隔，就产生一个就产生一个就产生一个就产生一个TimerTimer事件。事件。事件。事件。【例例例例6.26.2】建建建建立立立立数数数数字字字字计计计计时时时时器器器器，要要要要求求求求每每每每秒秒秒秒钟钟钟钟时时时时间间间间变变变变化化化化一次。一次。一次。一次。设计界面：设计界面：设计界面：设计界面：在在在在窗窗窗窗体体体体上上上上添添添添加加加加一一一一个个个个定定定定时时时时器器器器控控控控件件件件、一一一一个个个个标标标标签签签签，并并并并按按按按表表表表6-16-1设置属性。设置属性。设置属性。设置属性。程序代码如下：程序代码如下：程序代码如下：程序代码如下：Pr

14、ivate Sub Timer1_Timer Private Sub Timer1_Timer（）（）（）（）Label1.FontSize=48 Label1.FontSize=48 Label1.Caption Label1.Caption=Time Time 将将将将TimeTime函函函函数数数数返返返返回回回回的的的的系系系系统统统统时时时时间显示在标签中间显示在标签中间显示在标签中间显示在标签中 End Sub End Sub执行结果如下图执行结果如下图执行结果如下图执行结果如下图6-36-3所示，每隔所示，每隔所示，每隔所示，每隔1s1s钟显示一次时间。钟显示一次时间。钟显示一次

15、时间。钟显示一次时间。6.3 单选钮与复选框单选钮与复选框有有有有时时时时希希希希望望望望在在在在应应应应用用用用程程程程序序序序的的的的界界界界面面面面上上上上提提提提供供供供一一一一些些些些项项项项目目目目，让让让让用用用用户户户户从从从从几几几几个个个个选选选选项项项项中中中中选选选选择择择择其其其其中中中中之之之之一一一一，这这这这就就就就要要要要用用用用“单单单单选选选选钮钮钮钮”控控控控件件件件。如如如如果果果果有有有有多多多多个个个个选选选选择择择择框框框框，每每每每个个个个选选选选择择择择框框框框都都都都是是是是独独独独立立立立的的的的、互互互互不不不不影影影影响响响响的的的的

16、，用用用用户户户户可可可可以以以以任任任任意意意意选选选选择择择择它它它它们们们们的的的的状状状状态态态态组组组组合合合合，则则则则可以用可以用可以用可以用“复选框复选框复选框复选框”控件。控件。控件。控件。6.3.16.3.16.3.16.3.1单选钮单选钮单选钮单选钮单单单单选选选选钮钮钮钮（OptionButtonOptionButton）通通通通常常常常成成成成组组组组出出出出现现现现，主主主主要要要要用用用用于于于于处处处处理理理理“多多多多选选选选一一一一”的的的的问问问问题题题题。用用用用户户户户在在在在一一一一组组组组单单单单选选选选钮钮钮钮中中中中必必必必须须须须选选选选择择

17、择择一一一一项项项项，并并并并且且且且最最最最多多多多只只只只能能能能选选选选择择择择一一一一项项项项。当当当当某某某某一一一一项项项项被被被被选选选选定定定定后后后后，其其其其左左左左边边边边的的的的圆圆圆圆圈圈圈圈中中中中出出出出现现现现一一一一个个个个黑黑黑黑点点点点。例例例例如如如如，图图图图6-46-4所所所所示示示示就就就就是是是是一一一一组组组组单单单单选选选选钮钮钮钮，用用用用户户户户只只只只能能能能在在在在这这这这3 3个个个个单单单单选选选选钮钮钮钮选选选选项项项项中中中中选选选选择择择择一个。一个。一个。一个。1 1属性属性属性属性（1 1）ValueValue属性属性属

18、性属性该该该该属属属属性性性性表表表表示示示示单单单单选选选选按按按按钮钮钮钮选选选选中中中中或或或或不不不不被被被被选选选选中中中中的的的的状状状状态态态态。TrueTrue为选中；为选中；为选中；为选中；FalseFalse为不被选中。为不被选中。为不被选中。为不被选中。（2 2）CaptionCaption属性属性属性属性该属性显示出现在单选钮旁边的文本。该属性显示出现在单选钮旁边的文本。该属性显示出现在单选钮旁边的文本。该属性显示出现在单选钮旁边的文本。（3 3）StyleStyle属性属性属性属性该该该该属属属属性性性性用用用用来来来来设设设设置置置置控控控控件件件件的的的的外外外外

19、观观观观。值值值值为为为为0 0时时时时，控控控控件件件件显显显显示示示示如如如如图图图图6-46-4所所所所示示示示标标标标准准准准样样样样式式式式；值值值值为为为为1 1时时时时，控控控控件件件件外外外外观观观观类类类类似似似似命命命命令令令令按钮。按钮。按钮。按钮。一一一一般般般般说说说说来来来来，单单单单选选选选钮钮钮钮总总总总是是是是作作作作为为为为一一一一个个个个组组组组（单单单单选选选选钮钮钮钮组组组组）发挥作用的。图发挥作用的。图发挥作用的。图发挥作用的。图6-46-4关于颜色的单选钮就是一个按钮组。关于颜色的单选钮就是一个按钮组。关于颜色的单选钮就是一个按钮组。关于颜色的单选

20、钮就是一个按钮组。2 2事件事件事件事件单选钮常用事件是单选钮常用事件是单选钮常用事件是单选钮常用事件是ClickClick事件。事件。事件。事件。【例【例【例【例6.46.4】程序运行后，单击某个单选钮，在标签】程序运行后，单击某个单选钮，在标签】程序运行后，单击某个单选钮，在标签】程序运行后，单击某个单选钮，在标签中显示相应的字体。运行结果如图中显示相应的字体。运行结果如图中显示相应的字体。运行结果如图中显示相应的字体。运行结果如图6-56-5所示。所示。所示。所示。分析：需要在窗体上建立一个标签和分析：需要在窗体上建立一个标签和分析：需要在窗体上建立一个标签和分析：需要在窗体上建立一个标

21、签和3 3个单选钮，个单选钮，个单选钮，个单选钮，其主要属性设置如表其主要属性设置如表其主要属性设置如表其主要属性设置如表6-26-2所示。所示。所示。所示。事件过程代码如下：事件过程代码如下：事件过程代码如下：事件过程代码如下：Private Sub kai_Click Private Sub kai_Click（）（）（）（）Label1.FontName=Label1.FontName=楷体楷体楷体楷体_gb2312_gb2312 End Sub End Sub Private Sub li_Click Private Sub li_Click（）（）（）（）Label1.FontNam

22、e=Label1.FontName=隶书隶书隶书隶书 End Sub End Sub Private Sub song_Click Private Sub song_Click（）（）（）（）Label1.FontName=Label1.FontName=宋体宋体宋体宋体 End Sub End Sub6.3.26.3.26.3.26.3.2复选框复选框复选框复选框复复复复选选选选框框框框（CheckBoxCheckBox）也也也也称称称称检检检检查查查查框框框框，单单单单击击击击复复复复选选选选框框框框一一一一次次次次时时时时被被被被选选选选中中中中，左左左左边边边边出出出出现现现现“”“”

23、号号号号，再再再再次次次次单单单单击击击击则则则则取取取取消消消消选选选选中中中中，清清清清除除除除复复复复选选选选框框框框中中中中的的的的“”“”。可可可可同同同同时时时时使使使使多多多多个个个个复复复复选选选选框框框框处处处处于于于于选选选选中中中中状状状状态态态态，这这这这一一一一点点点点和和和和单单单单选选选选按按按按钮钮钮钮不不不不同同同同。如如如如图图图图6-66-6所所所所示示示示，有四个复选框。有四个复选框。有四个复选框。有四个复选框。1 1属性属性属性属性（1 1）ValueValue属性属性属性属性决定复选框的状态：决定复选框的状态：决定复选框的状态：决定复选框的状态：00

24、未选中，未选中，未选中，未选中，11已选中，已选中，已选中，已选中，22变灰暗。变灰暗。变灰暗。变灰暗。（2 2）PicturePicture属性属性属性属性用来指定当复选框被设计成图形按钮时的图像。用来指定当复选框被设计成图形按钮时的图像。用来指定当复选框被设计成图形按钮时的图像。用来指定当复选框被设计成图形按钮时的图像。2 2事件事件事件事件复选框常用事件为复选框常用事件为复选框常用事件为复选框常用事件为ClickClick事件。事件。事件。事件。【例【例【例【例6.56.5】用复选框控制文本是否加下划线和斜体】用复选框控制文本是否加下划线和斜体】用复选框控制文本是否加下划线和斜体】用复选

25、框控制文本是否加下划线和斜体显示。在程序执行期间，如果选定显示。在程序执行期间，如果选定显示。在程序执行期间，如果选定显示。在程序执行期间，如果选定“加下划线加下划线加下划线加下划线”复选复选复选复选框，则文本框中的内容就加上了下划线，如果清除框，则文本框中的内容就加上了下划线，如果清除框，则文本框中的内容就加上了下划线，如果清除框，则文本框中的内容就加上了下划线，如果清除“加下划线加下划线加下划线加下划线”复选框，则文本框中的内容就没有下划线；复选框，则文本框中的内容就没有下划线；复选框，则文本框中的内容就没有下划线；复选框，则文本框中的内容就没有下划线；如果选定如果选定如果选定如果选定“斜

26、体斜体斜体斜体”复选框，则文本框中的文字字形就复选框，则文本框中的文字字形就复选框，则文本框中的文字字形就复选框，则文本框中的文字字形就变成斜体，如果清除变成斜体，如果清除变成斜体，如果清除变成斜体，如果清除“斜体斜体斜体斜体”复选框，则文本框中的复选框，则文本框中的复选框，则文本框中的复选框，则文本框中的文字字形就不是斜体。运行界面如图文字字形就不是斜体。运行界面如图文字字形就不是斜体。运行界面如图文字字形就不是斜体。运行界面如图6-76-7所示。所示。所示。所示。设计界面：设计界面：设计界面：设计界面：在在在在窗窗窗窗体体体体上上上上建建建建立立立立一一一一个个个个文文文文本本本本框框框框

27、，两两两两个个个个复复复复选选选选框框框框。3 3个个个个控控控控件件件件的属性如表的属性如表的属性如表的属性如表6-36-3所示。所示。所示。所示。编写如下事件过程：编写如下事件过程：编写如下事件过程：编写如下事件过程：Private Sub Check1_Click Private Sub Check1_Click（）（）（）（）If Check1.Value=1 Then If Check1.Value=1 Then Text1.FontUnderline=True Text1.FontUnderline=True Else Else Text1.FontUnderline=False

28、Text1.FontUnderline=False End If End If End Sub End Sub Private Sub Check2_Click（）（）If Check2.Value=1 Then Text1.FontItalic=True Else Text1.FontItalic=False End If End Sub Private Sub Form_Load（）（）Text1.FontSize=20 End Sub6.4 容器与框架容器与框架所所所所谓谓谓谓容容容容器器器器，就就就就是是是是可可可可以以以以在在在在其其其其上上上上放放放放置置置置其其其其它它它它控控控

29、控件件件件对对对对象象象象的的的的一一一一种种种种对对对对象象象象。窗窗窗窗体体体体、图图图图片片片片框框框框和和和和框框框框架架架架都都都都是是是是容容容容器器器器。容容容容器器器器内内内内所所所所有有有有控控控控件件件件成成成成为为为为一一一一个个个个组组组组合合合合，随随随随容容容容器器器器一一一一起起起起移移移移动动动动、显显显显示示示示、消消消消失失失失和屏蔽。和屏蔽。和屏蔽。和屏蔽。在在在在前前前前一一一一节节节节例例例例中中中中，是是是是在在在在一一一一个个个个窗窗窗窗体体体体上上上上建建建建立立立立一一一一组组组组单单单单选选选选按按按按钮钮钮钮，若若若若要要要要在在在在同同同

30、同一一一一窗窗窗窗体体体体上上上上建建建建立立立立几几几几组组组组相相相相互互互互独独独独立立立立的的的的单单单单选选选选按按按按钮钮钮钮，通通通通常常常常用用用用框框框框架架架架控控控控件件件件（FrameFrame）将将将将每每每每一一一一组组组组单单单单选选选选钮钮钮钮框框框框起起起起来来来来，这这这这样样样样在在在在一一一一个个个个框框框框架架架架内内内内的的的的单单单单选选选选钮钮钮钮成成成成为为为为一一一一组组组组，对对对对一一一一组组组组单单单单选选选选钮钮钮钮的操作不会影响其它组的单选钮。的操作不会影响其它组的单选钮。的操作不会影响其它组的单选钮。的操作不会影响其它组的单选钮。

31、在窗体上创建框架及其内部控件时，应先添加框在窗体上创建框架及其内部控件时，应先添加框在窗体上创建框架及其内部控件时，应先添加框在窗体上创建框架及其内部控件时，应先添加框架控件，然后单击工具箱上的控件，用架控件，然后单击工具箱上的控件，用架控件，然后单击工具箱上的控件，用架控件，然后单击工具箱上的控件，用“+”“+”指针在框指针在框指针在框指针在框架中以拖拽的方式添加控件，框架内的控件不能被拖架中以拖拽的方式添加控件，框架内的控件不能被拖架中以拖拽的方式添加控件，框架内的控件不能被拖架中以拖拽的方式添加控件，框架内的控件不能被拖出框架外。不能用双击的方式向框架中添加控件，也出框架外。不能用双击的

32、方式向框架中添加控件，也出框架外。不能用双击的方式向框架中添加控件，也出框架外。不能用双击的方式向框架中添加控件，也不能先画出控件再添加框架。如果要用框架将窗体上不能先画出控件再添加框架。如果要用框架将窗体上不能先画出控件再添加框架。如果要用框架将窗体上不能先画出控件再添加框架。如果要用框架将窗体上现有的控件进行分组，可先选定控件，将它们剪切后现有的控件进行分组，可先选定控件，将它们剪切后现有的控件进行分组，可先选定控件，将它们剪切后现有的控件进行分组，可先选定控件，将它们剪切后粘贴到框架中。粘贴到框架中。粘贴到框架中。粘贴到框架中。1 1属性属性属性属性（1 1）CaptionCaption

33、属性属性属性属性框架的标题，位于框架的左上角，用于注明框架框架的标题，位于框架的左上角，用于注明框架框架的标题，位于框架的左上角，用于注明框架框架的标题，位于框架的左上角，用于注明框架的用途。的用途。的用途。的用途。（2 2）EnabledEnabled属性属性属性属性决定框架中的对象是否可用，通常把决定框架中的对象是否可用，通常把决定框架中的对象是否可用，通常把决定框架中的对象是否可用，通常把EnabledEnabled属性属性属性属性设置为设置为设置为设置为TrueTrue，以使框架内的控件成为可以操作的。，以使框架内的控件成为可以操作的。，以使框架内的控件成为可以操作的。，以使框架内的控

34、件成为可以操作的。2 2事件事件事件事件ClickClick和和和和DblClickDblClick。在大多数情况下，我们用框架。在大多数情况下，我们用框架。在大多数情况下，我们用框架。在大多数情况下，我们用框架控件对控件进行分组，没有必要响应它的事件。控件对控件进行分组，没有必要响应它的事件。控件对控件进行分组，没有必要响应它的事件。控件对控件进行分组，没有必要响应它的事件。【例【例【例【例6.66.6】使用两个单选钮组来改变文本框中文字】使用两个单选钮组来改变文本框中文字】使用两个单选钮组来改变文本框中文字】使用两个单选钮组来改变文本框中文字的颜色和大小。运行结果如图的颜色和大小。运行结果

35、如图的颜色和大小。运行结果如图的颜色和大小。运行结果如图6-86-8所示。所示。所示。所示。设计界面：设计界面：设计界面：设计界面：在窗体上添加一个标签控件，一个命令按钮；添在窗体上添加一个标签控件，一个命令按钮；添在窗体上添加一个标签控件，一个命令按钮；添在窗体上添加一个标签控件，一个命令按钮；添加一个框架控件，在框架控件上画上加一个框架控件，在框架控件上画上加一个框架控件，在框架控件上画上加一个框架控件，在框架控件上画上3 3个单选钮控件个单选钮控件个单选钮控件个单选钮控件（颜色按钮组）；再添加一个框架控件，在框架控件（颜色按钮组）；再添加一个框架控件，在框架控件（颜色按钮组）；再添加一个

36、框架控件，在框架控件（颜色按钮组）；再添加一个框架控件，在框架控件上画上两个单选钮控件（字体大小按钮组）。两个框上画上两个单选钮控件（字体大小按钮组）。两个框上画上两个单选钮控件（字体大小按钮组）。两个框上画上两个单选钮控件（字体大小按钮组）。两个框架的架的架的架的Caption Caption 属性分别设置为属性分别设置为属性分别设置为属性分别设置为“颜色颜色颜色颜色”和和和和“字体大小字体大小字体大小字体大小”，其它控件属性的设置可以按照图，其它控件属性的设置可以按照图，其它控件属性的设置可以按照图，其它控件属性的设置可以按照图6-86-8所示自己进行。所示自己进行。所示自己进行。所示自己

37、进行。编写代码如下：编写代码如下：编写代码如下：编写代码如下：Private Sub Command1_Click Private Sub Command1_Click（）（）（）（）end end End Sub End Sub Private Sub Option1_Click Private Sub Option1_Click（）（）（）（）蓝色单选钮蓝色单选钮蓝色单选钮蓝色单选钮 Label1.ForeColor=&HFF0000 Label1.ForeColor=&HFF0000 End Sub End Sub Private Sub Option2_Click Private Su

38、b Option2_Click（）（）（）（）红色单选钮红色单选钮红色单选钮红色单选钮 Label1.ForeColor=&HFF&Label1.ForeColor=&HFF&End Sub End Sub Private Sub Option3_Click Private Sub Option3_Click（）（）（）（）绿色单选钮绿色单选钮绿色单选钮绿色单选钮 Label1.ForeColor=&HFF00&Label1.ForeColor=&HFF00&End Sub End Sub Private Sub Option4_Click Private Sub Option4_Click（

39、）（）（）（）文字大小文字大小文字大小文字大小1010单选钮单选钮单选钮单选钮 Label1.FontSize=10 Label1.FontSize=10 End Sub End Sub Private Sub Option5_Click Private Sub Option5_Click（）（）（）（）文字大小文字大小文字大小文字大小2020单选钮单选钮单选钮单选钮 Label1.FontSize=20 Label1.FontSize=20 End Sub End Sub6.5 列表框与组合框列表框与组合框列列列列表表表表框框框框（ListBoxListBox）控控控控件件件件将将将将一一一

40、一系系系系列列列列的的的的选选选选项项项项组组组组合合合合成成成成一一一一个个个个列列列列表表表表，用用用用户户户户可可可可以以以以选选选选择择择择其其其其中中中中的的的的一一一一个个个个或或或或几几几几个个个个选选选选项项项项，但但但但不不不不能能能能向向向向列列列列表表表表清清清清单单单单中中中中输输输输入入入入项项项项目目目目；组组组组合合合合框框框框（ComboBoxComboBox）控控控控件件件件是是是是综综综综合合合合文文文文本本本本框框框框和和和和列列列列表表表表框框框框特特特特性性性性而而而而形形形形成成成成的的的的一一一一种种种种控控控控件件件件，用用用用户户户户可可可可通

41、通通通过过过过在在在在组组组组合合合合框框框框中中中中输输输输入入入入文文文文本本本本来来来来选选选选定定定定项项项项目目目目，也也也也可可可可从从从从列列列列表表表表中选定项目。中选定项目。中选定项目。中选定项目。6.5.16.5.16.5.16.5.1列表框列表框列表框列表框列表框控件（列表框控件（列表框控件（列表框控件（ListBoxListBox）的主要用途在于提供列表）的主要用途在于提供列表）的主要用途在于提供列表）的主要用途在于提供列表式的多个数据项供用户选择。在列表框中放入若干个式的多个数据项供用户选择。在列表框中放入若干个式的多个数据项供用户选择。在列表框中放入若干个式的多个数

42、据项供用户选择。在列表框中放入若干个项的名字，用户可以通过单击某一项或多项来选择自项的名字，用户可以通过单击某一项或多项来选择自项的名字，用户可以通过单击某一项或多项来选择自项的名字，用户可以通过单击某一项或多项来选择自己所需要的项目。如果放入的项较多，超过了列表框己所需要的项目。如果放入的项较多，超过了列表框己所需要的项目。如果放入的项较多，超过了列表框己所需要的项目。如果放入的项较多，超过了列表框设计时可显示的项目数，则系统会自动在列表框边上设计时可显示的项目数，则系统会自动在列表框边上设计时可显示的项目数，则系统会自动在列表框边上设计时可显示的项目数，则系统会自动在列表框边上加一个垂直滚

43、动条。加一个垂直滚动条。加一个垂直滚动条。加一个垂直滚动条。1 1属性属性属性属性（1 1）ListList属性属性属性属性该属性是一个字符串数组，用来保存列表框中的该属性是一个字符串数组，用来保存列表框中的该属性是一个字符串数组，用来保存列表框中的该属性是一个字符串数组，用来保存列表框中的各个数据项内容。各个数据项内容。各个数据项内容。各个数据项内容。List List数组的下标从数组的下标从数组的下标从数组的下标从0 0开始，即开始，即开始，即开始，即ListList（0 0）保存表中的第一个数据项的内容。）保存表中的第一个数据项的内容。）保存表中的第一个数据项的内容。）保存表中的第一个数

44、据项的内容。ListList（1 1）保存第二个数据项的内容，依次类推，保存第二个数据项的内容，依次类推，保存第二个数据项的内容，依次类推，保存第二个数据项的内容，依次类推，ListList（ListCount-1ListCount-1）保存表中的最后一个数据项的内）保存表中的最后一个数据项的内）保存表中的最后一个数据项的内）保存表中的最后一个数据项的内容。容。容。容。在窗体上添加一个列表框，其外观如图在窗体上添加一个列表框，其外观如图在窗体上添加一个列表框，其外观如图在窗体上添加一个列表框，其外观如图6-96-9所示，所示，所示，所示，图上所显示的图上所显示的图上所显示的图上所显示的“Lis

45、t1”“List1”是控件的名称，而不是列表项是控件的名称，而不是列表项是控件的名称，而不是列表项是控件的名称，而不是列表项中的数据项。中的数据项。中的数据项。中的数据项。（2 2）ListCountListCount属性属性属性属性该该该该属属属属性性性性记记记记录录录录了了了了列列列列表表表表框框框框中中中中的的的的数数数数据据据据项项项项数数数数，该该该该属属属属性性性性只只只只能能能能在程序中引用它。在程序中引用它。在程序中引用它。在程序中引用它。（3 3）TextText属性属性属性属性用用用用于于于于存存存存放放放放被被被被选选选选中中中中列列列列表表表表项项项项的的的的文文文文本

46、本本本内内内内容容容容。该该该该属属属属性性性性是是是是只只只只读读读读的的的的，不不不不能能能能在在在在属属属属性性性性窗窗窗窗口口口口中中中中设设设设置置置置，也也也也不不不不能能能能在在在在程程程程序序序序中中中中设设设设置置置置，只只只只用用用用于于于于获获获获取取取取当当当当前前前前选选选选定定定定的的的的列列列列表表表表项项项项的的的的内内内内容容容容。可可可可在在在在程程程程序序序序中中中中引引引引用用用用TextText属性值。属性值。属性值。属性值。（4 4）ListIndexListIndex属性属性属性属性该属性是该属性是该属性是该属性是ListList数组中，被选中的列

47、表项的下标值数组中，被选中的列表项的下标值数组中，被选中的列表项的下标值数组中，被选中的列表项的下标值（即索引号）。如果用户选择了多个列表项，则（即索引号）。如果用户选择了多个列表项，则（即索引号）。如果用户选择了多个列表项，则（即索引号）。如果用户选择了多个列表项，则ListIndexListIndex是最近所选列表项的索引号；如果用户没有是最近所选列表项的索引号；如果用户没有是最近所选列表项的索引号；如果用户没有是最近所选列表项的索引号；如果用户没有从列表框中选择任何一项，则从列表框中选择任何一项，则从列表框中选择任何一项，则从列表框中选择任何一项，则ListIndexListIndex为

48、为为为1 1。程序运。程序运。程序运。程序运行时，可以使用行时，可以使用行时，可以使用行时，可以使用ListIndexListIndex属性判断列表框中哪一项被属性判断列表框中哪一项被属性判断列表框中哪一项被属性判断列表框中哪一项被选中。选中。选中。选中。例如，在列表框例如，在列表框例如，在列表框例如，在列表框List1List1中选中第中选中第中选中第中选中第2 2项，即数组的第项，即数组的第项，即数组的第项，即数组的第2 2项，则项，则项，则项，则ListIndexListIndex1 1（ListIndexListIndex从从从从0 0开始）。开始）。开始）。开始）。ListIndex

49、ListIndex属性不能在设计时设置，只有程序运行属性不能在设计时设置，只有程序运行属性不能在设计时设置，只有程序运行属性不能在设计时设置，只有程序运行时才起作用。时才起作用。时才起作用。时才起作用。（5 5）SelectedSelected属性属性属性属性该属性是一个逻辑数组，其元素对应列表框中相该属性是一个逻辑数组，其元素对应列表框中相该属性是一个逻辑数组，其元素对应列表框中相该属性是一个逻辑数组，其元素对应列表框中相应的项。表示相应的项在程序运行期间是否被选中。应的项。表示相应的项在程序运行期间是否被选中。应的项。表示相应的项在程序运行期间是否被选中。应的项。表示相应的项在程序运行期间

50、是否被选中。例如，例如，例如，例如，SelectedSelected（0 0）的值为）的值为）的值为）的值为TrueTrue，表示第一项被选中，表示第一项被选中，表示第一项被选中，表示第一项被选中，如为如为如为如为FalseFalse，表示未被选中。，表示未被选中。，表示未被选中。，表示未被选中。（6 6）MultiSelectMultiSelect（多选择列表项）属性（多选择列表项）属性（多选择列表项）属性（多选择列表项）属性该属性值表明是否能够在列表框控件中进行复选该属性值表明是否能够在列表框控件中进行复选该属性值表明是否能够在列表框控件中进行复选该属性值表明是否能够在列表框控件中进行复选