VB教程：對(duì)話框（CommonDialog）

10、對(duì)話框（Common Dialog）
    作用：該控件可提供諸如打開和保存文件、設(shè)置打印選項(xiàng)、選擇顏色和字體等操作的一組標(biāo)準(zhǔn)對(duì)話框。
    使用common dialog 控件必須加載microsoft common dialog conrtol6.0。方法為：打開菜單“工程”/“部件”，在部件對(duì)話框中選中microsoft common dialog conrtol6.0確定。則在工具箱中加入了對(duì)話框（Common Dialog）圖標(biāo)。
    此圖標(biāo)的大小不能改變，而且此圖標(biāo)像timer控件一樣在程序運(yùn)行時(shí)是不可見的。雙擊控件圖標(biāo)或用鼠標(biāo)把對(duì)話控件直接在窗體上繪出，加載控件。
    運(yùn)行時(shí)，使用下面所列方法顯示需要的對(duì)話框：
    showopen——顯示“打開”對(duì)話框
    showsave——顯示“另存為”對(duì)話框
    showcolor——顯示“顏色”對(duì)話框
    showfont——顯示“字體”對(duì)話框
    showprinter——顯示“打印”對(duì)話框
    showhelp——調(diào)用Windows“幫助”
    例1：顯示打印對(duì)話框。
    界面：
    程序：
    Private Sub Command1_Click()
     CommonDialog1.ShowPrinter
     Text1.Text = CommonDialog1.FromPage
     Text2.Text = CommonDialog1.ToPage
     Text3.Text = CommonDialog1.Copies
     Exit Sub
    End Sub
    Private Sub Command2_Click()
    End
    End Sub
    例2：顯示各種對(duì)話框。
    界面：
    代碼：
    Private Sub Command1_Click()
     CommonDialog1.showhelp
    End Sub
    --------------------------------------------------------------------------------
    Private Sub Command2_Click()
     CommonDialog1.showfont
    End Sub
    --------------------------------------------------------------------------------
    Private Sub Command3_Click()
     CommonDialog1.showcolor
    End Sub
    --------------------------------------------------------------------------------
    Private Sub Command4_Click()
     CommonDialog1.showsave
    End Sub
    --------------------------------------------------------------------------------
    Private Sub Command5_Click()
     CommonDialog1.showopen
    End Sub
    --------------------------------------------------------------------------------
    Private Sub Command6_Click()
     End
    End Sub