VB 第七章 菜单 工具栏 状态和对话框
VB基础(第七章)菜单PPT课件
（1）整体感强，操作一目了然 （2）具有导航功能。 （3）占用屏幕空间小
1)菜单栏（或主菜单行）:即是一个菜单标题
窗体分为3个部分： 2)子菜单区:菜单命令或菜单项,会自动折叠 ,具有具体、 独立的功能. 3)工作区：,进行输出和输入操作
第七章 菜单、工具栏和状态栏
第七章 菜单、工具栏和状态栏
7.1 Visual Basic中的菜单
7.2 菜单编辑器
7.3 弹出式菜单 7.4 工具栏和状态栏 7.5应用举例 7.6小结
7.3 弹出式菜单
为了显示弹出式菜单，使用PopupMenu方法，该方法的语法如下：
PopupMenu “菜单名”,flags,x,y,boldcommand
第七章 菜单、工具栏和状态栏
7.1 Visual Basic中的菜单
7.2 菜单编辑器
7.3 弹出式菜单 7.4 工具栏和状态栏 7.5应用举例 7.6小结
7.2.2设定菜单项 1．有效性控制
格式：菜单名.Enabled=False(或True) Private Sub Command1_Click() WX.Enabled = False End Sub
7.1 Visual Basic中的菜单
7.2 菜单编辑器
7.3 弹出式菜单 7.4 工具栏和状态栏 7.5应用举例 7.6小结
主菜单条 子菜单名
菜单项
主菜单名 快捷键
热键
下级子菜 单标记
分隔线
第七章 菜单、工具栏和状态栏
7.1 Visual Basic中的菜单
7.2 菜单编辑器
7.3 弹出式菜单 7.4 工具栏和状态栏 7.5应用举例 7.6小结
vb 第7章 对话框和菜单
7
7.2.2 “打开文件”对话框 打开文件” 打开文件
设计时建立“打开文件” ⒈ 设计时建立“打开文件”对话框 设计时建立“打开”文件对话框的步骤如下： 设计时建立“打开”文件对话框的步骤如下： 在窗体上添加通用对话框控件。 ⑴ 在窗体上添加通用对话框控件。 打开“属性页”对话框。 ⑵ 打开“属性页”对话框。 ⑶ 选择“打开 另存为”选项卡，设置属性。 选择“打开/另存为 选项卡，设置属性。 另存为” 其中“属性页”中有关属性的含义如下： 其中“属性页”中有关属性的含义如下： 对话框标题（ 对话框标题（Dialog Title）：字符串类型，缺省值为“打开”。 ） 字符串类型，缺省值为“打开” 文件名称（ 字符串类型， 文件名称（ FileName） ： 字符串类型，程序运行后该属性返 ） 回用户所选择的文件名。 回用户所选择的文件名。 初始化路径（ 初始化路径（InitDir）：字符串类型，用于设置初始的文件目 ） 字符串类型， 字符串中的字符表示某文件夹名称。 录，字符串中的字符表示某文件夹名称。
它属于VB的 控件， 它属于 的ActiveX控件，在使用前需要将它添加到工具 控件 箱中。将通用对话框图标添加到工具箱的方法如下： 箱中。将通用对话框图标添加到工具箱的方法如下： 单击“工程”菜单的“部件”选项， (1) 单击“工程”菜单的“部件”选项，或者用鼠标右键单击 工具箱，在弹出的菜单中选择“部件” 打开“部件”对话框。 工具箱，在弹出的菜单中选择“部件”，打开“部件”对话框。 (2)在 部件”对话框中，选中“ (2)在“部件”对话框中，选中“Microsoft Common Dialog Control 6.0”。 。 单击“确定”按钮即可将通用对话框控件添加到工具箱中。 (3) 单击“确定”按钮即可将通用对话框控件添加到工具箱中。 把通用对话框控件( 拖放到窗体。 (4) 把通用对话框控件(CommonDialog1)拖放到窗体。
第7章 Visual Basic 通用对话框与菜单
编写代码： 编写代码：
Private Sub cmdFont_Click() FontDialog.Action = 4 wb1.FontName = FontDialog.FontName wb1.FontSize = FontDialog.FontSize wb1.FontBold = FontDialog.FontBold wb1.FontItalic = FontDialog.FontItalic wb1.FontUnderline = FontDialog.FontUnderline End Sub
– 用PopupMenu方法可显示弹出式菜单
格式： [对象.]PopupMenu 菜单控件名称 格式： 对象.
若“对象”缺省，则在当前窗体中显示弹出菜单 对象”缺省，
– 通常，按下鼠标右键时显示弹出菜单，例如： 通常，按下鼠标右键时显示弹出菜单，例如：
Private Sub Form或控件名称 或控件名称_MouseUp (Button As Integer, 或控件名称 Shift As Integer, X As Single, Y As Single) If Button = 2 Then '如果按的是鼠标右键 如果按的是鼠标右键 PopupMenu 菜单名 ‘显示弹出菜单，“菜单名” 显示弹出菜单， 菜单名” 为顶层菜单项的名称，已建立的菜单名称。 为顶层菜单项的名称，已建立的菜单名称。 End If End Sub
菜单的设计与应用－使用菜单编辑器 菜单的设计与应用－
编辑菜单控件
如果菜单 控件的前面 没有内缩符 ”， 号 “ ”，表 明该控件建 立的是主菜 单，否则为 子菜单。 子菜单。
菜单的设计与应用示例
看程序例题：菜单编辑器（编辑—设置） 看程序例题：菜单编辑器（编辑—设置）
VB菜单、工具栏、菜单栏设计
5.运行时改变状态栏
• 运行时，能重新设置窗格Panel对象以显示不同的 功能，这些功能取决于应用程序的状态和各控制 键的状态。有些状态要通过编程实现，有些系统 已具备。
• (6)Alignment属性 –该属性设置或返回该对象的标题文本对齐方式。 • (7)Bevel属性: –设置或返回该对象的斜面样式，0为没有显示斜面，1 为凹下显示，2为凸起显示。 • (8)AutoSize属性 –调整状态栏的大小后，该属性返回或设置确定Panel对 象的宽度值。 • (9)Count属性 –该属性返回Panels集合中Panels对象的数目。
菜单以分组的形式组织多个命令或操作，为 用户提供了操作应用程序的便捷手段。
工具栏以按钮的形式显示应用程序中最常用 的命令和操作。
状态栏用于显示应用程序的当前状态、键盘 状态以及当前日期和时间等。
6-1
菜单简介
菜单标题 菜单栏 分隔条 菜单选项 快捷键 访问键 子菜单标题 子菜单选项
6-2
设置StatusBar控件。在StatusBar控件上右击鼠标，调出其 属性页。在其中插入两个窗格，第一个窗格的文本设置为“提 示”，第二个窗格自动调整大小属性设置为为1，其他设置不 变。
1.状态栏控件的常用属性
• (1)Align属性 –该属性决定状态栏控件在窗体中的显示位置和大小。 其值为1～4，分别表示在窗体的顶部，底部，左边和 右边，且随窗体自动调整。 • (2)Style属性 –该属性设置或返回状态栏控件的样式。默认值0表示 Normal样式，正常显示所有Panel对象；值为1时表示 Simple样式，仅显示一个大窗格。 • (3)Height和Width属性 –该属性决定控件的高度和宽度。 • (4)Top属性 –该属性决定控件顶端距窗体顶端的距离。
VB--ch7通用对话框解析
Text1.BackColor = CommonDialog1.Color
End Sub
例7.4 利用颜色对话框给shape着色
界面设计，如图所示。 在窗体上添加一个框架：在框架上画出6个单选 钮（控件数组）用来选择不同的形状； 形状控件、通用对话框控件、命令按钮各一个。 知识点：
这里采用了一组 控件数组来设计 单选钮，充分体 现使用控件数组 的优点
CommonDialog1.Action = 4
Text1.FontName =CommonDialog1.FontName Text1 1.FontBold=CommonDialog1.FontBold
End Sub
例7.5
“字体”对话框示例。
编程：在文本框上显示文字，利用“字体”对 话框来设置所显示文字的字体、字型、大小、 颜色等。 知识点： 设置字体一定需要添加语句： CommonDialog1.Flags=1＋256 (屏幕字体加下划线、删除线、颜色组合框）
• 例： • Private Sub Form_click() • CommonDialog1.Filter = "所有文件 (*.*)|*.*|WORD文档(*.doc)|*.doc|位图文件 (*.bmp)|*.bmp|" • CommonDialog1.Action = 1 • Picture1.Picture = LoadPicture(CommonDialog1.FileName) • End Sub
把对话框部件添加到工具箱步骤: “工程” “部件” 选中: Microsoft Common Dialog Control 6.0 对话框的类型由对话框控件的Action属性决定。 与Timer 控件一样，CommonDialog 控件
vb文件菜单通用对话框
计算机软件技术基础 Visual Basic 程序设计
③事件： ★PathChange事件：路径被FileName或Path
属性改变时发生。 ★PatternChange事件：列表样式被FileName
或Path属性改变时发生。
计算机软件技术基础 Visual Basic 程序设计
4.文件系统控件的同步操作 （控件的联动）
Sub Drive1_Change() Dir1.Path = Drive1.Drive
要从现存文件中读入数据，应以顺序Input 方式打开该文件，然后使用：
Input # 语句 Line Input # 语句 Input 函数 将文件内容读入到程序变量中。
使驱动器列表框和目录列表框同步的程序代码： Private Sub Drive1_Change() Dir1.Path=Drive1.Drive End Sub
使目录列表框和文件列表框同步的程序代码： Private Sub Dir1_Change() File1.Path=Dir1.Path End Sub 这样，每当改变驱动器列表框的Drive属性时，将 产生Change事件，目录列表框中的目录变为该驱 动器的目录，进一步引发文件列表框目录的变化。
例2
计算机软件技术基础 Visual Basic 程序设计
3.文件列表框(FileListBox)
① 功能：显示当前文件夹下的所有文件列表。 ② 属性：
vb 菜单与对话框 课件
菜单与对话框
7.1 下拉式菜单设计
下拉式菜单是用户在任 何时候都可以在顶端菜单 条上选择后拉出的菜单。 条上选择后拉出的菜单。
菜单与对话框
7.1 下拉式菜单设计
主菜单条
菜 单 项
主菜单名 快捷键 键 菜单
菜单名
菜单与对话框
7.1下拉式菜单设计 下拉式菜单设计
打开“菜单编辑器” 打开“菜单编辑器”：
FilterIndex DialogTitle DefaultExt
菜单与对话框
“公用对话框”的方法 公用对话框”
方法 ShowOpen ShowSave ShowColor ShowFont ShowPrinter ShowHelp Action属性 属性 1 2
3
功能 显示文件打开对话框 显示文件存储对话框 显示颜色对话框 显示字体对话框 显示打印对话框 显示Windows帮助对话框 帮助对话框 显示
内部常数 vbPopupMenuLeftButton vbPopupMenuRightButton
行为常数 0(默认 默认) 默认 2
说明 菜单只接受右键单击 菜单接受左、 菜单接受左、右键单击
两个常数可以相加或者以or相连 两个常数可以相加或者以 相连
菜单与对话框
例7-4：在上例中增加弹出式菜单。 ：在上例中增加弹出式菜单。
菜单与对话框
7.2 弹出式菜单（快捷菜单） 弹出式菜单（快捷菜单）
语法格式： 语法格式： [窗体名 窗体名.]PopupMenu 菜单名 flags, x, y 菜单名, 窗体名 说明: 说明
省略窗体名,将打开当前窗体的菜单 省略窗体名 将打开当前窗体的菜单; 将打开当前窗体的菜单 菜单名是通过菜单编辑器设计的菜单的名称 Flags参数为一些常量数值的设置 包含位置常数和 参数为一些常量数值的设置,包含位置常数和 参数为一些常量数值的设置 行为常数，表示弹出的位置和触发的键位置。 行为常数，表示弹出的位置和触发的键位置。
VB 第七章 菜单 工具栏 状态和对话框
ToolBar与 ImageList的连接
工具栏样式
工具栏例题8.10 工具栏例题8.10
2.为工具栏增加按钮 为工具栏增加按钮
索引（Index）、关键字（Key）每个按钮 的编号、标识, ButtonClick事件中引用；
样式(Style)，共6种
图象(Image) ImageList对象中的 图象，值可以是Key或Index
弹出菜单(快捷菜单) 三、 弹出菜单(快捷菜单)
弹出菜单是独立于窗体菜单栏而显示在窗体内的浮动菜单。显示 位置取决于单击鼠标键时指针的位置。设计与普通菜单相同（如果 不希望菜单出现在窗口的顶部，该菜单名Visible属性设置为False ）。 菜单弹出的方法：
[对象 对象.]PopupMenu 菜单名 标志 x, y 菜单名, 标志, 对象
例8.1 用命令按钮的Click事件显示文件打开对话框 CommonDialog1.InitDir=“C:\Windows” ' 设置初始目录 CommonDialog1.Filter = "文本文件 | *.Txt" ' 过滤文件类型 CommonDialog1.CancelError = True ' 控制取消按钮 CommonDialog1. ShowOpen ‘ 打开对话框 Label1.Caption = CommonDialog1.FileName 另存为” 2. “另存为”对话框 没有提供真正的存储文件操作，仍需要编程完成储存操作。 属性 DefaultExt：缺省扩展名 颜色” 3. “颜色”对话框 属性 Color：返回或设置选定的颜色。 例8.2 “颜色”对话框的使用
字体” 4. “字体”对话框
FontName FontBold、FontItalic FontSize
VB 菜单、工具栏和状态栏
菜单、工具栏和状态栏1菜单1.1菜单编辑器VB提供的菜单编辑器来设计实现。
菜单编辑器的启动方式：（1）选择“工具/菜单编辑器”命令。
（2）利用快捷键<Ctrl+E>来调用“菜单编辑器”。
1.2创建最简菜单在菜单的属性设置区域中有诸多的属性需要设置，其中，“标题”和“名称”属性是必须要设置的，其他的属性可以采用默认值，或者不进行设置。
仅设置了“标题”和“名称”属性的菜单就是最简菜单。
注意：“标题”属性和“名称”属性必须都设置，缺一不可，否则将不被菜单编辑器接受。
1.3设置菜单的快捷键和访问键快捷键是用于执行一个命令的功能键或者组合键，例如，<Ctrl+C>为复制操作。
访问键是指用户按下<Alt>键同时又按下的键。
例如，<Alt+F>用于打开“文件”菜单，这里的<F>键即为访问键。
1.4创建级联菜单在菜单编辑器中，以缩进量显示级联菜单的形式。
在菜单编辑器的菜单列表区中由内缩进符号表明菜单项所在的层次，每4个点表示一层，最多可以有5个内缩符号，最后面的菜单项为第5层。
1.5创建复选菜单通过复选菜单可以实现在菜单中执行或取消执行某项操作。
菜单的复选标记有两个作用：一是表示打开或关闭的条件状态，选取菜单命令可以交替地添加或删除复选标记；二是指示几个模式中哪个或哪几个在起作用。
1.6 设置菜单分隔条利用菜单分隔条可使功能相近的菜单放在一组，使子菜单看起来更加清晰、明了。
1.7 设置菜单无效有些菜单对于不同权限的操作用户的使用权限是不同的，如系统设置方面的菜单，只有系统管理员才能使用，当普通用户进入系统中时，这些菜单将被设置为无效。
2弹出式菜单弹出式菜单是指在窗体上单击鼠标右键之后弹出的菜单，也称为浮动菜单。
可使用PopupMenu方法显示弹出式菜单。
2.1PopupMenu方法语法：object.PopupMenu menuname, flags, x, y, boldcommand其中，object：可选参数，对象表达式，其值为Form或MDIForm；menuname：必须的参数，指出要显示的弹出式菜单名；flags：可选的参数，为一个数值或常数，用以指定弹出式菜单的位置和行为；x：可选的参数，指定显示弹出式菜单的x坐标；y：可选的参数，指定显示弹出式菜单的y坐标；boldcommand：可选的参数，指定弹出式菜单中的菜单控件的名称，用以显示其黑体正文标题。
第七章 vb6.0菜单的设计与多文档界面
第七章菜单的设计与多文档界面7.1 菜单简介大多数Windows应用程序都有一个菜单栏，它总是处在窗体标题栏的下面，并包含一个或多个菜单标题。
单击每个菜单标题都会弹出一个下拉菜单，在下拉菜单中包含有菜单项、分隔条和子菜单标题。
有的菜单项可以直接执行，有的菜单项执行时则会弹出一个对话框。
所有的Windows应用程序都遵循以下3个约定：凡是菜单名称后有一个省略号的，均表示在单击该选项后会弹出一个相应的对话框，在用户作出相应的回答后，该项功能就以用户所给予的信息去执行。
例如，单击【打开】选项，则弹出【打开】对话框，用户可从中选择要打开的文件。
凡是菜单名称后有一个小三角的，则表示它是一个子菜单标题，子菜单标题并不能直接执行，仅仅扮演一个“容器”的角色。
当鼠标指针移动到子菜单标题上时，会自动弹出子菜单。
例如，将指针移动到【发送】选项，就会弹出子菜单。
菜单名称后不包含L述两种符号者，表明该菜单项所代表的命令可直接执行。
例如，单击【关闭】选项，则将关闭当前打开的文档。
另外，有的菜单项名称后还显示相应的键盘访问键和快捷键。
访问键允许同时按下Alt键和一个指定字符来打开一个菜单。
一旦菜单打开，通过按下访问键即可选取菜单项。
在菜单项的标题中，访问键表现为一个带下划线的字母，如【打开】命令的访问键为0.当打开【文件】菜单后，按下0键即可执行【打开】命令。
快捷键出现在相应菜单项的右边，例如，【打开】命令的快捷键是Ctrl+O，无论【文件】菜单是否打开，只要按下Ctrl+O组合键，即可执行【打开】命令。
由于所有Windows应用程序都遵循上述约定，因此，在创建菜单时，也应该遵循这些约定。
例如，如果某菜单项的执行结果是弹出一个对话框，则应该在该菜单项后加上省略符（…）.此外，要使应用程序简单好用，还应该将菜单项按其功能分组。
例如，与文件有关的命令【新建】、【打开】和【另存为】都列入了【文件】菜单。
同一菜单中不同类型的选项之间还使用分隔条分隔开来。
VB-工具栏、对话框
VB-工具栏、对话框工具栏可以用工具栏进一步增强应用程序的菜单界面。
工具栏含有工具栏按钮，它提供了对于应用程序中最常用的命令的快速访问。
例如：Visual Basic 的工具栏含有执行常用命令的 ToolBarButton，如“打开”（打开已存在的工程）、“保存”（存储当前的工程），等等。
创建工具栏工具栏（也称为发条或者控制栏）已经成为许多基于Windows 的应用程序的标准功能。
工具栏提供了对于应用程序中最常用的菜单命令的快速访问。
使用ToolBar 控件来创建工具栏非常容易且很方便，它在Visual Basic的专业版与企业版中是可用的。
如果使用的是Visual Basic 学习版，则可以像本章后面的“协调菜单与工具栏的外观”所描述的那样用手工来创建工具栏。
下列示例演示为 MDI 应用程序创建工具栏的过程；在标准窗体上创建一个工具栏的过程基本上一样。
要手工创建工具栏，请按照以下步骤执行：1. 在 MDI 窗体上放置一个图片框。
图片框的宽度会自动伸展，直到填满MDI 窗体工作空间。
工作空间就是窗体边框以内的区域，不包括标题条、菜单栏或所有的工具栏、状态栏或者可能在窗体上的滚动条。
注意只能把那些直接支持Align 属性的控件放置在MDI 窗体上（图片框是支持这一属性的唯一的标准控件）。
2. 在图片框中，可以放置任何想在工具栏上显示的控件。
典型地，用CommandButton 或Image 控件来创建工具栏按钮。
图6.16表示出了一个含有 Image 控件的工具栏。
要在图片框中添加控件，单击工具栏中的控件按钮，然后在图片框中画出它。
注意当 MDI 窗体中包含了图片框时，该 MDI 窗体的内部区域不包括图片框在内。
例如：MDI 窗体的ScaleHeigh 属性返回MDI 窗体的内部高度，这个高度已不包括图片框的高度。
3. 设置设计时属性。
使用工具栏的一个好处是可以显示一个形象的命令图示。
Image 控件是作为工具栏按钮的一个很好的选择，因为可以用它来显示一个位图。
vb第7章菜单、工具栏和状态栏
13
第7章 菜单、工具栏和状态栏
字体：打开“字体”对话框，设置字体属性。 • 颜色：打开“颜色”对话框，选择文本颜色。 • 背景颜色：打开“颜色”对话框，在其中选择相应颜 色。 • 资源管理器：打开Windows资源管理器窗口。 • 程序：打开相应的应用程序。 • 游戏：打开Windows自带的扫雷等游戏。 • 关于：在rtfInput中显示有关帮助信息。
27
第7章 菜单、工具栏和状态栏
• Private Sub mnuColor_Click() • dlgOperate.ShowColor
•
rtfInput.SelColor = dlgOperate.Color
• End Sub • Private Sub mnubkColor_Click() • dlgOperate.ShowColor
路径及名称
窗口打开方式
• Private Sub mnuWord_Click() • Shell("c:\Program Files\Microsoft • Office\Office\Winword.exe" ), • vbNormalFocus • End Sub
29
第7章 菜单、工具栏和状态栏
有效
是 是 是 是 是 是
可见
是 是 是 是 是 是
8
第7章 菜单、工具栏和状态栏
标题 编辑 剪切 复制 粘贴 查找 替换 名称 mnuEdit mnuCut mnuCopy mnuPaste mnuFenge2 mnuSearch mnuReplace Ctrl+X Ctrl+C Ctrl+V 快捷键 有 效 是 否 否 否 是 是 是 可见 是 是 是 是 是 是 是
VB菜单、工具栏、菜单栏设计
03 提供足够的自定义选项，以满足不同用户的个性 化需求。
优化界面布局和交互方式
01
合理安排界面元素的位置和大小，使其符合用户的视觉习惯。
02
简化操作流程，减少不必要的步骤和点击次数。
提供清晰的视觉反馈，如按钮点击效果、动态加载指示等，以
03
03
菜单栏设计
菜单栏的布局
水平布局
将菜单项水平排列，适合于较长的菜单项名称。
垂直布局
将菜单项垂直排列，适合于较短的菜单项名称。
分组布局
将相关联的菜单项分组，便于用户快速找到所需功能。
菜单栏的设计原则
简洁明了
菜单项名称应简短、清晰，避免使用过于专 业的术语。
层次分明
菜单项应按照功能分类，形成清晰的层次结 构。
VB菜单、工具栏、菜 单栏设计
目录
• VB菜单设计 • 工具栏设计 • 菜单栏设计 • VB界面设计中的注意事项 • VB界面设计实例分析
01
VB菜单设计
菜单的类型
下拉菜单
下拉菜单是常见的菜单类型，用户点击菜单 项后，会弹出下拉列表供用户选择。
弹出菜单
弹出菜单通常在用户右键点击时出现，提供 一些常用的功能或操作。
02
工具栏设计
工具栏的种类
主工具栏
包含常用命令的综合性工具栏，方便 用户快速访问常用功能。
自定义工具栏
用户可以根据自己的需求创建自定义 工具栏，添加或删除按钮，以适应特 定工作流程。
浮动工具栏
可移动到屏幕任意位置的工具栏，方 便用户在不同区域使用。
停靠工具栏
可以自动停靠在窗体边缘的工具栏， 便于用户快速访问常用命令。
vb菜单与对话框
［例5-16］在［例5－15］的基础上增加一个弹出式菜单，包含 “剪切”、“复制”和“粘贴”功能，右击文本框时弹出该快 捷菜单。
操作步骤： （1）在菜单编辑器里新增一个菜单，保证该菜单为顶 层菜单项，即无缩进符号。标题设定为“Edit”(该标题 和名称可任意设定，因为它在快捷菜单弹出时不显示)。 （2）将“Edit”菜单的可见属性设置为False。 （3）单击“下一个”命令按钮，标题文本框中输入 “剪切”，编辑对应的名称，单击按钮，将“剪切”菜单 设置为“Edit”菜单的下一级菜单。 （4）参照步骤3完成“复制”和“粘贴”菜单的设置。 （5）使用PopupMenu方法来显示弹出式菜单。
问题分析： 本例涉及到两种通用对话框的使用，当单击“打开” 就弹出打开对话框，当用户选择一文本文件，便可将 该文件内容读入到文本框；当单击“保存”就打开另 存为对话框。用户输入文件名后，便可以新的文件名 保存文本框的内容。
通用对话框不是标准控件，使用时必须先将该控件添加 到工具箱里。步骤如下
工程/部件
文件
O
保存
mnuFileSave
文件
S
－
mnuFileBar
文件
无
退出
mnuFileQuit
文件
Q
编辑
mnuEdit
无
E
剪切
mnuEditCut
编辑
无
复制
mnuEditCopy
编辑
无
粘贴
mnuEditPaste
编辑
无
字体 黑体 宋体
mnuEditFont Font1 Font2
编辑
无
字体
无
字体
无
快捷键 无
工程编程软件VB课件教程-菜单和工具栏
菜单项
PowerPoint的文件菜单
分隔条(用于分隔同 一菜单中的不同类 型直接执行，有的菜单项执行时则会弹出一 个对话框。所有的Windows应用程序都遵循以下三个约定： 凡是菜单名后有一个省略号的，均表示在单击该选项后会弹 出一个相应的对话框，在用户作出相应的回答后，该项功能 就以用户所给予的信息去执行。如单击[打开]选项。 凡是菜单名称后有一个小三角的，则表示它是一个子菜单标 题，子菜单标题并不能直接执行，仅仅扮演一个“容器”的角 色。当鼠标指针移动到子菜单标题上时，会自动弹出子菜 单。如将鼠标指针移动到[发送]选项，就会弹出子菜单。
插入：在列表框的当前选定项上方插入一行。 删除：删除当前选定项。 确定：关闭菜单编辑器，并确认用户所创建的菜单或对已有 菜单进行的修改。菜单可以在设计时使用，但在设计时可以 通过选定一个菜单，来打开菜单单击事件的[代码]窗口，而 不是执行事件代码。 取消：关闭菜单编辑器，取消所有的修改。 菜单编辑器下方的空白区域为菜单控件列表框。用户所创建 的所有菜单控件都将显示在该列表中。
是VB提供的一个用于设计菜单的工
14.1.2 菜单编辑器简介
具，用它可以创建出新的菜单或编 辑已有的菜单。菜单编辑器位于VB 的[工具]菜单中。
[菜单编辑器 ]对话框
菜单编辑器中各选项的含义： 标题：该文本框用来输入菜单名，这些名字出现在菜单栏 或者菜单之中。若想在菜单中建立分隔条，则应在该文本 框中输入一个连字符“-”。为了能够通过键盘访问菜单项， 可在一个字母前插入“&”符号。 名称：该文本框用来输入菜单名称。在代码中就是以该名 称来访问菜单项的，它不会出现在菜单中，这与其它控件 的名称是一样的。特别注意：菜单的名称与标题的区别！ 索引：可指定一个数字值来确定控件在控件数组中的位 置。该位置与控件的屏幕位置无关。 快捷键：可在该列表框中为命令选择快捷键。
VB基础状态栏（StatusBar）和工具栏（ToolBar）
VB基础状态栏（StatusBar）和工具栏（ToolBar）1．状态栏的作用与组成StatusBar 控件由Panel（窗格）对象组成，最多能被分成 16 个Panel 对象，每一个 Panel 对象能包含文本和/或图片。
控制个别窗格的外观属性包括 Width、Alignment（文本和图片的）和 Bevel(斜面)。
此外，能使用 Style 属性七个值中的一个自动地显示公共数据，诸如日期、时间和键盘状态等。
2．创建状态栏先在窗体上画出一个StatusBar对象，再右击该对象，从快捷菜单中选择“属性”，进入属性页设置窗口，进行下面的设置：（1）选择窗格形状在属性窗口里选择通用标签，在样式列表框里选择多窗格（缺省形式）或单窗格简单文本形式。
（2）添加或删除状态栏窗格在属性窗口里选择窗格标签，单击插入窗格按钮添加一个窗格，或单击删除窗格按钮删除一个窗格。
（3）在单窗格里显示文本在属性窗口里选择通用标签，在简单文本框里输入想显示在状态栏窗格里的文本。
用代码显示的方式是：StatusBar1.SimpleT ext = "要显示的内容"（4）在多窗格里显示文本或图形1). 在属性窗口里选择窗格标签，用索引旁的按钮选择窗格序号。
2). 在文本框里输入想显示在状态栏窗格里的文本。
用代码显示的方式是：StatusBar1.Panels(x).Text = "要显示的内容"3). 如果想加入图形，单击浏览按钮打开一个图形选择对话框，选择想加入的图形，然后单击打开按钮。
（5) 编写代码如果是一个单窗格状态栏，当用户单击状态栏时，只需用下面的事件过程来响应：Private Sub StatusBar1_Click()<要执行的代码>End Sub如果是一个多窗格状态栏，就需要鉴别用户单击的是哪一个窗格，可用下面的事件过程来识别用户所单击的窗格：Private Sub StatusBar1_PanelClick(ByVal Panel As Panel)Select Case Panel.IndexCase 1<要执行的代码>Case 2<要执行的代码>……End SelectEnd Sub3．创建工具栏（1）.建立工具栏1）在工具箱里单击工具栏图标，拖到窗体的任何位置，Visual Basic自动将ToolBar移到顶部。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
四、状态栏
状态栏显示系统信息和对用户的提示，如：系统日期、软件版本、光 标的当前位置、键盘的状态等。一般在窗口的底部。 1．建立状态栏 ．
显示的文本
样式
可插入图象
状态栏例题8.10 状态栏例题8.10
8.5 RichTextBox控件 控件
RichTextBox控件可以输入和编辑文本，还可以实现多种文字格式、段落 等的设置，还可以插入图形的功能，可真正构成一个象Word一样的字处 理软件。 选择“Microsoft Rich TextBox Controls 6.0”将控件添加到工具箱。 1.文件操作方法 （1）LoadFile方法 LoadFile方法能够将RTF文件或文本文件装入控件，其形式如下： 对象.LoadFile 文件标识符[，文件类型] 文件类型： 0或rtfRTF为RTF文件（缺省）；1或rtfTEXT为文本文件 例如： RichTextBox1.LoadFile CommonDialog1.FileName, 1 or: RichTextBox1.LoadFile “c:\windows\readme.txt”, 1
8.2 菜单的设计
下拉式菜单系统的组成结构 ：
主菜单条 菜 单 项
主菜单名 快捷键 键
菜单名
下 单
菜
一、菜单编辑器的使用
工具／菜单编辑器(CTRL+E) 窗体上快显菜单／菜单编辑器
常用属性：
1. 标题(Caption) 热键：前面加& 菜单项属性 操作按钮 菜单列 表框 2. 名称(Name)文本框 分隔符也应有名称。 分隔符也应有名称
例8.1 用命令按钮的Click事件显示文件打开对话框 CommonDialog1.InitDir=“C:\Windows” ' 设置初始目录 CommonDialog1.Filter = "文本文件 | *.Txt" ' 过滤文件类型 CommonDialog1.CancelError = True ' 控制取消按钮 CommonDialog1. ShowOpen ‘ 打开对话框 Label1.Caption = CommonDialog1.FileName 另存为” 2. “另存为”对话框 没有提供真正的存储文件操作，仍需要编程完成储存操作。 属性 DefaultExt：缺省扩展名 颜色” 3. “颜色”对话框 属性 Color：返回或设置选定的颜色。 例8.2 “颜色”对话框的使用
例8.7 弹出菜单
8.3 多重窗体和多文档窗体
一、多重窗体 1.添加窗体 1.添加窗体
“工程|添加窗体” 现存
新建
添加“现存”窗体时要注意： 添加“现存”窗体时要注意： 防止多个窗体的Name相同而不能添加； 添加的窗体实际是将其它工程中已有的窗体加入，多个工程共 享窗体； 通过“另存为”命令以不同的窗体文件名保存，断开共享。
通用对话框的类型 打开(Open) 另存为(Save As) 颜色(Color) 字体(Font) 打印机(Printer) 和帮助(Help)
通用对话框应用实例
选定Microsoft CommDialog Control 6.0
Action 1 2 3 4 5 6 方法 ShowOpen ShowSave ShowColor ShowFont ShowPrinter ShowHelp
ToolBar与 ImageList的连接
工具栏样式
工具栏例题8.10 工具栏例题8.10
2.为工具栏增加按钮 为工具栏增加按钮
索引（Index）、关键字（Key）每个按钮 的编号、标识, ButtonClick事件中引用；
样式(Style)，共6种
图象(Image) ImageList对象中的 图象，值可以是Key或Index
例8.8 输入和计算学习成绩。
模块： 模块： Public MATH As Single Public PHYSICS As Single Public CHEMISTRY As Single Public CHINESE As Single Public ENGLISH As Single
多文档界面(MDI) 二、 多文档界面
确定
属性
Action：打开通用对话框。 DialogTiltle：对通用话框标题。 CancelError True：选择“取消”按钮，出现错误警告； Err.Number置为32755(cdCancel)。 False(缺省)：选择“取消”按钮，没有错误警告。
1.文件对话框（打开、保存）需设置的属性 1.文件对话框（打开、保存） 文件对话框
产生一个固定宽度的间隙 再按一下才能起来 为其它控件留 下任意宽地方 除菜单按钮(5)外的5种样式 按前后外观无变化
Style=0 Style=3 Style=4 Style=1 Style=2
一组里只能有 一个被选中
响应ToolBar控件事件 三、 响应 控件事件
ToolBar控件常用的事件有两个：ButtonClick和ButtonMenuClick。前者对 按钮样式为0-2，后者对样式为5的菜单按钮。 （1）用索引Index确定按钮 (2)用关键字Key确定按钮
弹出菜单(快捷菜单) 三、 弹出菜单(快捷菜单)
弹出菜单是独立于窗体菜单栏而显示在窗体内的浮动菜单。显示 位置取决于单击鼠标键时指针的位置。设计与普通菜单相同（如果 不希望菜单出现在窗口的顶部，该菜单名Visible属性设置为False ）。 菜单弹出的方法：
[对象 对象.]PopupMenu 菜单名 标志 x, y 菜单名, 标志, 对象
3. 快捷键(Shortcut) 菜单名没有快捷键 4. 复选(Checked)检查框 TRUE 有 5. 有效(Enabled)检查框 6. 可见(Visible)检查框
例 8.6 建立一个有菜单功能的文本编辑器。要求有三级菜 单、热键、快捷键、并能够进行对齐格式的变化
二、 菜单项增减
在程序运行时，菜单随时增减，如“文件”菜单能保留最近打开 的文件数。这同控件数组一样，使用菜单数组。 步骤： 1.在菜单设计时，加入一个菜单项，其Index为0（菜单数组）, Visual为False。 2. 2.在程序运行时，通过Load方法向菜单数组增加新的菜单项。 Load 动态添加菜单项例题8.7.1 动态添加菜单项例题 同样，要删除所建立的菜单项，使用UnLoad方法向菜单数组减少 菜单项。
例8.3
字体对话框的使用
打印” 5. “打印”对话框 属性 FromPage：起始页号 ToPage：终止页号 Copies：打印份数
如果打印驱动程序不支持多份打印，该属性有可能始终返回 1。
例8.4 打印对话框的使用 帮助” 6. “帮助”对话框 帮助文件需要用其它的工具制作，如Microsoft Windows Help Compiler。 属性 例8.5 HelpCommand：在线Help帮助类型 演示：Help帮助类型 .avi 帮助类型 HelpFile：Help文件的路径及其名称 HelpKey：在帮助窗口显示由该帮助关键字指定的帮助信息。
Private Sub Toolbar1_ButtonClick(Byval Button As ComctlLib.Button) Select Case Button.Key Select Case Button.Index Case 1 Case "TNew" FileNewProc FileNewProc Case 2 Case "TOpen" FileOpenProc FileOpenProc …… ..... End Select End Sub 注意：第1个按钮的Index值为1。用Index还是用Key比较，Key 可读 ， 性好，可维护性好。
字体” 4. “字体”对话框
FontName FontBold、FontItalic FontSize
Min、Max
FontStrikethru FontUnderline Color
注意： 注意：Flags属性：指示所显示的字体类型，必须设置。
cdlCFScreenFonts cdlCFPrinterFonts cdlCFBoth cdlCFEffects &H1 &H2 &H3 &H100 屏幕字体 打印机字体 打印机字体和屏幕字体。 显示删除线和下划线检查框以及颜色组合框
什么是多文档界面？ 什么是多文档界面？ 图标有何特点？ 图标有何特v6b8-1)
利用向导创建MDI窗体及其子窗体的方法 利用向导创建MDI窗体及其子窗体的方法 MDI
文件/新建工程 文件 新建工程/VB应用程序向导 新建工程 应用程序向导 对于MDI窗体及其子窗体可以进一步进行自定义 窗体及其子窗体可以进一步进行自定义 对于
2.
保存窗体
一个工程中有多个窗体，应分别取不同文件名保存在磁盘上， VBP工程文件中记录了该工程的所有窗体文件名。
3. 设置启动窗体
属性” “工程/属性” 工程 属性 “启动对象” 启动对象”
设置启动对象
4. 窗体语句 (1)Load语句：装入窗体到内存但没有显示窗体 形式： Load 窗体名称 (2)Unload语句：从内存删除窗体 形式： Unload 窗体名称
标志，表示弹出的位置和触发的键(见教材P193 表1.8.4)
Sub picture1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = 2 Then PopupMenu EditMenu, vbPopupMenuCenterAlign End Sub
一、在ImageList控件中添加图象 控件中添加图象
ImageList控件不单独使用，专门为其它控件提供图像库.