資源描述：
《第10章對話框和菜單.ppt》由會員上傳分享，免費在線閱讀，更多相關(guān)內(nèi)容在行業(yè)資料-天天文庫。
1、第10章對話框和菜單10.1通用對話框10.2菜單設(shè)計通用對話框?qū)ο笤试S在程序中顯示六種標準對話框通用對話框是一種ActiveX控件,需要加到工具箱中步驟：1)打開“工程”菜單，選擇“部件”命令2)打開“控件”選項卡，并選中“MicrosoftCommonDialogControl6.0”復(fù)選框單擊“確定”按鈕，控件出現(xiàn)在工具箱中10.1通用對話框(CommonDialog)對話框類型Action屬性值方法打開文件對話框1ShowOpen保存文件對話框2ShowSave顏色對話框3ShowColor字體對話框4ShowFon
2、t打印對話框5ShowPrinter幫助對話框6ShowHelp10.1.1打開/另存為對話框與打開/另存為對話框有關(guān)的屬性：DefaultEXT屬性設(shè)置對話框中默認文件類型（擴展名）2）DialogTitle屬性設(shè)置對話框的標題，缺省時為“打開”、“保存”3)FileName屬性設(shè)置或返回要打開或保存的文件的路徑及文件名4)FileTitle屬性，用來指定所選擇的文件名（不含路徑）5)Filter屬性指定在對話框中顯示的文件類型?？梢栽O(shè)置多個文件類型，供用戶在對話框的“文件類型”的下拉列表中選擇Filter屬性值由多個字符
3、串段構(gòu)成，字符串段之間要用管道符“
4、”隔開，在它前面的部分稱為描述符，后面的部分一般為通配符和文件擴展名，稱為“過濾器”格式如下：對話框名.Filter=描述符1
5、過濾器1
6、描述符2
7、過濾器2…例如：CommonDialog1.Filter="AllFiles(*.*)
8、*.*
9、BMP文件(*.bmp)
10、*.bmp"6)FilterIndex屬性指定默認的過濾器，其設(shè)置值為一個整數(shù)Filter屬性設(shè)置多個過濾器后，每個都有一個索引值第一個過濾器的索引值為1，第二個過濾器的索引值為2…CommonDialog1.FilterI
11、ndex=27)CancelError屬性①CancelError為True，且用戶單擊了對話框的“取消”按鈕時，將產(chǎn)生一個錯誤，錯誤號為32755，符號常量為cdlCancel②CancelError為False時，單擊“取消”按鈕，將不產(chǎn)生錯誤信息增加：Shell函數(shù)——調(diào)用應(yīng)用程序格式：shell（命令字符串[，窗口類型]）1）命令字符串：必須是可執(zhí)行文件，擴展名：COM、EXE、BAT、PIF其他不可2）窗口類型：0、1、2、3、4、6vbhide:窗口被隱藏，具有焦點vbnormalfocus：窗口正常大小，具有焦
12、點vbminimizefocus：窗口最小化，具有焦點vbmaximizefocus：窗口最大化，具有焦點vbnormalnofocus：窗口正常，不具有焦點vbminimizenofocus：窗口最小化，不具有焦點Shell函數(shù)成功執(zhí)行后，返回一個任務(wù)標識（taskid）且必須賦給一個變量x=shell（”c:vb98myvb1.exe”,3）不可以省略“x=“Shell函數(shù)采用異步方式執(zhí)行其他程序，即shell啟動的程序可能還沒有執(zhí)行完，就已執(zhí)行了Shell函數(shù)后面的語句例如:privatesubcommand1-c
13、lick()m%=inputbox(“shuru1~3”)selectcasemcase1:x=shell(“c:my1.exe”,1)case2:x=shell(“d:my2.exe”,1)case3:x=shell(“e:my3.exe”,1)endselect10.1.2顏色對話框“顏色”對話框可以用來在調(diào)色板中選擇顏色，或者創(chuàng)建并選定自定義顏色。打開后，選定顏色并關(guān)閉對話框后可以用Color屬性獲取選定的顏色使用“顏色”對話框時，應(yīng)注意將Flags屬性設(shè)置成常數(shù)cdlCCRGBInit10.1.3字體對話框“字
14、體”對話框根據(jù)大小、樣式、顏色選擇字體1)Color屬性：必須先將Flags屬性設(shè)置為cdlCFEffects2)FontName屬性：返回用戶選定的字體的名稱/設(shè)置對話框缺省的字體3)FontBold屬性：返回/設(shè)置“粗體”4)FontItalic屬性：返回/設(shè)置“斜體”5)FontStrickethru屬性：返回/設(shè)置“刪除線”6)FontUnderline屬性：返回/設(shè)置“下劃線”7)FontSize屬性：返回/設(shè)置“字體大小”Flags屬性設(shè)置為下述VB常數(shù)之一：①cdlCFScreenFonts（屏幕支持的字體）②
15、cdlCFPrinterFonts（打印機支持的字體）③cdlCFBoth（即可以是屏幕字體又可以是打印機字體）例如：程序?qū)崿F(xiàn)初始化并顯示“字體”對話框，然后根據(jù)用戶的選擇設(shè)置文本框的字體屬性10.1.4打印對話框1)Copies屬性：返回/設(shè)置要打印的份數(shù)2)FromPage屬性：返回/
