《Visual Basic 教程》第七章 常用控件

第七章常用控件学的 71单选按钮和复选框 72框架 73列表框和组合框 74滚动条和Side控件 5的 7.5 76Pr。 gressBa控件 7.7 UpDown控件 78 Animation控件 79 SSTab控件 7.10鼠标器和键盘

第七章 常用控件(4学时) 7.1 单选按钮和复选框 7.2 框架 7.3 列表框和组合框 7.4 滚动条和Slide控件 7.5 时钟 7.6 ProgressBar控件 7.7 UpDown控件 7.8 Animation控件 7.9 SSTab控件 7.10 鼠标器和键盘

课前准备 1标准控件 N内部控件 出现在工具箱上的控件,20个 2. ActiveX控件 ActiveX部件:是可以重复使用的编程代码和数据: 由用 Activex技术创建的一个或多个对象所组成。 rNiy ActiveX部件文件:扩展名OCX,在 Windows的 SYSTEM目录中。 w9 ActiveX控件4 Activex文档 Activex部件 ActiveX dll Activex eXe S Activex控件添加到工具箱: 工程/部件 选定控件

1. 标准控件 内部控件 出现在工具箱上的控件，20个 2. ActiveX控件 ActiveX部件：是可以重复使用的编程代码和数据； 是由用ActiveX技术创建的一个或多个对象所组成。 ActiveX部件文件：扩展名OCX，在Windows的SYSTEM目录中。 ActiveX部件 ActiveX控件 ActiveX文档 ActiveX DLL ActiveX EXE ActiveX控件添加到工具箱： 工程/部件 选定控件 课前准备

常用 ActiveX控件所在的文件: Activex控件 ActiveX部件 文件名 通用对话框 Microsoft Common Dialog control 6.0 COMDLG32 (Common Dialog OCX Tool Bar MSCOMCTL Common Control 6.0 laiosrsay Microsoft windows OCX StatusBar ProgressBar Slider Animation Microsoft windows I MSCOMCT2 Common control-260 OCⅩ UpDown iU

常用ActiveX控件所在的文件： ActiveX控件 ActiveX部件 文件名 通用对话框 (CommonDialog) Microsoft Common Dialog Control 6.0 COMDLG32 .OCX ToolBar Microsoft Windows Common Control 6.0 MSCOMCTL .OCX StatusBar ProgressBar Slider Animation Microsoft Windows Common Control-2 6.0 MSCOMCT2 .OCX UpDown

Ansi Activex控件与 ActiveX dll!ECE的区别: Activex控件:1l 1有界面 用“工程/部件”命令加载 工具箱上有图标 ActiveXDLL/EXI 没有界面 用“工程/引用”设置引用 工具箱上没有图标 3.可插入对象 Windows应用程序的对象 可插入对象可添加到工具箱上 同标准控件一样使用 例如: Microsoft excel工作表 1no 7lmioervilp

ActiveX控件与ActiveX DLL/EXE的区别： ActiveX控件： 有界面 用“工程/部件”命令加载 工具箱上有图标 ActiveXDLL/EXE： 没有界面 用“工程/引用”设置引用 工具箱上没有图标 3. 可插入对象 Windows应用程序的对象 可插入对象,可添加到工具箱上 同标准控件一样使用 例如：Microsoft Excel工作表

2471单选钮和复选框 Caption属性:文本标题。 Alignment属性 0:控件钮在左边,标题显示在右边。 1:控件钮在右边,标题显示在左边。 va|ue属性 单选钮(逻辉型)1检查框(数值型) True:选定 0- Unchecked:未被选定 False:朱选定1 Checked:选定 2 grayed:灰色,禁止选择 Stye属性 0- Standard:标准方式 1- Graphical:图形方式 事件 Click 因为单击时自动改变状态,故不需要编写过程 见后页实例

7.1 单选钮和复选框 Caption属性：文本标题。 Alignment属性 0：控件钮在左边，标题显示在右边。 1：控件钮在右边，标题显示在左边。 Value属性 单选钮(逻辑型) 检查框（数值型） True：选定 0--Unchecked：未被选定 False：未选定 1--Checked：选定 2--Grayed：灰色，禁止选择 Style属性 0--Standard：标准方式 1--Graphical：图形方式 事件： Click 因为单击时自动改变状态，故不需要编写过程。 见后页实例

例7.1用单选钮和检查框设置文本框的字体。 单选钮和检查框示例 C宋体 V粗体册除线 确定 黑体 V斜体 下划线 阳程序设计

例7.1 用单选钮和检查框设置文本框的字体

你1m7,2框架(Fame) .框例 B程序设计 匚确定 设 Caption为"字体 字体 大小 结束 c宋体 a8号 黑体 12号 框架 框架内控件的创建方法: 方法1:单击工具箱上的工具,然后用出现的“+"指针,在框架中适当位置拖 拉出适当大小的控件。 不能使用双击工具箱上图标的自动方式 方法2:将控件“剪切”到剪贴板,然后粘贴(Ctr+V)到框架

7.2 框架(Frame) 框架内控件的创建方法： 方法1：单击工具箱上的工具，然后用出现的“+”指针，在框架中适当位置拖 拉出适当大小的控件。 不能使用双击工具箱上图标的自动方式。 方法2：将控件“剪切”到剪贴板，然后粘贴(Ctrl+V)到框架。 框架 设Caption为 "字体

Caption属性:框架标题 Enabled属性 False:标题呈灰色,不允许对框架内的对象进行操作。 Vibe属性 True:框架及其控件可见。 False:框架及其控件被隐含起来。 Cick、 Dblclick事件 般不需要编写框架的事件过程。 例7.2框架用法示例框架示例 VB程序设计 确定 字体 大小 洁束 宋体 8号 C黑体 12号

Caption属性：框架标题 Enabled属性 False：标题呈灰色，不允许对框架内的对象进行操作。 Visible属性 True：框架及其控件可见。 False：框架及其控件被隐含起来。 Click、DblClick事件 一般不需要编写框架的事件过程。 例7.2 框架用法示例

73列表框和组合框 Ltxx列表框各主要属性的值 nfer List1 ListIndex=3(下标从0开始的) List1 fierce List1 listcount= 5 plece COX List1. Selected(3)=True,其余为 False bad lust. Sorted=fase,没有排序 List1.Text为 COX 与Lst1.Liti1 lisTindex)相等 Combo 下拉式组合框/简单组框下拉式列表框 列表框各主要属性的值: 组合框示例 口Ⅸ List1, listIndex=o List1 listcount =8 List1 Selected 3=True 强梅 其余为 False List1. Sorted False List1.Text为“李宁

7.3 列表框和组合框 列表框各主要属性的值： List1.ListIndex = 3 (下标从0开始的) List1. ListCount = 5 List1. Selected(3) = True，其余为False。 List1. Sorted = False，没有排序。 List1. Text 为 “cox” ， 与List1. List(List1. ListIndex)相等 List1 下拉式组合框 简单组合框 下拉式列表框 列表框各主要属性的值： List1.ListIndex = 0 List1. ListCount = 8 List1. Selected(3) = True 其余为False。 List1. Sorted = False List1. Text 为 “李宁” Combo1

.共有的重要属性 (P:可在程序中设置或引用,D:可在设计状态设置 List: PD 字符型数组,存放列表框的项目,下标是从0开始 Listindex: p 选中的项目的序号,没有项目被选定时为-1 e listcount: p 项目的数量, ListCount-1是最后一项的下标。 Sorted: d True:按字母顺序排列。 Fase:按加入先后顺序排列 Text P h列表项中被选定的内容, List 1List(List 1. ListIndex) =ListiTexto, 1lxinsr y

1. 共有的重要属性 (P：可在程序中设置或引用，D：可在设计状态设置) List ：PD 字符型数组，存放列表框的项目，下标是从0开始。 ListIndex：P 选中的项目的序号，没有项目被选定时为-1 ListCount：P 项目的数量，ListCount-1是最后一项的下标。 Sorted：D True：按字母顺序排列。 False：按加入先后顺序排列。 Text：P 列表项中被选定的内容， List 1.List(List 1.ListIndex) = List1.Text