Access下如何使用通用对话框

很多用ACCEE97开发过数据库的用户都有这种体会：要想在窗体中添加一个命令按钮实现打开通用对话框的功能真是很困难。因为ACCESS97本身并未提供这类控件，所以必须通过编写有关的宏才能实现该功能，但是编写出的宏限制很多，比如：在选择文件类型时不能同时存在多种文件格式，必须预定义好某一种格式等等。

　　最近笔者在开发INTRANET信息采集系统时偶得一控件，恰恰能完成打开通用对话框的功能，并且效果极佳，不敢独享，拿来与诸君共享之。

　　因为该控件存放于VB6中，所以具体使用方法和在VB中类似。

其他控件MicrosoftCommonDialogControl,Version6.0
在窗体上形成对话框控件
修改控件的名称如：Dialog1

设置其属性：在对话框上单击右键CommonDialog对象的属性弹出属性对话框（如下图）。可以看到，属性页的内容包括“打开/另存为”、“颜色”、“字体”、“打印”和“帮助”五组选项。可以根据提示在属性页中直接进行属性设置，也可通过编程来设置这些属性。

下面分别对各组选项加以说明：

A、“打开/另存为”：

　　对话框标题是“打开/另存为”窗体的标题，如打开文件时可输入“打开文件”，另存文件时可输入“保存文件”。文件名称是要打开/另存文件的默认值，一般打开/另存时此处为空。初始化路径是打开/另存文件的默认路径，一般为空。过滤器是用来在“打开/另存为”处理中，通过对该属性的设置来控制文件的类型。其设置方法为ACCESS文件|*.mdb|文本文件|*.txt|所有文件|*.*

B、颜色

C、字体

D、打印

E、帮助

过滤器属性的设置方法：

Dialog1.filter=“ACCESS文件|*.mdb|文本文件|*.txt|所有文件|*.*”

通过FileName属性获取选定的文件名。

常用对话框控件属性及方法表

-valign="top"width="29">属性

->-valign="top"width="71">说明

->-valign="top"width="29">

Copies

->-valign="top"width="71">

要打印的份数

->-valign="top"width="29">

FromPage

->-valign="top"width="71">

打印的起始页

->-valign="top"width="29">

ToPage

->-valign="top"width="71">

打印的结束页

->-valign="top"width="29">

Hdc

->-valign="top"width="71">

选定打印机的设备上下文

->-valign="top"width="29">方法

->-valign="top"width="71">说明

->-valign="top"width="29">

ShowOpen

->-valign="top"width="71">

打开

->-valign="top"width="29">

ShowSave

->-valign="top"width="71">

另存为

->-valign="top"width="29">

ShowColor

->-valign="top"width="71">

颜色

->-valign="top"width="29">

ShowFont

->-valign="top"width="71">

字体

->-valign="top"width="29">

ShowPrinter

->-valign="top"width="71">

打印

->-valign="top"width="29">

ShowHelp

->-valign="top"width="71">

调用Windows“帮助”