Access下如何使用通用對話框

字號:

很多用ACCEE97開發(fā)過數(shù)據(jù)庫的用戶都有這種體會:要想在窗體中添加一個命令按鈕實現(xiàn)打開通用對話框的功能真是很困難。因為ACCESS97本身并未提供這類控件,所以必須通過編寫有關(guān)的宏才能實現(xiàn)該功能,但是編寫出的宏限制很多,比如:在選擇文件類型時不能同時存在多種文件格式,必須預(yù)定義好某一種格式等等。
     最近筆者在開發(fā)INTRANET信息采集系統(tǒng)時偶得一控件,恰恰能完成打開通用對話框的功能,并且效果極佳,不敢獨享,拿來與諸君共享之。
     因為該控件存放于VB6中,所以具體使用方法和在VB中類似。
    其他控件 Microsoft Common Dialog Control,Version 6.0
    在窗體上形成對話框控件
    修改控件的名稱如:Dialog1
    設(shè)置其屬性:在對話框上單擊右鍵 CommonDialog 對象的屬性彈出屬性對話框(如下圖)??梢钥吹剑瑢傩皂摰膬?nèi)容包括“打開/另存為”、“顏色”、“字體”、“打印”和“幫助”五組選項??梢愿鶕?jù)提示在屬性頁中直接進行屬性設(shè)置,也可通過編程來設(shè)置這些屬性。
    下面分別對各組選項加以說明:
    A、“打開/另存為”:
     對話框標題是“打開/另存為”窗體的標題,如打開文件時可輸入“打開文件”,另存文件時可輸入“保存文件”。文件名稱是要打開/另存文件的默認值,一般打開/另存時此處為空。初始化路徑是打開/另存文件的默認路徑,一般為空。過濾器是用來在“打開/另存為”處理中,通過對該屬性的設(shè)置來控制文件的類型。其設(shè)置方法為ACCESS文件|*.mdb|文本文件|*.txt|所有文件|*.*
    B、顏色
    C、字體
    D、打印
    E、幫助
    過濾器屬性的設(shè)置方法:
    Dialog1.filter = “ACCESS文件|*.mdb|文本文件|*.txt|所有文件|*.*”
    通過FileName屬性獲取選定的文件名。
    常用對話框控件屬性及方法表
    屬性 說明
    Copies 要打印的份數(shù)
    FromPage 打印的起始頁
    ToPage 打印的結(jié)束頁
    Hdc 選定打印機的設(shè)備上下文
    方法 說明
    ShowOpen 打開
    ShowSave 另存為
    ShowColor 顏色
    ShowFont 字體
    ShowPrinter 打印
    ShowHelp 調(diào)用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控件的具體使用方法,希望對讀者有一定幫助。