程序设计基础——Visual Basic6.0案例教程 第2版 教学课件 ppt 作者 刘宝山 李丕瑾 第四章

第四章,常用控件的应用,第2页,2019/5/22,本章目标,熟练掌握 框架(Frame)控件 单选钮(OptionButton)控件 复选框(CheckBox)控件 滚动条(ScrollBar)控件 列表框(ListBox)控件 组合框(ComboBox)控件 时钟（Timer）控件 进度条（ProgressBar）控件,第3页,2019/5/22,任务1文字的简单格式化,在文本框中显示初始化时的文字（一首古诗），用户可以通过复选框设置文字的字形，通过单选钮设置文字的字体和颜色，通过水平滚动条控制文字的大小，同时用户可以随时编辑文本框中的内容。单击“清除”按钮后清除文本框中的内容。,第4页,2019/5/22,任务分析,该任务我们要研究以下内容 框架(Frame)控件 单选钮(OptionButton)控件 复选框(CheckBox)控件 滚动条(ScrollBar)控件,第5页,2019/5/22,任务分析,在 Visual Basic中，控件分为三类：标准控件、ActiveX控件和可插入对象。 标准控件 也称内部控件，启动Visual Basic后，自动加入到工具箱中，提供了20种控件。 ActiveX控件 是对标准控件的扩充。先将其添加到工具箱中，然后才能使用，使用方法与标准控件相同。 可插入对象 是Windows应用程序的对象，如“Microsoft Word 文档”、“Microsoft Excel 工作表”等。将其添加到工具箱中，然后再使用，使用方法与标准控件相似。,第6页,2019/5/22,任务分析,框架 (Frame) 控件 框架是一个容器类控件，它和窗体一样可以容纳其它控件。 在 Visual Basic 程序中，通常将放置在同一容器中的控件看成一个组合，在一个组中，所有对象可随容器移动、删除。,第7页,2019/5/22,任务分析,框架 (Frame) 控件 属性及事件 1 Caption属性 框架上的标题文本，如果Caption为空字符串，则框架为封闭的矩形框。 2Enabled属性 决定对象是否可用，有两个取值True / False，True为缺省设置。 3Visible属性 框架及其控件是否可见，有两个取值True / False 。 4框架可以响应Click和DoubleClick事件，但一般不需要编写事件过程。,第8页,2019/5/22,任务分析,单选钮(OptionButton)控件 单选钮以成组形式出现，能提供“选中”和“未选中”两种可选项。 通常情况下，将一组单选钮控件放入框架Frame控件、或图片PictureBox控件、或窗体Form控件这样的容器中，来实现分组。 使用单选钮组时，选中其中一个，其余就会自动关闭。,第9页,2019/5/22,任务分析,单选钮(OptionButton)控件 属性及事件 1Caption属性 设置单选钮旁边显示的标题文本。 2Value属性 表示单选按钮的状态，有两个取值为True / False ，False为缺省设置。 3Enabled属性 是否响应用户生成的事件，有两个取值为True / False ，True为缺省设置。 。 4Alignment属性 设置标题的对齐方式，有两个取值，分别为： 0 单选钮在左边，标题在右边，缺省设置； 1 单选钮在右边，标题在左边。,第10页,2019/5/22,任务分析,单选钮(OptionButton)控件 属性及事件 5Style属性 设置单选钮的外观，有两个取值，分别为： 0-Standard：标准方式，缺省设置； 1-Graphical：图形方式，此方式下的单选钮的外观与命令按钮相似。 Style是只读属性，只能在设计时设置。,第11页,2019/5/22,任务分析,单选钮(OptionButton)控件 属性及事件 Click事件 程序运行时，单击单选钮后使其Value属性值变为True（即选中状态）。 在应用程序中可以创建一个事件过程，检测控件对象Value属性值，再根据检测结果执行相应的处理。,第12页,2019/5/22,任务分析,复选框(CheckBox)控件 复选框能提供“选中”和“未选中”两种可选项。 复选框组列出可供用户选择的选项，用户根据需要选定其中的一项或多项。,第13页,2019/5/22,任务分析,复选框(CheckBox)控件 属性及事件 1Caption属性 复选框旁边显示的标题文本。 2Value属性 表示复选框的状态，有三个取值，分别为： 0Unchecked，表示未选中，缺省设置； 1Checked，表示选中，； 2Grayed，不可用，即灰度显示。 3Enabled属性 4Alignment属性 5Style属性 均同单选钮。,第14页,2019/5/22,任务分析,复选框(CheckBox)控件 属性及事件 Click事件 程序运行时，单击复选框后使其Value属性值变为1（即选中状态）。 在应用程序中可以创建一个事件过程，检测控件对象Value属性值，再根据检测结果执行相应的处理。,第15页,2019/5/22,任务分析,滚动条(ScrollBar) 控件 通常附在窗体上协助观察数据或确定位置，也可作为数据输入工具，或者速度、数量的指示器，可用鼠标调整滚动条中滑块的位置来改变其值。滚动条控件与文本框、列表框和组合框等控件内置的滚动条有所不同。 滚动条分为水平滚动条和垂直滚动条两种。,第16页,2019/5/22,任务分析,滚动条(ScrollBar) 控件 属性与事件 1Min和Max属性 返回和设置滚动条所能代表的最小值、最大值，取值范围为-3276832767。Min默认值为0，Max默认值为32767。 2Value属性 返回和设置滚动条的滑块当前位置的值，其返回值介于Min和Min属性值之间，缺省为0。 3SmallChange属性 返回和设置当用户单击滚动箭头时，滚动条控件Value属性值(滑块位置)的所增加或减少的值。默认值为1。,第17页,2019/5/22,任务分析,滚动条(ScrollBar) 控件 属性与事件 Scroll事件 当拖动滑块时触发。在实际编程时，经常用Scroll事件过程来跟踪滚动条在拖动时数值的动态变化。 Change事件 改变Value属性值时触发。 由于在单击滚动条或滚动箭头时，将产生Change事件，因此，在实际编程时，常利用Change事件来获得滚动条变化后的最终值。,第18页,2019/5/22,任务实施,创建新工程 从工具箱中选择以下控件拖入窗体,第19页,2019/5/22,任务实施,设置窗体及控件的属性,第20页,2019/5/22,任务实施,在代码窗口编写事件代码并保存、运行 源代码,Private Sub HScroll1_Change() '得到滚动条中最后的值 Text1.FontSize = HScroll1.Value End Sub Private Sub HScroll1_Scroll() '跟踪滚动条中的动态变化 Text1.FontSize = HScroll1.Value End Sub,Text1.FontItalic = Check2.Value Text1.FontUnderline = Check3.Value Text1.FontStrikethru = Check4.Value,第21页,2019/5/22,任务设计完成效果,第22页,2019/5/22,任务2项目选择器,程序运行时，单击按钮完成将左侧或右侧列表框中的选项全部或部分移动到另一侧的功能。,第23页,2019/5/22,任务分析,该任务我们要研究以下内容 列表框(ListBox)控件,第24页,2019/5/22,任务分析,列表框(ListBox)控件 列表框用于在多个项目中做出选择的操作。 单击某一项选择自己需要的项目，但不能直接修改其中的内容。 如果项目总数超出了列表框设计时的长度，则Visual Basic会自动给列表框加上滚动条。,第25页,2019/5/22,任务分析,列表框(ListBox)控件 属性、方法和事件 Columns属性 设置列表框中的项目是单列显示（垂直滚动）还是多列显示（水平滚动），Columns属性只能在属性窗口设置。 当Columns属性值为0（缺省设置）时呈单列显示； 大于0时呈多列显示，显示的列数由Columns属性值决定。,第26页,2019/5/22,任务分析,列表框(ListBox)控件 属性、方法和事件 List 属性 List是一个字符型数组，用于存放列表框的表项，数组的下标从0开始。 例如：将列表框List1中的第一项内容显示在文本框Text1中 Text1.Text= List1.List(0) 例如：将列表框List1中的第四项的内容设置为字符串“计算机世界”，程序代码为： List1.List(3)= “计算机世界“,第27页,2019/5/22,任务分析,列表框(ListBox)控件 属性、方法和事件 ListIndex属性 返回已选定的项目的顺序号(索引)，若未选定任何项，则ListIndex的值为-1，ListIndex属性只能在程序中设置和引用。 ListCount属性 返回列表框中项目的总数，项目下标为0ListCount-1，ListCount属性只能在程序中设置和引用。,第28页,2019/5/22,任务分析,列表框(ListBox)控件 属性、方法和事件 Sorted属性 列表框中各表项在运行时是否按字母顺序排列，Sorted属性只能在属性窗口设置，有两个取值，分别为： True：表示按字母顺序排序； False：表示不排序，按加入的先后顺序排列。 Text属性 返回被选定项目的文本内容。Text属性只能在程序中设置和引用。 例如：List1.Text的值与List1.List(List1.ListIndex)的值相同,第29页,2019/5/22,任务分析,列表框(ListBox)控件 属性、方法和事件 Selected属性 测试列表框中某一表项是否被选中，Selected属性只能在程序中设置和引用，有两个取值，分别为： True：列表框中某一项被选中。 False：列表框中某一项没有被选中。,第30页,2019/5/22,任务分析,列表框(ListBox)控件 属性、方法和事件 MultiSelect属性 设置列表框是否允许同时选择多个表项，有三个取值，分别为： 0 None：只能选择一项，不能多选，默认值； 1 Simple：简单多项选择，表示可用鼠标单击或按空格键在列表框中选中或取消多项； 2 Extended：扩展多项选择，按住Ctrl键，同时用鼠标逐个单击所需表项，可以实现多选；按住Shift键，同时用鼠标单击所需要的项目区域中的首项和尾项，可以选定多个连续项。,第31页,2019/5/22,任务分析,列表框(ListBox)控件 属性、方法和事件 Style属性 确定是否将复选框显示在ListBox中，有两个取值，分别为： 0 Standard：不显示复选框 1 Checkbox：显示复选框 SelCount属性 如果MultiSelect属性设置为1（Simple）或2（Extended），则该属性返回列表框中所选项目的数目。,第32页,2019/5/22,任务分析,列表框(ListBox)控件 属性、方法和事件 AddItem方法 把一个项目加入列表框。 格式 对象名.AddItem item , index 其中： item：为字符串表达式，表示要加入的项目； Index:决定新增项目的位置，如果缺省，则添加在列表框的末尾。 例如： List1.AddItem “高等数学”,2 插入第3项 List1.AddItem “VB程序设计