第9章菜單與對(duì)話框-資料下載頁(yè)
2025-07-24 02:06本頁(yè)面
【正文】 框 ， 如圖 910所示 。 圖 910 “屬性頁(yè)”對(duì)話框 1. 使用“打開(kāi)”對(duì)話框 打開(kāi)文件是 Windows應(yīng)用程序 （ 例如 Office） 中的常用操作 。 “ 打開(kāi) ” 對(duì)話框可以用來(lái)指定文件所在的 驅(qū)動(dòng)器 、文件夾 以及 文件名 、 文件擴(kuò)展名 ， 如圖 911所示 。 圖 911 “打開(kāi)”對(duì)話框 運(yùn)行時(shí)選定文件并關(guān)閉對(duì)話框后 ， 可用 FileName屬性得到文件所在的驅(qū)動(dòng)器 、 文件夾以及文件名 、 文件擴(kuò)展名 。 使用 “ 打開(kāi) ” 對(duì)話框的步驟如下： 1) 首先在窗體中增加 “ 公共對(duì)話框 ” 控件 。 2) 然后在 “ 屬性頁(yè) ” 對(duì)話框中設(shè)置屬性 。 3) 最后使用 CommonDialog控件的 ShowOpen方法來(lái)顯示 “ 打開(kāi) ”對(duì)話框： 控件名 .ShowOpen 控件名 .ShowColor 名稱 功能 ShowSave 顯示文件存儲(chǔ)對(duì)話框 ShowColor 顯示顏色對(duì)話框 ShowFont 顯示字體對(duì)話框 ShowPrinter 顯示打印對(duì)話框 ShowHelp 顯示 Windows幫助對(duì)話框 4. 使用“字體”對(duì)話框 “ 字體 ” 對(duì)話框設(shè)置并返回所用字體的名字 、 樣式 、 大小 、 效果及顏色 。 注意：必須將 Flags屬性設(shè)為下列常數(shù)之一與其他選項(xiàng)之和： cdlCFScreenFonts或 1（ 屏幕字體 ） cdkCFPrinterFonts或 2（ 打印機(jī)字體 ） cdlCFBoth或 3（ =1+2 兩種字體皆有 ） 例如：設(shè)為 259（ =256+3是 cdlCFEffects常數(shù)與 3之和 ，在對(duì)話框中將出現(xiàn)顏色 、 效果等選項(xiàng) ） 。 【 例 95】 使用公共對(duì)話框控件的例子 （ 圖 917） 。 圖 917 使用“公共對(duì)話框”控件 Private Sub Command1_Click(Index As Integer) n = Index Select Case n Case 0 = 所有文件 (*.*)|*.*|文本文件 (*.TXT)|*.txt = 1 = = 從打開(kāi)對(duì)話框返回 Case 1 = = 從另存為對(duì)話框返回 “ Case 2 = 從顏色對(duì)話框返回 = = 從顏色對(duì)話框返回 Case 3 = 3 Or 256 With Text1 .FontName = .FontSize = .FontStrikethru = .FontBold = .FontItalic = .FontUnderline = .ForeColor = End With = 從字體對(duì)話框返回 = 從字體對(duì)話框返回 End Select End Sub
教學(xué)課件相關(guān)推薦
鄂ICP備17016276號(hào)-1