零点起飞学VisualBasic之控件多胞胎-控件.pptx

第12章控件多胞胎 控件数组 第11章介绍了VisualBasic程序中的标准控件和ActiveX控件 添加到窗体的控件可以组成控件数组来执行复杂的程序操作 学习本章 可以掌握创建和使用控件数组的方法 创建和操作菜单项数组的方法 12 1什么是控件数组 控件数组是一组具有共同名称和类型的控件 一个控件数组至少应有一个元素 控件数组有共同事件过程 通过索引Index属性来标识每个控件 12 1 1什么是控件数组元素 控件数组中包含至少一个控件 每个控件称为一个元素 控件数目可在系统资源和内存允许的范围内增加 数组的大小也取决于每个控件所需的内存和Windows资源 控件数组中控件满足以下条件 每个控件的Name属性完全相同 通过不同的Index属性来操作每个控件 控件数组中最大索引值为32767 每个控件类型必须相同 一个控件数组必须为同一种控件类型 如同为标签控件或文本框控件 不允许一个控件数组同时存在两种不同控件 控件数组中只要Name属性完全相同 其他外观属性等可以不必相同 12 1 2控件数组优点 与一组独立的控件相比 控件数组具有许多优点 如下所示 在设计时 使用控件数组添加控件所消耗的资源比直接向窗体添加多个相同类型的控件消耗的资源要少 3个独立的标签控件比一个拥有3个元素的标签控件占用更多的系统资源 控件数组可以共享代码 如果创建了一个包含3个选项按钮的控件数组 则无论单击哪个按钮时都将执行相同的代码 只要为控件数组编写一处代码 控件数组内所有控件处理相同事件和代码 程序运行时只有控件数组可以创建一个控件的新实例 使用控件数组时 每个新成员继承数组的公共事件过程 如果窗体上有多个文本框 每个文本框都接收日期数值 则可以创建一个控件数组 使所有文本框共同使用一个验证格式函数 注意 虽然添加控件数组可以节约系统资源 但过多的控件加载会使窗体加载缓慢 同样也会耗费资源 12 2使用控件数组 控件数组可以在设计模式或运行模式下来添加和删除控件数组元素 但是控件数组的第一个元素必须在设计模式下添加 本节将分别介绍如何在设计模式和运行模式下添加和删除控件数组元素的方法 12 2 1添加控件数组 添加控件数组包括在设计模式下静态添加控件数组和运行模式下动态添加数组 1 设计模式添加控件数组 设计模式下静态添加控件数组包括以下3种方法 窗体上添加一个控件 使用 复制 和 粘贴 功能复制该控件 窗体上添加一个控件 把同类型控件的Name属性设置成相同名称 窗体上添加一个控件 将Index属性更改为0至32367之间的整数 示例12 1 构建一个控件数组 操作过程如下 1 新建一个工程 并新建一个窗体 2 双击工具箱中的CommandButton图标 自动在窗体中心添加一个CommandButton控件 默认其他属性 注意Index属性为空 3 单击Command1按钮 按键Ctrl C或者右击Command1按钮 在弹出的快捷菜单中选择 复制 命令 4 单击窗体空白处 按键Ctrl V或者右击窗体空白处 在弹出的快捷菜单中选择 粘贴 命令 5 弹出确认是否创建控件数组的对话框 如图12 1所示 单击 是 按钮 图12 1创建控件数组对话框 注意图12 2中所示控件属性窗体Index属性数值变化 第一个Command1按钮的Index属性为0 第二个Command1按钮的Index属性为1 图12 2控件数组Index属性 6 重复 复制 和 粘贴 操作 再添加一个CommandButton控件 注意Index属性为2 2 运行模式添加控件数组 运行模式下可以添加控件数组 该控件数组第一个元素必须在设计模式下创建完毕 创建控件数组第一个元素简要步骤如下 添加一个新控件 设置该控件的Name属性 将该控件的Index属性设置为整数值 如0 注意 动态添加控件数组必须在设计模式下创建控件数组第一个元素 该元素Index属性不能为空 运行模式下动态添加控件数组使用load语句来添加控件数组 标准语法如下 Loadbutton Maxid 参数说明 Button属性为控件名称 Maxid属性为控件编号 该编号不允许重复 示例12 2 动态添加控件数组 1 创建一个新工程 并创建一个新窗体 2 双击工具箱中的CommandButton图标 窗体中心添加一个CommandButton控件 设置Caption属性为 增加 3 双击工具箱中的OptionButton图标 窗体中心添加一个选项组控件Option1 设置Caption属性为 选项组1 4 双击空白窗体 弹出代码编辑窗口 输入以下代码 说明 该代码声明变量Maxid数据类型为整数型 每次单击 增加 按钮 Maxid循环增加1 使用load语句增加一个选项 Move语句top属性加400缇 Visible属性设置为True 5 按下F5键运行程序 单击 增加 按钮 自动按顺序增加一个选项组按钮 如图12 3所示 图12 3动态添加控件数组 12 2 2删除控件数组 删除控件数组可以在设计模式下删除或者在运行模式下删除 1 设计模式删除控件数组 设计模式下删除控件数组元素包括以下3种方法 选择控件数组元素 按下Delete键 选择控件数组元素 选择 编辑 删除 命令 控件数组元素上单击右键 选择 删除 命令 注意 删除控件数组元素时 再次添加控件数组元素 Index属性将不会自动重新编号 如果需要动态增加删除控件数组元素 程序中需要代码判断该编号是否存在 2 运行模式删除控件数组 运行模式下动态删除控件数组使用Unload语句来删除控件数组元素 标准语法如下 Unloadbutton Maxid 参数说明 Button属性为控件名称 Maxid属性为已存在控件元素编号 运行模式下必须使用ubound属性 返回控件数组中控件数组的最高数值 代码如下 MsgboxButton ubound运行模式删除控件数组需要使用ubound属性判断控件数组中控件的最高编号 使用unload语句删除指定编号的控件 示例12 3 实现动态删除控件数组 接示例12 2进行操作 1 双击工具箱中的CommandButton图标 窗体中心添加一个CommandButton控件 设置Caption属性为 删除 2 双击窗体上的 删除 按钮 弹出代码编辑窗口 输入以下代码 3 按下F5键运行程序 单击 增加 按钮 自动按顺序增加一个选项组按钮 如图12 4所示 图12 4动态删除控件数组 单击 删除 按钮 自动按逆序删除最后一个选项组按钮 12 3使用菜单项数组 菜单项数组可以在程序运行时动态增加和删除菜单项 用户可以使用菜单项数组来显示最近编辑的文件列表 本节介绍菜单项数组的创建和使用方法 12 3 1创建菜单项数组 菜单项数组同控件数组一样 必须满足以下条件 所有菜单项数组元素必须具有相同Name属性 所有菜单项数组元素必须在同一层 所有菜单项数组元素必须拥有唯一索引Index属性 创建菜单项数组需要使用 菜单编辑器 对话框 选择 工具 菜单编辑器 命令或按下快捷键Ctrl E弹出 菜单编辑器 对话框 输入菜单项的Caption属性和Name属性来创建菜单项 按上述规则为一个菜单项Index属性输入数值 如0 该菜单项将称为菜单项数组的第一个元素 如图12 5所示 图12 5控件数组实例 12 3 2动态创建菜单项数组 创建菜单项数组第一个元素后 可以在程序中动态加载和删除菜单项 运行模式下动态添加菜单项数组使用load语句来添加菜单项数组 标准语法如下 Loadbutton Maxid 参数说明 Button属性为菜单项名称 Maxid属性为菜单项编号 该编号不允许重复 运行模式删除菜单项数组需要使用ubound属性判断菜单项数组中菜单项的最高编号 使用unload语句删除指定编号的菜单项 运行模式下使用ubound属性返回菜单项数组最高数值 代码如下 MsgboxButton ubound运行模式下动态删除菜单项数组使用unload语句来删除菜单项数组元素 标准语法如下 Unloadbutton Maxid 参数说明 Button属性为菜单项名称 Maxid属性为已存在菜单项元素编号 示例12 4 实现动态添加和删除菜单项数组 1 创建一个新工程 并创建一个新窗体 2 双击工具箱中的CommandButton图标 窗体中心添加一个CommandButton控件 设置Caption属性为 增加菜单项 3 双击工具箱中的CommandButton图标 窗体中心添加一个CommandButton控件 设置Caption属性为 删除菜单项 4 选择 工具 菜单编辑器 命令 弹出 菜单编辑器 对话框 新建一个菜单项 标题 属性输入 文件 名称 属性输入file 在新建一个菜单项 标题 属性输入 文件1 名称 属性输入f 索引 属性输入0 单击 确定 按钮 5 双击空白窗体 弹出代码编辑窗口 输入以下代码 说明 该代码声明变量Maxid数据类型为整数型 每次单击 增加菜单项 按钮Maxid循环增加1 使用load语句增加一个菜单项 命名为 文件 加编号 单击 删除菜单项 按钮判断ubound属性是否为0 如果结果为True 退出当前过程 否则 删除最后一个菜单项 6 按下F5键运行程序 单击 增加菜单项 按钮 自动按顺序增加一个菜单项 单击 删除菜单项 按钮 自动删除最后一个菜单项 如图12 6所示 图12 6程序运行效果图 12 4小结 本章介绍了添加控件数组 删除控件数组和菜单项数组的操作方法 本章重点难点包括动态添加控件数组和动态删除控件数组 动态添加菜单项数组和动态删除菜单项数组 动态控件数组和动态菜单项数组不易掌握 需要读者结合实例多加分析和实践 第13章将介绍鼠标键盘事件