第七章对话框和菜单

通用对话框添加到工具箱
工程/部件
选定部 件标签
选定Microsoft CommDialog Control 6.0
确定
（一）通用对话框的基本属性和方法
通用对话框可以提供6种形式的对话框，通过设置Action属性值或调用
Show方法来建立不同类型的对话框。如下表：
通用对话框的类型 打开(Open) 另存为(Save As) 颜色(Color) 字体(Font) 打印机(Printer) 帮助(Help)
的值显示在“文件类型”列表框中。如设置其值为：
Documents(*.DOC)|*.DOC|Text Files(*.TXT)|*.txt|All Files|(*.*)
则在“文件类型”列表框显示下列三种文件类型以供用户选择
Documents(*.DOC) 扩展名为DOC的Word文件
Text Files(*.TXT) 扩展名为TXT的文本文件
Action
方法
1 ShowOpen
2 ShowSave
3 ShowColor
4 ShowFont
5 ShowPrinter
6 ShowHelp
（一）通用对话框的基本属性和方法
1. 属性 Action属性：数值型，决定打开何种类型的对话框（见上表） DialogTiltle属性：对通用话框标题。 CancelError属性：逻辑型值，表示用户在与对话框进行信息
可使用窗体对象的Show方法显示自定义对话框
（1）模式对话框 模式对话框在焦点可以切换到其它窗体或对话框之前要求
用户必须作出响应以关闭对话框。 其显示方法为：
〈窗体名〉. Show vbModal （其中vbModal是系统常数，值为1） （2）无模式对话框 无模式对话框的焦点可以自由切换到其它窗体或对话框， 而无需用户关闭当前对话框，其显示方法为：
〈窗体名〉. Show
（二）使用对话框模板窗体创建对话框
2．关闭自定义对话框 可使用Hide方法或UnLoad语句来关闭自定义对话框，其格 式为：
Me.Hide 或 <窗体名>.Hide UnLoad <窗体名>
例: 右图是一个使用对 话框模板的登录对话框
三、通用对话框(CommonDialog)
6. DefaultExt属性：字符型，用于确定保存文件的缺省扩 展名。
7. CancelError属性：逻辑型值，表示用户在与对话框进 行信息交换时，按下“取消”按钮时是否产生出错信 息。
（三）“颜色”对话框
颜色对话框是当 Action值为3 时的通用对话框，如下图。
重要属性 Color：用来返回或 设置选定的颜色。
属性
1. FileName(文件全名）属性：在程序中可用该属性值设置或返回用户 所选定的文件名（包含路径）。
2. FileTitle（文件名）属性：设计时无效，在程序中为只读，返回用户 所选定的文件名（不包含路径）。
（二） “打开”/“另存为”对话框
3. Filter（过滤器）属性：确定文件列表框中所显示文件的类型，该属性
第七章 对话框和菜单
本章要求: 1.了解用户自定义对话框； 2.通用对话框控件的功能； 3.掌握菜单设计的基本方法 ；
一、概述：
“对话框”可以被看作一种特殊的窗体，它的大 小一般不可改变，也没有“最小化”和“最大化” 按钮，它只有一个“关闭”按钮（有时还包含一 个“帮助”按钮）。 VB提供了三种解决方案： ➢系统预定义的对话框（InputBox和MsgBox） ➢用户自定义对话框 ➢通用对话框控件。
交换时，按下“取消”按钮时是否产生出错信息。 True：选择“取消”按钮，出现错误警告；False(缺省)： 选择“取消”按钮，没有错误警告。 2. 通用对话框的 Show 方法（见上表）
（二） “打开”/“另存为”对话框
DialogTiltle FileName InitDir Filter
DefaultExt FilterIndex
二、用户自定义对话框
（一）由普通窗体创建用户对话框
对话框窗体与一般窗体在外观上是有区别的，需要通过设 置属性值来自定义窗体外观。 1．BorderStyle属性 窗体的BorderStyle属性值设置为3（VbFixedDoubleialog） 2．ControlBox属性 属性值为True时窗体显示控制菜单框，为False时不显示。
All Files|(*.*)
所有文件
4. FilterIndex（过滤器索引）属性：为整型值，表示用户在文件类型列表 框选定了第几组文件类型。
（二） “打开”/“另存为”对话框
5. InitDir（初始化路径）属性：该属性用来指定打开对话 框中的初始目录，若不设置，系统则默认为“C:\My Documents\”。
（二）使用对话框模板窗体创建对话框
Visual Basic6.0系统提供了多种不同类的“对话框”模板窗 体，通过“工程”菜单中的“添加窗体”命令，即可打开 “添加窗体”对话框。
用户可以选择的对 话框有：“关于” 对话框、对话框、 登录对话框、日积 月累、ODBC登录、 选项对话框6类等。
1．显示自定义对话框
（四） “字体”对话框
Flags属性：设置所显示的字体类型。 ▪ 注意 在显示“字体”对话框前，必须先将 Flags 属性设 置为 cdlCFScreenFonts，cdlCFPrinterFonts，或 cdlCFBoth。否则，会发生字体不存在的错误。
Flages属性应取下列值：
cdlCFScreenFonts &H1 屏幕字体 cdlCFPrinterFonts &H2 打印机字体
（四） “字体”对话框
▪ 字体对话框是Action为4时的通用对话框，如下图所示， 提供用户选择字体、字号及字体样式等。
属性：
字体对话框重 要的属性见右 图。
FontName FontBold、FontItalic FontSize
FontStrikethru FontUnderline
Color
cdlCFBoth cdlCFEf字体 &H100 显示删除线和下划线检查
框以及颜色组合框
四、菜单设计
（一） 概述
▪ 菜单是图形化界面一个必不可少的组成元素，