Access下如何使用通用对话框

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

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

• 其他控件à Microsoft Common Dialog Control,Version 6.0
• 在窗体上形成对话框控件
• 修改控件的名称如：Dialog1

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

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

A、“打开/另存为”：

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

B、颜色

C、字体

D、打印

E、帮助

过滤器属性的设置方法：

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

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

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

属性

说明 /tr>

Copies

要打印的份数

FromPage

打印的起始页

ToPage

打印的结束页

Hdc

选定打印机的设备上下文

方法

说明

ShowOpen

打开

ShowSave

另存为

ShowColor

颜色

ShowFont

字体

ShowPrinter

打印

ShowHelp

调用Windows “帮助”

例：打开文件对话框的命令如下：

dim filename1 As String
Dialog1.showopen 显示打开文件对话框
Filename1= Dialog1.filename 获取所选择的文件名

例：打开保存文件对话框的命令如下：

dim filename1 As String
Dialog1.showsave 显示保存文件对话框
Filename1=Dialog1.filename 获取所选择的文件名

　　其它几种对话框的打开方式与上面的方法相同，值得一提的是可以通过该控件控制打印机的使用，非常方便。以上就是Microsoft Common Dialog Control,Version 6.0控件的具体使用方法，希望对读者有一定帮助。

Copyright ＠ 2007-2012 敏韬网(敏而好学，文韬武略--MinTao.Net)（学习笔记） Inc All Rights Reserved.
闵涛 E_mail:admin@mintao.net(欢迎提供学习资源)

鄂公网安备 42011102001154号

站长：MinTao ICP备案号：鄂ICP备11006601号-18