图12－4　例12．2“窗体1”

图12－5　例12．2自定义对话框

通用对话框是一种ActiveX控件，在使用之前，应选择“工程”菜单中的“部件”命令先将其添加到工具箱中，用这种控件可以设计较为复杂的对话框。通用对话框是Visual Basic提供的对话框控件，包括打开（Open）、另存为（Save as）、颜色（Color）、字体（Font）、打印（Print）和帮助（Help）等六种通用对话框。

把通用对话框控件加到工具箱中的方法：

第一步：执行“工程”菜单中的“部件”命令，打开“部件”对话框。

第二步：在对话框中选择“控件”选项卡，然后在控件列表框中选择“Microsoft Com⁃mon Dialog Control 6．0”。

第三步：单击“确定”按钮。

图12－6　添加通用对话框

一、通用对话框属性

Action属性：设置打开的对话框类型。

表12－5　Action属性

DialogTitle属性：设置对话框标题。

CancelError属性：设置当用户按下“取消”按钮时是否产生错误信息。

二、通用对话框方法

ShowOpen方法：“打开（Open）”对话框。

ShowSave方法：“另存为（Save As）”对话框。

ShowColor方法：“颜色（Color）”对话框。

ShowFont方法：“字体（Font）”对话框。

ShowPrinter方法：“打印（Print）”对话框。

ShowHelp方法：“帮助（Help）”对话框。

例如：CommonDialog1．ShowOpen　对话框为“打开”对话框

1．打开（Open）对话框

显示“打开”对话框的两种方法：

（1）ShowOpen方法。

（2）将通用对话框的Action属性值设为1。

“打开”对话框的功能是指定文件的驱动器、目录、文件扩展名和文件名。使用“打开”对话框时，通常首先对其进行属性设置，各属性含义和设置方法如下：

（1）对话框标题（DialogTitle属性）：设置对话框的标题，缺省值为“打开”。

（2）文件名称（FileName属性）：设置“打开”对话框中“文件名”区中的初始文件名，同时也能返回用户在对话框中选中的路径名和文件名。

（3）初始化路径（InitDir属性）：设置初始目录，同时也能返回用户选择的目录名。

（4）过滤器（Filter属性）：设置对话框中的文件列表中显示的文件类型。设置过滤器属性的格式为：

description1｜filter1｜description2｜filter2．．．

例如：CommonDialog1．Filter＝＂文本文件（*．TXT）｜*．txt＂语句InitDir

其中description是在“打开”对话框中的文件类型列表框中显示的字符串。

（5）标志（Flags属性）：用来修改每个具体对话框的默认操作。

（6）缺省扩展名（DefaultExt属性）：设置在对话框中的缺省扩展名。

（7）文件最大长度（MaxFileSize属性）：设置文件名的最大字节数。

（8）过滤器索引（FilterIndex属性）：用索引值来指定对话框使用哪一个过滤器。

（9）取消引发错误（CancelError属性）：决定当用户单击对话框上的“取消”按钮时，是否会显示一个报错信息的消息框。

注意：CancelError属性的设置方法对其他几种对话框也同样适用。

2．“另存为”对话框

显示“另存为”对话框两种方法：

（1）对话框Action属性设置为2。(www.daowen.com)

（2）调用对话框的ShowSave方法。

它同样能指定文件的驱动器、目录、文件扩展名和文件名，其使用方法和“打开”对话框的使用方法基本相同。

DefaultExt属性：为文件设置默认的文件扩展名，其值是由1－3个字符组成的字符串。

3．“颜色”对话框

显示“颜色”对话框两种方法：

（1）对话框的Action属性值为3。

（2）调用对话框的ShowColor方法时。

“颜色”对话框用来在调色板中选择颜色，或者是创建并选择自定义的颜色。要使用“颜色”对话框，通常先设置“通用对话框”控件中与颜色对话相关的属性，然后使用ShowColor方法显示对话框，使用Color属性获得所选择的颜色。

Color属性：用于返回选定的颜色值。

“标志”（Flags）属性：用来决定“颜色”对话框的样式。

4．“字体”对话框

显示“字体”对话框两种方法：

（1）对话框的Action为4。

（2）调用ShowFont方法。

“字体”对话框用来指定字体名称、大小、颜色和样式。要使用“字体”对话框，通常先设置“通用对话框”控件中与字体对话相关的属性，然后使用ShowFont方法来显示对话框。和字体相关的属性主要有Color、FontBold、FontItalic、FontStrikethru、FontUnderline、FontName和FontSize。

常用属性：

（1）FontName属性：返回用户所选定的字体名称。

（2）Fontsize属性：返回用户所选定的字体大小。

（3）FontBold、FontItalic、FontStrikethru和FontUnderline属性：分别设置字体为粗体、斜体、删除线或下划线。

（4）Min、Max属性：设定用户在字体对话框中所能选择字号的最小值和最大值。

（5）Flags属性：该属性用来设置字体对话框的选项。

在使用ShowFont方法之前，一定要把Flags属性设置为下述常数之一：

cdlCFScreenFonts或1：屏幕字体

cdlCFPrinterFonts或2：打印机字体

cdlCFBoth或3：既可以是屏幕字体又可以是打印机字体

五、“打印”对话框

显示“打印”对话框两种方法：

（1）对话框 的Action属性值为5。

（2）调用ShowPrint方法。

“打印”对话框可以指定打印输出方式。可以指定被打印页的范围，打印质量，打印的份数等等。这个对话框还包含当前打印机的信息，并允许配置或重新安装缺省打印机。

“打印”对话框主要属性及其具体含义如下：

（1）复制（Copies）：决定打印的份数，默认值为1。

（2）标志（Flags）：如果把Flags设置为0，设置“打印”对话框中的“打印范围”。

（3）起始页（FromPage）和终止页（ToPage）：用来设置从第几页打印到第几页。

（4）最小（Min）和最大（Max）：分别用于设置打印的最小和最大页码数。

（5）方向（Orientation）：用来设定打印的方向（1表示纵向，2表示横向）。

6．“帮助”对话框

显示“帮助”对话框两种方法：

（1）对话框的Action属性值为6。

（2）调用ShowHelp方法。

“帮助”对话框可以用来制作应用程序的联机帮助。“帮助”对话框主要属性主要有：

（1）帮助上下文（HelpContext）：返回或设置帮助文件中的主题的上下文ID，指定要显示的帮助主题。一般与HelpCommand属性（设置为vbHelpContents）一起使用。

（2）帮助命令（HelpCommand）：返回或设置联机帮助的类型。

（3）帮助键（HelpKey）：返回或设置帮助主题的关键字。

（4）帮助文件（HelpFile）：返回或设置帮助文件的路径及其文件名称。