第2讲 窗体与菜单

第二章VB可视化用户界面 一 对象 属性 方法和事件二 窗体三 菜单四 VB基本控件 一 对象 属性 方法 事件 对象 具有特定的属性和方法 并能响应事件的实体 属性 对象的性质方法 对象能完成的动作事件 系统或用户对对象进行的操作VB中的对象 窗体和控件 对象的例子 一个汽车对象属性 颜色 重量 长度 发动机功率等方法 向前行使 向后行使 加速 减速等 事件 踩 放 油门等 对象的例子 一个手机对象 属性 型号 颜色 大小等方法 呼入号码 呼出号码 发送短信息 接收短信息事件 按下手机上的按钮 对象 Vb中的对象简单地说就是各种窗体 按钮控件 文本框控件 组合框控件等 对象的生成 启动VB自动生成窗体对象将工具箱内各种控件放置在窗体上生成相应的对象 属性 属性是一个对象的性质 如对象的宽度 width 高度 height 位置 left top 颜色 backcolor 标题 caption 字体 font 等 属性可以在属性窗口设置 也可以在代码窗口设置 方法 方法是对象可以完成的动作 如窗体对象的数据输出 print 方法 移动 move 方法 隐藏 hide 方法等 在代码窗口中调用 格式是 对象名 方法名 事件 事件就是能够被对象响应和识别的动作 事件可以由系统触发 也可以由用户操作触发 如用户用鼠标单击窗体 触发窗体对象的Click事件 在代码窗口添加 代码编辑器 用于显示和编写程序代码 二 窗体 窗体的生成窗体的属性窗体的方法窗体的事件窗体的应用多窗体的设计 1 窗体的生成 窗体是VB的一种对象 是构造用户界面的框架 程序运行时 窗体直接面向用户 是用户与程序交互的平台 启动VisualBasic时自动生成一个窗体 缺省名称是Form1 添加更多的窗体 缺省名称是Form2依次类推 系统菜单 标题栏 关闭按钮 最小化按钮 最大化按钮 边框 窗体工作区 2 窗体的属性 窗体的属性用来设置窗体的一些外观 1 基本属性 参见 19页 表2 1 2 属性的设置属性窗口代码窗口 1 常用的属性 2 属性的设置 1 在 属性 窗口中直接设置 属性窗口 对象选择框 下拉按钮 字母序选项卡 分类序选项卡 属性列表框 属性说明框 2 在代码中设置 2 属性的设置 对象名 属性名 属性值 VisualBasic提供上下文敏感性 在代码窗口中输入对象名和圆点时自动出现列表框 显示对象的属性和方法 3 窗体的方法 常见方法 参见21页2 1 2语法格式 对象名 方法名 参数列表 3 窗体的方法 1 不带参数的方法 例 Form1 Refresh把窗体上所有控件重新刷新一遍 3 窗体的方法 2 带参数的方法 例 Form1 Move1000 1000 5000 5000把窗体移动到距显示器上边界 左边界各1000Twip的位置 并把窗体的高度和宽度都设置为5000Twips 4 窗体的事件 窗体要响应外来的事件 用代码来实现 例如 单击窗体时 窗体上显示 欢迎进入俄罗斯方块游戏 Form1 Print Welcome 事件名 对象列表 程序代码 常见事件 例 编写一段程序代码实现以下功能 程序加载窗体之前出现一个对话框 启动之后每次用鼠标单击窗体 该窗体的面积将会变大 双击鼠标时窗体的背景色被改变 关闭窗体时也出现一个对话框 PrivateSubForm Load MsgBox 程序正在启动 EndSubPrivateSubForm Click Form1 Height Form1 Height 200Form1 Width Form1 Width 250EndSubPrivateSubForm DblClick Form1 BackColor vbRedEndSubPrivateSubForm Unload CancelAsInteger MsgBox 该窗体即将被关闭 EndSub 5 窗体的应用 vbp exe 启动VB界面设计在事件过程中编写程序代码 运行和调试程序保存程序 vbp 生成可执行文件 exe 6 多窗体的设计 添加窗体 方法1 单击 工程 菜单栏 添加窗体 方法2 右键单击工程资源管理器任何地方 添加 窗体 多窗体程序中 每个窗体都是独立的 拥有自己的界面和程序代码 6 多窗体的设计 设置启动窗体单击 工程 工程属性 在 启动对象 列表中选择启动窗体 默认情况下 第一个窗体被默认为启动窗体 6 多窗体的设计 窗体切换时常用的窗体方法和事件 6 多窗体的设计 Unload事件 PrivateSubForm Click Unloadme 卸载代码所在的窗体UnloadForm1 卸载Form1窗体EndSubUnload方法PrivateSubForm Unload 代码段EndSub 6 多窗体的设计 当一个窗体要显示在屏幕之前 必须先建立 接着被装入内存 Load语句 最后显示 Show方法 在屏幕上 同样 当窗体要结束之前 会先从屏幕上隐藏 Hide方法 接着从内存中删除 Unload方法 多窗体程序实例步骤1 1 启动VisualBasic6 0 选择 标准EXE 单击 打开 按钮 创建一个标准EXE工程 如果VB系统已经启动 则在 文件 菜单中选择 新建工程 创建一个标准EXE工程 VB自动创建了一个名为 工程1 的标准工程 同时创建了一个名为 Form1 的窗体 2 修改窗体Form1的Caption属性为 这是第一个窗体 BackColor属性为蓝色 多窗体程序实例步骤2 3 在Form1上添加一个命令按钮 将它的Caption属性设置为 单击可进入第二个窗体 添加一个标签控件 将它的Caption属性设置为 欢迎学习VB BackColor属性为蓝色 ForeColor属性为红色 多窗体程序实例步骤3 4 鼠标右键单击窗体Form1 在弹出的菜单中选择 添加 添加窗体 为应用程序添加一个窗体Form2 将它的Caption属性设置为 这是第二个窗体 BackColor属性为黄色 多窗体程序实例步骤4 5 在Form2上添加一个命令按钮 将它的Caption属性设置为 返回第一个窗体 添加一个标签控件 将它的Caption属性设置为 进入有趣的VB天地 BackColor属性为黄色 ForeColor属性为绿色 多窗体程序实例步骤5 多窗体程序实例步骤6 6 为窗体Form1中的命令按钮编写代码 PrivateSubCommand1 Click LoadForm2Form2 ShowForm1 HideEndSub 7 为窗体Form2中的命令按钮编写代码 PrivateSubCommand1 Click LoadForm1Form1 ShowForm2 HideEndSub实现两个窗体之间的切换 多窗体程序实例步骤7 下一个 多窗体 上机题 完成 实验教程 实验2 1 错误处更改 6 Form2 BackColor vbBlueForm2 ForeColor vbWhite 7 Command1 BackColor vbRed Command1 BackColor vbGreen 创建3个窗体和1个标准模块 1 主窗体 Form1 本窗体上建立了 输入参数 Command11 画圆 Command12 和 结束 Command13 三个命令按钮设置为启动窗体 例多窗体应用示例 先输入圆参数后画圆 PrivateSubCommand11 Click 主窗体 输入参数 按钮Form1 Hide 隐藏主窗体Form2 Show 显示 输入参数 窗体EndSubPrivateSubCommand12 Click 主窗体 画圆 按钮Form1 Hide 隐藏主窗体Form3 Show 显示 画圆 窗体EndSubPrivateSubCommand13 Click 主窗体 结束 按钮UnloadForm1UnloadForm2UnloadForm3EndEndSub 先卸载所有已打开的窗体 2 输入参数 窗体 Form2 这是在主窗体上单击了 输入参数 按钮后弹出的窗体 用于输入圆的坐标位置 x y 和半径 r 窗体上建立了3个文本框 Text21 Text22和Text23 和1个 返回 命令按钮 Command21 PrivateSubCommand21 Click 输入参数 窗体的 返回 按钮X Val Text21 Text Y Val Text22 Text R Val Text23 Text Form2 Hide 隐藏 输入参数 窗体Form1 Show 显示主窗体EndSub 3 画圆 窗体 Form3 这是在主窗体上单击了 画圆 按钮后弹出的窗体 窗体上建立了1个图片框和2个命令按钮 如图所示 用户可以单击 画圆 Command31 命令按钮 使之按给定参数在图片框上画圆 PrivateSubCommand31 Click 画圆 窗体的 画圆 按钮Picture1 ClsPicture1 Circle X Y R 在图片框上画圆 圆心 X Y 半径REndSubPrivateSubCommand32 Click 画圆 窗体的 返回 按钮Form3 Hide 隐藏 画圆 窗体Form1 Show 显示主窗体EndSub 图片框Picture1 4 标准模块 Modulel 由于在各窗体之间需要使用公共变量来传送数据 所以建立一个标准模块Modulel 对用到的全局变量X Y和R进行声明运行程序后 首先显示主窗体 在主窗体上 用户可通过 输入参数 和 画圆 两个按钮来选择进入不同的窗体 例如单击 输入参数 按钮 则主窗体消失 显示 输入参数 窗体 在 输入参数 窗体或 画圆 窗体上 单击 返回 按钮 又可以隐藏当前窗体和重现主窗体 程序一般从启动窗体的Form Load过程开始执行有时在程序启动时不加载任何窗体 而是首先执行一段程序代码 此时可把要执行的程序代码放在SubMain过程中 并指定SubMain为 启动对象 应用程序在运行时会先执行SubMain过程SubMain过程存放在标准模块中 在一个工程中只能有一个SubMain过程 设置SubMain过程为 启动对象 的方法 在 工程属性 对话框的 通用 选项卡中 从 启动对象 下拉列表框中选中 SubMain SubMain过程 2 3菜单 菜单的基本概念菜单编辑器特殊效果的菜单设计下拉式菜单设计弹出式菜单 1 菜单的基本概念 菜单是建立在窗体上的一种特殊对象 它将应用程序的各种功能分类显示出来 程序运行时 执行菜单可以实现程序的功能 分类 下拉菜单和快捷菜单制作 菜单编辑器 2 菜单编辑器 打开菜单编辑器方法1 单击菜单栏中 工具 菜单编辑器 方法2 右击窗体 从快捷菜单中选择菜单编辑器 用来输入菜单或菜单项的标题 相当于Caption属性 用来输入菜单和菜单项的名称 相当于Name属性 mnu 描述性名称 为用户建立的控件数组设立下标 键盘键的组合 执行菜单项的快捷方式 键入数值用来在帮助文件中查找相应的帮助主题 选择菜单项显示的位置 0 None 不显示 1 Left 靠左 2 Middle 居中 3 Right 靠右 选中时 可以在相应的菜单项旁边加上 记号 指示菜单项处于活动状态 设置菜单是否响应事件 确定菜单项是否可见 用于多文档程序 当前的菜单项向上提升一级 当前的菜单项向下降一级 在菜单列表框中将当前菜单项上移 在菜单列表框中将当前菜单项下移 开始新菜单项的编辑 在当前菜单项之前插入新的菜单项 删除当前菜单项 3 特殊效果的菜单 分隔条菜单 将菜单项分组 标题栏中输入减号 菜单访问键 Alt 字母键 用于打开此菜单的下拉部分 标题栏中输入 字母键 快捷键 可直接执行菜单项命令 在快捷键列表中选择键的组合灰色菜单 使菜单项不可用 不选 有效 记号菜单 指示菜单项处于活动状态 选中 复选 4 设计下拉式菜单 制作方法 选中菜单编辑器中的 可见 5 设计弹出式菜单 制作方法 步骤1 不选菜