vb第08章菜单及mdi窗体设计
合集下载
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
务栏中。 (3) 当最大化一个子窗体时，它的标题会与MDI窗体的标题组合在一
起并显示于MDI标题栏上。 (4) 通过设定AutoShowChildren属性，子窗体可以在窗体加载时自
动显示或自动隐藏。 (5) 活动子窗体的菜单(若有)将显示在MDI窗体的菜单栏中，而不是
显示在子窗体中。
• 8.3.3 MDI窗口菜单设计
第8章 菜单及MDI窗体设计
• 8.1下拉式菜单设计 • 8.2 弹出式菜单设计 • 8.3 MDI多窗体程序设计
8.1下拉式菜单设计
8.1.1下拉式菜单的组成
• 8.1.2 菜单编辑器的启动
执行菜单命令：工具 | 菜单编辑器，即可打开菜单编辑器
菜单编辑器分为上 下两部分：上半部 分用于设置菜单项 的属性，下半部分 用于显示用户设置 的主菜单项与子菜 单项内容。
【例8.2】设计一个带有下拉式菜单、弹出式菜单的文本编辑器，工作界面如下图。
要求：在例8-1的窗体中添加一个RichTextBox控件作为图文编辑器，用弹出 式菜单实现文本编辑器的“复制、剪切、粘贴”功能，程序设计过程如下。
(1) 打开例8-1所建的工程，另存到 e:\vb\program\exemple8_2，工程文件名称为 ex8_2.vbp，窗体文件名称为Form_ex82.frm。
则MDI窗体成为启动窗口。
• 8.3.2 建立MDI子窗体
1.创建MDI子窗体的方法 (1) 工程中创建一个新的普通窗体。 (2) 将MDIChild属性设为True。 2. MDI窗体运行时的特性 (1) 所有子窗体都显示在MDI窗体的工作空间内。 (2) 当最小化一个子窗体时，它的图标将显示在MDI窗体上而不是任
If Button = 2 Then'表示若用户单击鼠标右键 Form_ex42.PopupMenu Edit, 2, x, y '则窗体Form_ex42调用PopupNume方法
End If
'该方法将使用主菜单项Edit中的“剪切、复制、粘贴”
End Sub‘一级子菜单作为弹出式菜单
Private Sub Cut_Click()
'将RichTextBox1所选择文本存入剪切板 End Sub
Private Sub Paste_Click() RichTextBox1.SelText = Clipboard.GetText
'将剪切板中文 本复制到RichTextBox1 End Sub
• 【例8.3】设计一个带有下拉式菜单、弹出式菜单 与工具栏的文本编辑器，其工作界面如图所示。
1. 创建“窗口”菜单项2.Leabharlann 窗口一级子菜单项的设计要求
在工程中增加工具栏，放置三 个普通按钮，分别用于 RichTextBox控件中被选文本的 复制、剪切、粘贴功能。 在工具栏上放置二个组合框 ComboBox，为RichTextBox控 件中文本选择字体与字号
8.3 MDI多窗体程序设计(自学)
• 用户界面主要有两种： • 单文档界面(SDI) • 多文档界面(MDI)
(7) 删除按钮(Delete)：用于删除指定菜单项。先在菜单编辑器的下半部 分选择要删除的菜单项，然后按“删除”按钮。
(8) “↑”和“↓”按钮：用于改变菜单项在主菜单与子菜单中的顺序位置。 (9) 复选框(Checked)：若某菜单项的复选框被选中，则该菜单项左边加
上检查标记“√”，表示该菜单项是一个被选项。 (10) 有效框(Enabled)：当菜单项的有效框被选中时，程序执行时，该菜
Clipboard.SetText RichTextBox1.SelText '将RichTextBox1所选择文本存入剪切板 RichTextBox1.SelText = "" '清除RichTextBox1所选择文本
End Sub
Private Sub Copy_Click() Clipboard.SetText RichTextBox1.SelText
• 【例8.1】设计一个简易文本编辑器的下拉式 菜单，如图=所示，设计要求如表8-1
• 设计步骤如下：
(1) 在e:盘新建目录 e:\vb\program\exemple8_1，用于保存工程 文件与窗体文件等内容。 (2) 在VB中新建一个工程与一个窗体。 (3) 启动菜单编辑器 (4) 使用菜单编辑器建立菜单 (5) 建立菜单项事件过程 (6) 保存工程与窗体文件 (7) 编译和运行程序
8.3.1创建MDI主窗体
1. 创建MDI主窗体 (1) 执行菜单命令：工程 | 添加MDI窗体，出现“添加MDI窗体”对话框。 (2) 选择“新建”或使用“现存”窗体，单击“打开”按钮后出现MDI主窗体界
面。 2. 将MDI主窗体设为工程的启动窗体 (1) 执行菜单命令：工程 | 工程属性，出现工程属性对话框。 (2) 在对话框的通用选项卡中单击启动对象下拉按钮，选择MDI窗体名，
单项高亮度显示，表示用户可以选择该菜单项。当菜单项的有效框未 被选中时，程序执行后，该菜单项灰色显示，表示用户不能选择该菜 单项。 (11) 可见框(Visible)：菜单项的可见框被选中，则该菜单项可见，否则不 可见。 (12) 显示窗口列表复选框：若某菜单项的“显示窗口列表”复选框有效， 则该菜单项成为多文档窗体的“窗口”，在该“窗口”中将列出所有已打开 子窗体的标题名称。
• 8.1.3 菜单编辑器的使用方法
(1) 标题栏(Caption)：输入菜单项的标题、设置热键与分隔条；
标题 :直接输入
热键 文件(&F)
分隔条 “－”
(2) 名称栏(Name)：用于输入菜单项内部惟一标识符 注意：分隔符也要输入名称，且不能重复命名。 (3) 快捷键下拉列表框(Shortcut Key)：用于选择菜单项的快捷键，用鼠标单击列 表框的下拉按钮，在列表框中可选择不同的快捷键。 (4) 下一个按钮(Next)：当用户将一个菜单项的各属性设置完后，单击“下一个”按 键可新建一个菜单项或进入下一个菜单项。 (5) “←”与“→”按钮：用于选择菜单项在菜单中的层次位置。 单击“→”按钮将菜单项向右移编入下一级子菜单。 单击“←”按钮将菜单项向左移编入上一级子菜单。 (6) 插入按钮(Insert)：用于在选定菜单项前插入一个新的菜单项。
8.2 弹出式菜单设计
弹出式菜单是指在窗体上单击鼠标右键之后弹出的菜单， 弹出式菜单也称为浮动菜单。
使用PopupMenu方法显示弹出式菜单 1. PopupMenu方法的调用格式 [窗体名.] PopupMenu <菜单名> [,flags][,x][,y][,boldcommand]
•2. 弹出式菜单应用举例
(2) 在工具箱中添加图文编辑器RichTextBox (3) 编写RichTextBox控件鼠标按下事件处理过程 (4) 编写剪切、复制与粘贴的事件处理过程。 (5) 保存工程与窗体文件 (6) 运行程序
Private Sub RichTextBox1_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single)
起并显示于MDI标题栏上。 (4) 通过设定AutoShowChildren属性，子窗体可以在窗体加载时自
动显示或自动隐藏。 (5) 活动子窗体的菜单(若有)将显示在MDI窗体的菜单栏中，而不是
显示在子窗体中。
• 8.3.3 MDI窗口菜单设计
第8章 菜单及MDI窗体设计
• 8.1下拉式菜单设计 • 8.2 弹出式菜单设计 • 8.3 MDI多窗体程序设计
8.1下拉式菜单设计
8.1.1下拉式菜单的组成
• 8.1.2 菜单编辑器的启动
执行菜单命令：工具 | 菜单编辑器，即可打开菜单编辑器
菜单编辑器分为上 下两部分：上半部 分用于设置菜单项 的属性，下半部分 用于显示用户设置 的主菜单项与子菜 单项内容。
【例8.2】设计一个带有下拉式菜单、弹出式菜单的文本编辑器，工作界面如下图。
要求：在例8-1的窗体中添加一个RichTextBox控件作为图文编辑器，用弹出 式菜单实现文本编辑器的“复制、剪切、粘贴”功能，程序设计过程如下。
(1) 打开例8-1所建的工程，另存到 e:\vb\program\exemple8_2，工程文件名称为 ex8_2.vbp，窗体文件名称为Form_ex82.frm。
则MDI窗体成为启动窗口。
• 8.3.2 建立MDI子窗体
1.创建MDI子窗体的方法 (1) 工程中创建一个新的普通窗体。 (2) 将MDIChild属性设为True。 2. MDI窗体运行时的特性 (1) 所有子窗体都显示在MDI窗体的工作空间内。 (2) 当最小化一个子窗体时，它的图标将显示在MDI窗体上而不是任
If Button = 2 Then'表示若用户单击鼠标右键 Form_ex42.PopupMenu Edit, 2, x, y '则窗体Form_ex42调用PopupNume方法
End If
'该方法将使用主菜单项Edit中的“剪切、复制、粘贴”
End Sub‘一级子菜单作为弹出式菜单
Private Sub Cut_Click()
'将RichTextBox1所选择文本存入剪切板 End Sub
Private Sub Paste_Click() RichTextBox1.SelText = Clipboard.GetText
'将剪切板中文 本复制到RichTextBox1 End Sub
• 【例8.3】设计一个带有下拉式菜单、弹出式菜单 与工具栏的文本编辑器，其工作界面如图所示。
1. 创建“窗口”菜单项2.Leabharlann 窗口一级子菜单项的设计要求
在工程中增加工具栏，放置三 个普通按钮，分别用于 RichTextBox控件中被选文本的 复制、剪切、粘贴功能。 在工具栏上放置二个组合框 ComboBox，为RichTextBox控 件中文本选择字体与字号
8.3 MDI多窗体程序设计(自学)
• 用户界面主要有两种： • 单文档界面(SDI) • 多文档界面(MDI)
(7) 删除按钮(Delete)：用于删除指定菜单项。先在菜单编辑器的下半部 分选择要删除的菜单项，然后按“删除”按钮。
(8) “↑”和“↓”按钮：用于改变菜单项在主菜单与子菜单中的顺序位置。 (9) 复选框(Checked)：若某菜单项的复选框被选中，则该菜单项左边加
上检查标记“√”，表示该菜单项是一个被选项。 (10) 有效框(Enabled)：当菜单项的有效框被选中时，程序执行时，该菜
Clipboard.SetText RichTextBox1.SelText '将RichTextBox1所选择文本存入剪切板 RichTextBox1.SelText = "" '清除RichTextBox1所选择文本
End Sub
Private Sub Copy_Click() Clipboard.SetText RichTextBox1.SelText
• 【例8.1】设计一个简易文本编辑器的下拉式 菜单，如图=所示，设计要求如表8-1
• 设计步骤如下：
(1) 在e:盘新建目录 e:\vb\program\exemple8_1，用于保存工程 文件与窗体文件等内容。 (2) 在VB中新建一个工程与一个窗体。 (3) 启动菜单编辑器 (4) 使用菜单编辑器建立菜单 (5) 建立菜单项事件过程 (6) 保存工程与窗体文件 (7) 编译和运行程序
8.3.1创建MDI主窗体
1. 创建MDI主窗体 (1) 执行菜单命令：工程 | 添加MDI窗体，出现“添加MDI窗体”对话框。 (2) 选择“新建”或使用“现存”窗体，单击“打开”按钮后出现MDI主窗体界
面。 2. 将MDI主窗体设为工程的启动窗体 (1) 执行菜单命令：工程 | 工程属性，出现工程属性对话框。 (2) 在对话框的通用选项卡中单击启动对象下拉按钮，选择MDI窗体名，
单项高亮度显示，表示用户可以选择该菜单项。当菜单项的有效框未 被选中时，程序执行后，该菜单项灰色显示，表示用户不能选择该菜 单项。 (11) 可见框(Visible)：菜单项的可见框被选中，则该菜单项可见，否则不 可见。 (12) 显示窗口列表复选框：若某菜单项的“显示窗口列表”复选框有效， 则该菜单项成为多文档窗体的“窗口”，在该“窗口”中将列出所有已打开 子窗体的标题名称。
• 8.1.3 菜单编辑器的使用方法
(1) 标题栏(Caption)：输入菜单项的标题、设置热键与分隔条；
标题 :直接输入
热键 文件(&F)
分隔条 “－”
(2) 名称栏(Name)：用于输入菜单项内部惟一标识符 注意：分隔符也要输入名称，且不能重复命名。 (3) 快捷键下拉列表框(Shortcut Key)：用于选择菜单项的快捷键，用鼠标单击列 表框的下拉按钮，在列表框中可选择不同的快捷键。 (4) 下一个按钮(Next)：当用户将一个菜单项的各属性设置完后，单击“下一个”按 键可新建一个菜单项或进入下一个菜单项。 (5) “←”与“→”按钮：用于选择菜单项在菜单中的层次位置。 单击“→”按钮将菜单项向右移编入下一级子菜单。 单击“←”按钮将菜单项向左移编入上一级子菜单。 (6) 插入按钮(Insert)：用于在选定菜单项前插入一个新的菜单项。
8.2 弹出式菜单设计
弹出式菜单是指在窗体上单击鼠标右键之后弹出的菜单， 弹出式菜单也称为浮动菜单。
使用PopupMenu方法显示弹出式菜单 1. PopupMenu方法的调用格式 [窗体名.] PopupMenu <菜单名> [,flags][,x][,y][,boldcommand]
•2. 弹出式菜单应用举例
(2) 在工具箱中添加图文编辑器RichTextBox (3) 编写RichTextBox控件鼠标按下事件处理过程 (4) 编写剪切、复制与粘贴的事件处理过程。 (5) 保存工程与窗体文件 (6) 运行程序
Private Sub RichTextBox1_MouseDown(Button As Integer, Shift As Integer, x As Single, y As Single)