计算机VB学习第6章.ppt

《计算机VB学习第6章.ppt》由会员分享，可在线阅读，更多相关《计算机VB学习第6章.ppt（63页珍藏版）》请在三一办公上搜索。

1、Visual Basic程 序 设 计,山东外贸职业学院,E-mail：,信息管理系 柳淑花,第6章 常用内部控件,本章主要内容1、图像和图片框 2、定时器3、单选按钮与复选框4、容器与框架5、列表框与组合框6、滚动条7、焦点与Tab键顺序,作业 本章小结,退出,第6章 常用内部控件,控件是构成用户界面的基本元素，只有掌握了控件的属性、事件和方法，才能编写具有实用价值的应用程序。Visual Basic 中的控件分为两类：标准控件（内部控件）ActiveX 控件（外部控件）VB工具箱中只列有标准控件（20个）。,上一页,下一页,返回本章首页,6.1 图片框与图像框,窗体、图片框和图像框可以显示

2、来自图形文件的图形。图形文件的存储形式有多种，常见有以下几种：位图(Bitmap)：用像素表示的图像，将它作为位的集合存储器来，每个位都对应一个像素。（.bmp）图标(Icon)：图标是位图，最大为32 x 32像素，常用来表示最小化的应用程序。（.ico）JPEG文件：JPEG是一种支持8位和24位颜色的压缩位图格式。（.jpg）GIF文件：GIF是一种支持256种颜色的压缩 位图格式。（.gif）,上一页,下一页,返回本章首页,图片框(PictureBox)、图像框(ImageBox),的常用属性 Name属性：对象名 Left、Top属性：Width、Height属性：Visible、E

3、nabled属性：BorderStyle属性：边框样式 0：无边框（默认）1：有边框,上一页,下一页,返回本章首页,图片框(PictureBox)、图像框(ImageBox)的常用属性,Picture 属性：返回或设置控件中要显示的图片，可 以在属性窗口静态设置，也可以在代码中动 态设置。在代码中设置的格式为：.Picture=LoadPicture()LoadPicture函数用于在代码中将图形载入到窗体、PictureBox 控件或 Image 控件的 Picture 属性。说明：不带参数的LoadPicture()函数，是使图像控件不显示任何图像。属性窗口设置的Picture 属性，会被

4、复制到二进制窗体文件(.frx)中，运行时不依赖源文件。而在程序代码中使用LoadPicture调入的图形文件，在运行时要保证其存在于指定的路径中。,上一页,下一页,返回本章首页,AutoSize 属性 用来指定图片框是否要调整大小，以适应图像的大小（True：图片框按图片大小自动调整以适应图像的大小；False（默认值）：图片框以原始大小显示）。Stretch属性 用来指定一个图形是否要调整大小，以适应图像框控件的大小（True：缩放图像；False（默认值）：图像以原始大小显示）。其语法为：.Stretch=,上一页,下一页,返回本章首页,2.图片框与图像框的区别,图片框控件可以作为其他控

5、件的容器，而图像框 则不能；图片框可以接受Print方法输出的文本，而 图像框则不能；图像框比图片框占用内存少，显示速度快。例6.1 单击按钮，在窗体的图像框中轮流显示扑克牌的四种花色，并调整图 像大小已适用控件。界面 如图：li6_1.vbp,上一页,下一页,返回本章首页,例6.2,：编程实现三个图片框中图片的切换，并使第三个图片框中可以显示整个图片。界面要求如下：在窗体上添加如图所示三个图片框控件Picture1、Picture2、Picture3。将Picture3的AutoSize属性设置为True。其他属性值为默认值。要求单击Picture3时，图片顺时针切换。Li6_2.vbp,（

6、a）设计时界面（b）运行时界面（c）响应事件,6.2 定时器（Timer）,定时器控件：实际上是一个按一定时间间隔（Interval）产生一个Timer 事件的 控件。在运行时不可见。定时器的重要属性：=True 时，定时器处于工作状态 Enabled属性：=False 时，定时器停止工作。Interval属性：定时器周期性事件之间的时间间隔 数值型（0 64767）,单位为毫秒定时器只有一个事件：Timer事件 在VB中，可以用Time函数获取系统时间。例6.3 数字计时器，标签背景3秒后变成红色。Li6_3.vbp,上一页,下一页,返回本章首页,例6.4：利用计时器实现图片移动。,在窗体上

7、添加一个图片框控件Picture1、一个按钮控件Command1和一个计时器Timer1。要求：单击Command1图片绕窗体四周顺时针移动或停止（按钮标题要求在“移动”和“停止”间切换）。界面如图：Li6_4.vbp,上一页,下一页,返回本章首页,例6.5：利用随机函数在文本框Text1中随机显示二位数的加、减运算题，答案由用户在文本框Text2中输入，每题解答时间为10秒钟，总共答题时间为60秒钟。每题的限制时间采用倒计时，答题时间到，统计并显示总成绩。界面设计如图所示：除文本框外，其余各控件的属性见表：Li6_5.vbp,上一页,下一页,返回本章首页,6.3 单选按钮与复选框,单选框和复

8、选框非常相似，它们都是提供选择项的控件。它们之间的区别是：单选框一般用于单项选择（多选一），而复选框则可以用于多项选择。单选框（OptionButton又称为选项按钮），它是从多个可选项中选择一项的操作。,上一页,下一页,返回本章首页,复选框（CheckBox）通常用于提供 Yes/No 或 True/False 的逻辑选择（或三态）。复选框通过 Value 属性指示其所处的状态。无论何时，当用户单击复选框时都将触发其Click 事件。,上一页,下一页,返回本章首页,单选框和复选框的重要属性、事件和方法,1、Name 属性对象名2、Left、Top、Width、Height、Visible、E

9、nabled 属性3、Caption属性标题文字4、Style 属性选框的样式 0：标准样式（默认）1：以命令按钮的样式显示,复选框（左）和单选按钮（右）,上一页,下一页,返回本章首页,5、Alignment 属性,0：框在文字左边（默认）1：框在文字右边6、Value 属性复选框：Value=0 表示未选中（默认）Value=1 表示选中 Value=2 复选框为灰色，表示禁止用户 选择。单选框：Value=True 表示选中 Value=False 表示未选中（默认）7、Move方法8、Click事件,上一页,下一页,返回本章首页,例6.6 用单选按钮和复选框控制文本框中输入的字体,界面设

10、计：如图所示,注意：系统中可用 屏幕字体的使用。Li6_6.vbp,两个单选按钮，两个复选框（图形）。一个文本框（设计时已经输入文字，字体三号）。一个图片框，用于显示文本框中文本的字体。一个d命令按钮用于切换字体。各控件的属性见表：,上一页,下一页,返回本章首页,作业：P99 2、3、4,上机作业：实训七 常用控件（一）,上一页,下一页,返回本章首页,6.4 容器与框架,容器：就是可以在其上放置其他控件对象的对象。在VB中可以作为容器的控件有：窗体、图片框和框架容器内的所有控件可以随容器一起移动、显示、隐藏。,上一页,下一页,返回本章首页,框架（Frame）,框架是一个容器控件，用于将屏幕上的

11、对象分组。它的作用是能够把其他控件组织在一起形成控件组。为了将控件分组，首先需要绘制框架，然后绘制框架里面的控件。重要属性、事件和方法：1、Name 属性对象名2、Caption 属性 Caption为框架的可见文字部分，如果省略，则框架形式上如同一个封闭的矩形框。,上一页,下一页,返回本章首页,3、Enabled、Visible 属性,4、BorderStyle 属性边框样式 0：不显示边框和标题文字 1：有边框和标题文字（默认）5、Move方法6、Click事件、Dbclick事件,当框架的Enable属性为False时，框架内的所有控件都将屏蔽，用户无法对其操作，此时框架的标题（Capt

12、ion）为灰色。当框架的Visible属性为False时，框架及其内部的所有控件都将隐藏起来。,上一页,下一页,返回本章首页,6.5 列表框与组合框,1、列表框（ListBox）控件 列出可供用户选择的项目列表。运行时，可用鼠标或箭头键选中其中的一项或多项，选中的项被加亮显示。列表框中的选择项称为条目(Item)。列表框的默认名为ListX。重要属性、事件和方法：Columns 属性：决定列表框中显示条目的列数。0-显示一列（默认），垂直滚动条。1-显示一列，水平滚动条。n-显示 n 列，水平滚动条。（n1）,上一页,下一页,返回本章首页,ListCount属性 列表框中的条目数,ListCo

13、unt（只读属性）在设计时不可用。List属性 设置列表框中包含的项。List 属性实质上是个一维字符串数组，其下界为0，上界为 ListCount-1。每一元素存放列表框中的一个条目。List 属性可以在属性窗口中设置，也可在代码中设置。其格式是：.List()=如：List1.List(5)=“插入”,上一页,下一页,返回本章首页,ListIndex属性指示当前所选条目的序号,（0 n-1）；若列表框支持多选，则ListIndex属性的值是最后一个被选中条目的序号；若没有条目被选中，则此属性的值为-1。ItemData属性保存列表框中每一条目的 长整型数（与List 属性类似也是个一维数组

14、）。,上一页,下一页,返回本章首页,MultiSelect属性设置是否能够选择多项。,MultiSelect=0：不允许复选（缺省值）。MultiSelect=1：简单复选。鼠标单击或按下空格键，在列表中选中或取消选中项。使用箭头键移动焦点。MultiSelect=2：扩展复选。按下 SHIFT 并单击鼠标或按箭头键选择连续的多项。按下 CTRL 并单击鼠标选择不连续的多项（或取消选中项）。MultiSelect 属性在运行时是只读的。,上一页,下一页,返回本章首页,Style 属性控制列表框的外观,Style=0：默认值，标准样式，单击选项即可选中。Style=1：复选框样式，列表框的每个项

15、目以复选框 的形式显示（不受MultiSelect属性的影响）。Style 属性在运行时是只读的。Style=0 Style=1SelCount 属性指出列表框中被选中项的数量。若没有选项被选中，则 SelCount 属性的返回值为0。SelCount 属性在运行时是只读的。,上一页,下一页,返回本章首页,Selected属性,Selected属性是一个逻辑型数组（与List 和ItemData属性类似），其中的每个元素对应列表框中的一个选项的选择状态：Selected=True 时，对应项被选中；Selected=False 时，对应项没有选中。Selected属性的语法为：列表框名.Sel

16、ected()=此属性不能在属性窗口中使用TopIndex 属性 指出列表框控件可见的第一个条目的序号。此属性不能在属性窗口中使用。各属性的用法，见例6.7 li6_7.vbp,上一页,下一页,返回本章首页,Text 属性指示列表框中当前所选条目的文本,其返回值总与表达式List1.List(List1.ListIndex)的返回值相同。Text属性为只读属性，只能在程序中设置。Sorted属性指示列表框中的条目是否排序。Sorted属性值为True，则选项按字母顺序升序 排列，否则按输入的顺序排列。Sorted 属性为只读属性NewIndex属性指示新添加到列表框中的 条目的序号。若列表框中

17、没有新添加的条目，则NewIndex=-1 NewIndex 属性为只读属性,上一页,下一页,返回本章首页,AddItem 方法向列表框中添加新条目,格式：列表框名.AddItem 字符串表达式,插入 位置序号 若不指定插入位置，且Sorted=False，则插入到列表尾；否则插入到适当位置。例如：List1.AddItem“王平”RemoveItem方法删除指定列表项 格式：列表框名.RemoveItem 删除项序号 例如：List1.RemoveItem 0 Clear方法删除列表框中的所有项。格式：列表框对象名.Clear,上一页,下一页,返回本章首页,Move 方法,Click事件、D

18、bclick事件Scroll事件 当列表框的滚动条被滚动时，触发该事件ItemCheck事件 当列表框的 Style=1（复选框样式）时，并且当列表框的一个条目被选中或被取消时，触发该事件。注意：ItemCheck事件发生在Click事件 之前。,上一页,下一页,返回本章首页,例 6.8 列表框属性、方法、事件举例,界面如图：li6_8.vbp 将城市及其人口数添加到右侧的列表框中。并且选中后，单击“删除”，可将其从列表框中删除，或全部删除。,上一页,下一页,返回本章首页,2、组合框（ComboBox）控件,组合框控件将文本框和列表框的特性结合在一起既可以在控件的文本框部分输入信息，也可以在控

19、件的列表框部分选择一项。组合框的默认名为ComboX（X=1，2，）。组合框有三种风格：下拉式组合框 简单组合框 下拉式列框表 组合框包含一个文本框和一个列表框。用户可在文本框部分输入选项，也可用列表框部分选择选项。,上一页,下一页,返回本章首页,组合框的重要属性、事件和方法：,Style 属性外观属性。组合框有三种外观：Style=0，下拉式组合框（默认值）Style=1，简单组合框 Style=2，下拉式列表框,Style=0 Style=1 Style=2,上一页,下一页,返回本章首页,Text属性用户从列表框中选定的文本内容,或直接输入到文本框中的内容。对下拉列表框Text属性为只读属

20、性。SelLenght属性、SelStart属性、SelText属性 ListIndex属性存放当前选中条目的序号。在设计时不可用。如果未选定项目，则 ListIndex=1 NewIndex属性、Sorted属性、ItemData属性、TopIndex属性、List属性、ListCount属性 其用法同列表框,上一页,下一页,返回本章首页,常用方法,（1）AddItem方法,AddItem方法用于将项目添加到列表框或组合框控件，其语法为：,.AddItem，,（2）Clear方法,Clear方法用于清除列表框或组合框或系统剪贴板的内容。其语法为：,.Clear,（3）RemoveItem方法

21、,RemoveItem 方法用以从列表框或组合框中删除一项。其语法为：,.RemoveItem,（4）Move 方法,上一页,下一页,返回本章首页,常用事件,Click事件DblClick事件Scroll事件Change事件（在输入文本时响应该事件）Style=0,1时，响应Click,DbClick,Change，Scroll事件Style=2时，响应Click、Scroll事件。,上一页,下一页,返回本章首页,例6.9：li6_9.vbp,Private Sub Form_Load()Combo1.AddItem 北京 Combo1.AddItem 上海 Combo1.AddItem 杭州

22、 Combo1.AddItem 西安 Combo1.AddItem 青岛End Sub,上一页,下一页,返回本章首页,.,Private Sub Combo1_Click()Select Case Combo1.Text Case 北京 MsgBox 北京-中国的首都,组合框举例 Case 上海 MsgBox 上海-不夜城,组合框举例 Case 杭州 MsgBox 杭州-西湖,组合框举例 Case 西安 MsgBox 西安-兵马俑,组合框举例 Case 青岛 MsgBox 青岛-栈桥,组合框举例 End SelectEnd Sub,上一页,下一页,返回本章首页,例6.10：用列表框或组合框列出

23、各电脑配件的选项供用户选择。用户每选择一项，将在“用户配置”组合框中添加对应的选择项，单击“求总价”按钮将在Picture1图片框中显示总价格。li6_10.vbp,上一页,下一页,返回本章首页,6.6 滚动条（ScrollBar）,滚动条控件分为水平滚动条（HScroll）和垂直滚动条（VScroll）通常用来帮助观察数据或确定位置，同时也可以作为数据输入的工具。重要属性、事件和方法：Value 属性 Value 属性是滚动条最重要的属性，它反映了滚动条的当前值。滑块的位置能够反映此属 性的值（用整数表示，其取值范围为-32768+32767）。,上一页,下一页,返回本章首页,Min属性,M

24、in属性表示滚动条或滑块所能够代表的最小值，其取值范围为-32768+32767。Max属性 Max属性表示滚动条所能够代表的最大值，其取值范围为-32768+32767。SmallChange 属性 SmallChange属性表示当用户单击滚动条两端箭头时，滑块移动的增量值。取值范围为132767，默认值为1。LargeChange属性 LargeChange属性表示当用户单击滚动条中的 空白处时，滑快移动的增量值。取值范围为132767，默认值为1。,上一页,下一页,返回本章首页,Move方法,Change事件 当滚动条的Value 属性值发生变化时，激发Change 事件。能够引起Val

25、ue 属性值发生变化的原因有：单击滚动箭头按钮、单击空白区域、拖动滑块或在程序中改变了Value 属性的值。Scroll事件 与滚动条有关的事件主要是Scroll和Change事件。只有拖动滑块才激发Scroll事件，而通过单击滚动箭头或滚动条空白处则不会发生Scroll事件。只要滑块的位置发生改变，就触发Change事件。,上一页,下一页,返回本章首页,例 6.11 用滚动条设置颜色,.,li6_11.vbp,上一页,下一页,返回本章首页,例6.12 利用滚动条调整图片的大小,运行界面,li6_12.vbp,上一页,下一页,返回本章首页,6.7 焦点与 Tab 顺序,焦点：是指当前处于活动状

26、态的对象。Tab键次序：当用户向窗体中放置控件时，系统会自动按顺序为每个控件指定一个Tab键次序，其数值反映在控件的TabIndex 属性中。其中第一个控件的TabIndex 值为0。Tab键顺序：决定了当用户按Tab 键或Shift+Tab键时，焦点从一个对象转到另一个对象时的次序。控件拥有焦点的方法：鼠标单击；快捷键；Tab 键或Shift+Tab键；方向键；SetFocus 方法,上一页,下一页,返回本章首页,与焦点有关的属性、事件和方法,TabIndex 属性：决定Tab键移动焦点的顺序；TabStop 属性：决定控件是否能够拥有焦点。True-可以拥有焦点，False-跳过。SetF

27、ocus 方法：设置焦点。对象名.SetFocus GotFocus 事件：得到焦点时触发。LostFocus事件：失去焦点时触发。,上一页,下一页,返回本章首页,6.8 多窗体程序设计,对于较为简单的应用程序，一个窗体就足够了。对于复杂的应用程序，往往需要通过多重窗体（MultiForm）来实现。每一个窗体可以有不同的界面和程序代码，以完成不同的功能。如：有的窗体用来输入数据，有的窗体用来显示结果等等。,上一页,下一页,返回本章首页,1、启动对象,在具有多个窗体的应用程序中，各个窗体之间是并列关系。程序运行时，首先执行的对象默认为第一个创建的窗口Form1，称为启动对象。根据需要可以指定其他

28、窗体或Main子过程为启动对象。启动对象可以是一个窗体，也可以是标准模块中名为Main的自定义Sub过程。方法是：“工程”“工程属性”“通用”,上一页,下一页,返回本章首页,2、窗体的加载与卸载,添加窗体“工程”菜单“添加窗体”命令 工具栏的“添加窗体”按钮 打开“添加窗体”对话框，单击“新建”选项卡，从列表框中选择一种新窗体的类型；或者单击“现存”选项卡，将属于其他工程的窗体添加到当前过程中。与窗体加载与卸载有关的语句和方法 多重窗体的操作需要在各个窗体之间进行切换，涉及到窗体的“建立”、“装载”、“显示”、“隐藏”、“卸载”等操作。,上一页,下一页,返回本章首页,（1）Load语句,Loa

29、d语句的作用：是将一个窗体装入内存，但并不显示窗体，其语法格式为：Load 窗体名称（2）Unload语句 Unload语句的功能与Load语句相反，是将窗体从内存中删除。Unload语句的语法格式为：Unload 窗体名称（3）Show方法 Show方法的语法格式为：窗体名称.Show 模式 模式：vbModal 0|1 无模式：省略,上一页,下一页,返回本章首页,（4）Hide方法 用以隐藏窗体对象，但不能使其卸载。格式：窗体名称.Hide 隐藏窗体时，它就从屏幕上被删除，并将其 Visible 属性设置为 False。用户将无法访问隐藏窗体上的控件，但是对于运行中的 Visual Bas

30、ic 应用程序，或对于Timer 控件的事件，隐藏窗体的控件仍然是可用的。窗体被隐藏时，用户只有等到被隐藏窗体的事件过程的全部代码执行完后才能够与该应用程序交互。如果调用 Hide 方法时窗体还没有加载，那么 Hide 方法将加载该窗体但不显示它。,上一页,下一页,返回本章首页,3、窗体加载时的事件,Initialize 事件 此事件是窗体的初始化事件。在加载一个窗体时，此事件最先被触发。Load 事件 加载窗体时触发该事件。一般在该事件过程中进行窗体的初始化工作。Activace 事件 当窗体被激活成为活动窗体时触发该事件。可以在该事件过程中设置控制焦点，进行绘图。,上一页,下一页,返回本章

31、首页,4、窗体卸载时的事件,Deactivate 事件 当窗体由活动窗体变为非活动窗体时，触发此事件。QueryUnLoad 事件 当窗体要被卸载之前，先触发该事件。UnLoad事件 当窗体从屏幕上消失时触发该事件。Terminate事件 窗体卸载时的最后一个事件,上一页,下一页,返回本章首页,5、多模块之间数据的传递,使用全局变量、全局数组 使用对象属性6、程序的终止 End 语句 Stop 语句,上一页,下一页,返回本章首页,6.9 直线与形状,1、直线控件（Line）在窗体上显示一条各种类型和宽度的线条，起装饰作用。重要属性、事件和方法：X1 属性、Y1 属性、X2 属性、Y2 属性 直

32、线控件的两个端点在窗体上的坐标值。直线控件没有Left、Top、Height、Width属性,上一页,下一页,返回本章首页,BorderStyle 属性线条样式,0 或 vbTransparent透明 1 或 vbBSSolid实线（默认值）2 或 vbBSDash虚线 3 或 vbBSDot点线 4 或 vbBSDashDot点划线 5 或 vbBSDashDotDot双点划线 6 或 vbBSInsideSolid实线 BorderWidth属性线条宽度 只有实线和透明有线宽 注意：Line 控件无Left、Top、Height、Width、Enabled属性；Line 控件无任何事件；L

33、ine 控件也没有 Move 方法,上一页,下一页,返回本章首页,2、形状控件（Shape）,在窗体上显示多种不同的形状，起装饰作用。重要属性、事件和方法：Shape 属性决定形状控件的不同形状 0 或 vbShapeRectangle矩形 1 或 vbShapeSquare正方形 2 或 vbShapeOval椭圆 3 或 vbShapeCircle圆 4 或 vbShapeRoundedRectangle圆角矩形 5 或 vbShapeRoundedSquare圆角正方形,上一页,下一页,返回本章首页,BorderStyle 属性边框样式,BorderWidth属性边框宽度 FillSty

34、le属性填充样式 0实线 1透明（默认）2水平直线 3垂直直线 4上斜对角线 5下斜对角线 6十字线 7交叉对角线 注意：Shape 控件无Enabled属性；Shape 控件无任何事件；Shape控件有 Move 方法 例 6.13 如图 li6_13.vbp,上一页,下一页,返回本章首页,作 业：,P99 7、8,上机作业：实训八,上一页,下一页,返回本章首页,第 7 章 小 结,1、图片框和图像框 PictureBox控件和Image控件都用于显示图片，图片通过Picture属性来设置；PictureBox控件比Image控件的功能强大，它包含多个图形方法；PictureBox控件的Au

35、toSize属性可以使控件尺寸适应图片尺寸，Image控件的Stretch属性可以使图片尺寸适应控件尺寸。2、定时器 Timer控件可以每隔一定的时间间隔就自动产生一个定时事件（Timer事件）；通过设置Timer控件的Interval属性可以指定时间间隔的长短。,上一页,下一页,返回本章首页,第 7 章 小结（续1）,3、单选按钮和复选框 单选按钮和复选框允许用户在有限的选择中进行单选和复选；每个单选按钮和复选框都有Value属性，该属性指明了控件的选择状态。4、框架 框架像窗体一样可以作为其他控件对象的容器，通常利用它对窗体的控件进行分组管理。,上一页,下一页,返回本章首页,第 7 章 小

36、结（续2）,5、列表框与组合框 列表框和组合框都可以提供多个选项供用户选择；列表框支持多选、多列、自动排列和滚动条，利用其List属性可以访问到列表中的每一个项目；列表框提供的方法可以完成项目的添加、删除和清除。组合框除具备列表框的功能外，还允许用户输入列表中不存在的项目。6、滚动条 滚动条可以用来输入界于某个区间的数值，即Min属性和Max属性之间的整数；滚动条有两个重要的事件：Change事件和Scroll事件。,上一页,下一页,返回本章首页,第 7 章 小结（续3）,6、焦点与Tab 键顺序 焦点：是指当前处于活动状态的窗体或控件。Tab键次序决定了当用户按Tab 键或Shift+Tab键时，焦点跳转的次序，它由控件的TabIndex属性的值确定。其中第一个控件的TabIndex 值为0。7、直线与形状 直线和形状控件可以在窗体上画直线和各种形状，起装饰作用。,上一页,退出,返回本章首页,