VB60教程课件 第11章 对话框设计.ppt

“对话框”（DialogBox）
可以被看作一种特殊的窗体，它通过显示和获取信息与用户进行交流。它的大小一般不可改变，也没有“最小化”和“最大化”按钮，它只有一个“关闭”按钮（有时还包含一个“帮助”按钮）。11.1.2使用对话框模板窗体创建对话框1．显示自定义对话框2．关闭自定义对话框11.2通用对话框1 属性
Action属性：数值型，决定打开何种类型的对话框（见上表）
DialogTiltle属性：对通用话框标题。
CancelError属性：逻辑型值，表示用户在与对话框进行信息交换时，按下“取消”按钮时是否产生出错信息。
True：选择“取消”按钮，出现错误警告；
Err置为32755(cdlCancel)。
False(缺省)：选择“取消”按钮，没有错误警告。
2通用对话框的方法
除了Acton属性，VB还提供了一组方法用来打开不同类型对话框
ShowOpenShowSaveShowColor
ShowFontShowPrinterShowHelp 属性
1FileName(文件名称）属性：在程序中可用该属性值设置或返回用户所选定的文件名（包含路径）
2FileTitle（文件标题）属性：在程序中可用该属性值设置或返回用户所选定的文件名（不包含路径）3Filter（过滤器）属性：确定文件列表框中所显示文件的类型，该属性的值显示在“文件类型”列表框中。

【例如】设置3个过滤器，其值为：
Documents(*.DOC)|*.DOC|TextFiles(*.TXT)|*.txt|AllFiles|(*.*)

则在“文件类型”列表框显示下列三种文件类型以供用户选择
Documents(*.DOC)扩展名为DOC的Word文件
TextFiles(*.TXT)扩展名为TXT的文本文件
AllFiles|(*.*)所有文件4FilterIndex（过滤器索引）属性：为整型值，表示用户在文件类型列表框选定了第几组文件类型。
5InitDir（初始化路径）属性：该属性用来指定打开对话框中的初始目录，若不设置，系统则默认为“C:\MyDocuments\”。设计一个窗体，包含1个文本框（Text1）和6个分别为“打开”（cmdOpen）、“另存为”（cmdSave）、“颜色”（cmdColor）、“字体”（cmdFont）、“打印”（cmdPrinter）和“帮助”（cmdHelp）命令按钮。本例中仅涉及前两种对话框的使用，当用户要求单击“打开”就弹出打开对话框，当用户选择一文本文件，便可将该文件内容读入到文本框；当单击“另存为”就打开另存为对话框。用户输入文件名后，便可以新的文件名保存文本框的内容。11.2.2“颜色”对话框
颜色对话框是当Action值为3时的通用对话框，如右图。
重要属性
Color：用来返回或设置选定的颜色。
例10.3例10.2中“颜色...”按钮的事件过程11.2.3“字体”对话框
字体对话框是Action为4时的通用对话框，如下图所示，提供用户选择字体、字号及字体样式等。
字体对话框重要的属性有：Color,FontName,FontSize,FontBoldFontItalic,FontStrikethru,FontUnderline,Max等. Flags属性：设置所显示的字体类型，数据类型为Long。
注意在显示“字体”对话框前，必须先将Flags属性设置为cdlCFScreenFonts，cdlCFPrinterFonts，或cdlCFBoth。否则，会发生字体不存在的错误。
Flages属性应取下列值：
cdlCFScreenFonts &H1 屏幕字体
cdlCFPrinterFonts &H2 打印机字体
cdlCFBoth &H3 打印机字体和屏幕字体。
cdlCFEffects&H100显示删除线和下划线检查框以及颜色组合框例11.4例11.2中“字体...”按钮的事件过程
PrivateSubcmdFont_Click()
CommonDialog1.Flags=cdlCFBothOrcdlCFEffects
CommonDialog1.Action=4
…………………………...
EndSub11.2.4“打印”对话框
打印对话框是当Action为5时的通用对话框，是一个标准打印对话窗口界面，如右图。
属性
FromPage：整型，起始页号
Topage：整型，终止页号
Copies：整型，打印份数
如果打印驱动程序不支持多份打印，该属性有可能始终返回1。
11.2.5“帮助”对话框
帮助对话框是当Action为6时的对话框，是一个标准的对话窗口用于制作应用程序的在线帮助。
帮助文件需要用其它的工具制作，
如MicrosoftWindowsHelpCompil