第7章對(duì)話框及菜單設(shè)計(jì)

1、第七章第七章 對(duì)話框和菜單對(duì)話框和菜單n “對(duì)話框?qū)υ捒颉笨梢员豢醋饕环N特殊的窗體，它的大可以被看作一種特殊的窗體，它的大小一般不可改變，也沒(méi)有小一般不可改變，也沒(méi)有“最小化最小化”和和“最大化最大化”按鈕，它只有一個(gè)按鈕，它只有一個(gè)“關(guān)閉關(guān)閉”按鈕（有時(shí)還包含一按鈕（有時(shí)還包含一個(gè)個(gè)“幫助幫助”按鈕）。按鈕）。n VB提供了三種解決方案：提供了三種解決方案：系統(tǒng)預(yù)定義的對(duì)話框（系統(tǒng)預(yù)定義的對(duì)話框（InputBox和和MsgBox）用戶自定義對(duì)話框用戶自定義對(duì)話框通用對(duì)話框控件。通用對(duì)話框控件。概述：概述：用戶用戶對(duì)話框?qū)υ捒?（一）（一）由普通窗體創(chuàng)建由普通窗體創(chuàng)建用戶對(duì)話框用戶對(duì)話框?qū)υ捒?/p>

2、窗體與一般窗體在外觀上是有區(qū)別的，需要對(duì)話框窗體與一般窗體在外觀上是有區(qū)別的，需要通過(guò)設(shè)置屬性值來(lái)自定義窗體外觀。通過(guò)設(shè)置屬性值來(lái)自定義窗體外觀。1BorderStyle屬性屬性窗體的窗體的BorderStyle屬性值設(shè)置為屬性值設(shè)置為 3（VbFixedDoubleialog） 2ControlBox屬性屬性屬性值為屬性值為T(mén)rue時(shí)窗體顯示控制菜單框，為時(shí)窗體顯示控制菜單框，為False時(shí)不時(shí)不顯示。顯示。 第六章 對(duì)話框和菜單（二）（二）使用對(duì)話框模板窗體創(chuàng)建對(duì)話框使用對(duì)話框模板窗體創(chuàng)建對(duì)話框n Visual Basic6.0系統(tǒng)提供了多種不同類的系統(tǒng)提供了多種不同類的“對(duì)話框?qū)υ捒颉蹦?/p>

3、板窗模板窗體，通過(guò)體，通過(guò)“工程工程”菜單中的菜單中的“添加窗體添加窗體”命令，即可打開(kāi)命令，即可打開(kāi)“添加窗體添加窗體”對(duì)話框。對(duì)話框。用戶可以選擇的對(duì)用戶可以選擇的對(duì)話框有：話框有：“關(guān)于關(guān)于”對(duì)話框、對(duì)話框、對(duì)話框、對(duì)話框、登錄對(duì)話框、日積登錄對(duì)話框、日積月累、月累、ODBC登錄、登錄、選項(xiàng)對(duì)話框選項(xiàng)對(duì)話框6類類等。等。第六章 對(duì)話框和菜單1顯示自定義對(duì)話框顯示自定義對(duì)話框可使用窗體對(duì)象的可使用窗體對(duì)象的Show方法顯示自定義對(duì)話框方法顯示自定義對(duì)話框 （1）模式對(duì)話框）模式對(duì)話框 模式對(duì)話框在焦點(diǎn)可以切換到其它窗體或?qū)υ捒蛑耙竽Ｊ綄?duì)話框在焦點(diǎn)可以切換到其它窗體或?qū)υ捒蛑耙笥脩舯?/p>

4、須作出響應(yīng)以關(guān)閉對(duì)話框，如單擊用戶必須作出響應(yīng)以關(guān)閉對(duì)話框，如單擊“確定確定”按鈕、按鈕、“取消取消”按鈕或者直接單擊按鈕或者直接單擊“關(guān)閉關(guān)閉”按鈕。按鈕。其顯示方法為：其顯示方法為：窗體名窗體名. Show vbModal（其中（其中vbModal是系統(tǒng)常數(shù)，值為是系統(tǒng)常數(shù)，值為1）（2）無(wú)模式對(duì)話框）無(wú)模式對(duì)話框無(wú)模式對(duì)話框的焦點(diǎn)可以自由切換到其它窗體或?qū)υ捒?，而無(wú)模式對(duì)話框的焦點(diǎn)可以自由切換到其它窗體或?qū)υ捒?，而無(wú)需用戶關(guān)閉當(dāng)前對(duì)話框，其顯示方法為：窗體名無(wú)需用戶關(guān)閉當(dāng)前對(duì)話框，其顯示方法為：窗體名. Show。 （二）（二）使用對(duì)話框模板窗體創(chuàng)建對(duì)話框使用對(duì)話框模板窗體創(chuàng)建對(duì)話框2關(guān)

5、閉自定義對(duì)話框關(guān)閉自定義對(duì)話框可使用可使用Hide方法或方法或UnLoad語(yǔ)句來(lái)關(guān)閉自定義對(duì)話框，其格語(yǔ)句來(lái)關(guān)閉自定義對(duì)話框，其格式為：式為： Me.Hide 或或 .HideUnLoad 例例: 右圖是一個(gè)使用對(duì)右圖是一個(gè)使用對(duì)話框模板的登錄對(duì)話框話框模板的登錄對(duì)話框（二）使用對(duì)話框模板窗體創(chuàng)建對(duì)話框（二）使用對(duì)話框模板窗體創(chuàng)建對(duì)話框三、通用對(duì)話框(CommonDialog)n 通用對(duì)話框添加到工具箱通用對(duì)話框添加到工具箱（一）通用對(duì)話框的基本屬性和方法（一）通用對(duì)話框的基本屬性和方法n 通用對(duì)話框可以提供通用對(duì)話框可以提供6種種形式的對(duì)話框，通過(guò)設(shè)置形式的對(duì)話框，通過(guò)設(shè)置Action屬性屬

6、性值或調(diào)用值或調(diào)用Show方法方法來(lái)建立不同類型的對(duì)話框。如下表：來(lái)建立不同類型的對(duì)話框。如下表：工程工程/部件部件 選定部選定部件標(biāo)簽件標(biāo)簽選定選定Microsoft CommDialog Control 6.0確定確定通通用用對(duì)對(duì)話話框框的的類類型型 Action 方方法法 打打開(kāi)開(kāi)(Open) 1 ShowOpen 另另存存為為(Save As) 2 ShowSave 顏顏色色(Color) 3 ShowColor 字字體體(Font) 4 ShowFont 打打印印機(jī)機(jī)(Printer) 5 ShowPrinter 幫幫助助(Help) 6 ShowHelp 1.屬性屬性Action屬

7、性屬性：數(shù)值型，決定打開(kāi)何種類型的對(duì)話框（見(jiàn)上表）：數(shù)值型，決定打開(kāi)何種類型的對(duì)話框（見(jiàn)上表）DialogTiltle屬性屬性：通用對(duì)話框標(biāo)題。：通用對(duì)話框標(biāo)題。CancelError屬性屬性：邏輯型值，表示用戶在與對(duì)話框進(jìn)行信息交換時(shí)，：邏輯型值，表示用戶在與對(duì)話框進(jìn)行信息交換時(shí)，按下按下“取消取消”按鈕時(shí)是否產(chǎn)生出錯(cuò)信息。按鈕時(shí)是否產(chǎn)生出錯(cuò)信息。True：選擇：選擇“取消取消”按按鈕，出現(xiàn)錯(cuò)誤警告；鈕，出現(xiàn)錯(cuò)誤警告； Err置為置為32755 (cdlCancel) ；False(缺缺省省)：選擇：選擇“取消取消”按鈕，沒(méi)有錯(cuò)誤警告。按鈕，沒(méi)有錯(cuò)誤警告。Flags屬性屬性：用于修改每個(gè)具體

8、對(duì)話框的默認(rèn)值。：用于修改每個(gè)具體對(duì)話框的默認(rèn)值。2. 通用對(duì)話框的方法通用對(duì)話框的方法見(jiàn)上表見(jiàn)上表 （一）通用對(duì)話框的基本屬性和方法（一）通用對(duì)話框的基本屬性和方法屬性屬性 1. FileName(文件名稱）屬性文件名稱）屬性：在程序中可用該屬性值設(shè)置或返回用：在程序中可用該屬性值設(shè)置或返回用戶所選定的文件名（包含路徑）。戶所選定的文件名（包含路徑）。 2. FileTitle（文件標(biāo)題）屬性（文件標(biāo)題）屬性：設(shè)計(jì)時(shí)無(wú)效，在程序中為只讀，返回：設(shè)計(jì)時(shí)無(wú)效，在程序中為只讀，返回用戶所選定的文件名（不包含路徑）。用戶所選定的文件名（不包含路徑）。（二） “打開(kāi)”/“另存為”對(duì)話框DialogTi

9、ltleFileName InitDirFilterFilterIndexDefaultExt 3. Filter（過(guò)濾器）屬性（過(guò)濾器）屬性：確定文件列表框中所顯示文件的類：確定文件列表框中所顯示文件的類型，該屬性的值顯示在型，該屬性的值顯示在“文件類型文件類型”列表框中。如設(shè)置其值為：列表框中。如設(shè)置其值為：Documents(*.DOC)|*.DOC|Text Files(*.TXT)|*.txt|All Files|(*.*)則在則在“文件類型文件類型”列表框顯示下列三種文件類型以供用戶選擇列表框顯示下列三種文件類型以供用戶選擇 Documents(*.DOC) 擴(kuò)展名為擴(kuò)展名為DOC

10、的的Word文件文件 Text Files(*.TXT) 擴(kuò)展名為擴(kuò)展名為T(mén)XT的文本文件的文本文件 All Files|(*.*) 所有文件所有文件（二） “打開(kāi)”/“另存為”對(duì)話框?qū)傩詫傩?. FilterIndex（過(guò)濾器索引）屬性（過(guò)濾器索引）屬性：為整型值，表示用戶在文：為整型值，表示用戶在文件類型列表框選定了第幾組文件類型。件類型列表框選定了第幾組文件類型。5. InitDir（初始化路徑）屬性（初始化路徑）屬性：該屬性用來(lái)指定：該屬性用來(lái)指定打開(kāi)對(duì)話框中的初始目錄，若不設(shè)置，系統(tǒng)則打開(kāi)對(duì)話框中的初始目錄，若不設(shè)置，系統(tǒng)則默認(rèn)為默認(rèn)為“C:My Documents”。6. Defa

11、ultExt屬性屬性：字符型，用于確定保存文件：字符型，用于確定保存文件的缺省擴(kuò)展名。的缺省擴(kuò)展名。7. CancelError屬性屬性：邏輯型值，表示用戶在與對(duì)：邏輯型值，表示用戶在與對(duì)話框進(jìn)行信息交換時(shí)，按下話框進(jìn)行信息交換時(shí)，按下“ “取消取消” ”按鈕時(shí)是否按鈕時(shí)是否產(chǎn)生出錯(cuò)信息產(chǎn)生出錯(cuò)信息。 （二） “打開(kāi)”/“另存為”對(duì)話框?qū)傩詫傩?. Flags（標(biāo)志）屬性（標(biāo)志）屬性: 用于設(shè)置對(duì)話框的一些選項(xiàng)，用于設(shè)置對(duì)話框的一些選項(xiàng)，數(shù)據(jù)類數(shù)據(jù)類型為型為 Long。（二） “打開(kāi)”/“另存為”對(duì)話框重要屬性重要屬性Color：用來(lái)返回或：用來(lái)返回或設(shè)置選定的顏色。設(shè)置選定的顏色。 （三）（

12、三）“顏色顏色”對(duì)話框?qū)υ捒蝾伾珜?duì)話框是當(dāng)顏色對(duì)話框是當(dāng)Action值為值為3時(shí)的通用對(duì)話框，如下圖。時(shí)的通用對(duì)話框，如下圖。 字體對(duì)話框是字體對(duì)話框是Action為為4時(shí)的通用對(duì)話框，如下圖所時(shí)的通用對(duì)話框，如下圖所示，提供用戶選擇字體、字號(hào)及字體樣式等。示，提供用戶選擇字體、字號(hào)及字體樣式等。 FontName FontBold、FontItalic FontSizeFontStrikethruFontUnderline ColorMin、Max（四）（四） “ “字體字體”對(duì)話框?qū)υ捒?字體對(duì)話框字體對(duì)話框重要的屬性重要的屬性見(jiàn)右圖。見(jiàn)右圖。屬性：屬性：Flags屬性：屬性：設(shè)置所顯示的

13、字體類型設(shè)置所顯示的字體類型。 注意注意 在顯示在顯示“字體字體”對(duì)話框前，必須先將對(duì)話框前，必須先將 Flags 屬性設(shè)屬性設(shè)置為置為 cdlCFScreenFonts，cdlCFPrinterFonts，或，或cdcdlCFBoth。否則，會(huì)發(fā)生字體不存在的錯(cuò)誤。否則，會(huì)發(fā)生字體不存在的錯(cuò)誤。（四）（四） “字體字體”對(duì)話框?qū)υ捒?Flags屬性應(yīng)取下列值：屬性應(yīng)取下列值：cdlCFScreenFonts&H1 屏幕字體屏幕字體 cdlCFPrinterFonts&H2 打印機(jī)字體打印機(jī)字體 cdlCFBoth&H3 打印機(jī)字體和屏幕字體打印機(jī)字體和屏幕字體 cdl

14、CFEffects &H100 顯示刪除線和下劃線檢查顯示刪除線和下劃線檢查 框以及顏色組合框框以及顏色組合框（五）（五） “ “打印打印”對(duì)話框?qū)υ捒虼蛴?duì)話框是當(dāng)打印對(duì)話框是當(dāng)Action為為5時(shí)的通用時(shí)的通用對(duì)話框，是一個(gè)標(biāo)準(zhǔn)打印對(duì)話窗口界對(duì)話框，是一個(gè)標(biāo)準(zhǔn)打印對(duì)話窗口界面，如右圖。面，如右圖。屬性屬性FromPage：整型，起始頁(yè)號(hào)整型，起始頁(yè)號(hào)Topage：整型，終止頁(yè)號(hào)整型，終止頁(yè)號(hào)Copies：整型，打印份數(shù)整型，打印份數(shù) 如果打印驅(qū)動(dòng)程序不支持多份如果打印驅(qū)動(dòng)程序不支持多份 打印，打印，該屬性有可能始終返回該屬性有可能始終返回 1。 FromPage TopageCop

15、ies 注意：打印對(duì)話框本身不能處理打印工作，僅僅是一個(gè)供用戶選注意：打印對(duì)話框本身不能處理打印工作，僅僅是一個(gè)供用戶選擇打印參數(shù)的界面，所選參數(shù)存于各屬性中，再通過(guò)編程來(lái)處理打擇打印參數(shù)的界面，所選參數(shù)存于各屬性中，再通過(guò)編程來(lái)處理打印操作。印操作。 幫助對(duì)話框是當(dāng)幫助對(duì)話框是當(dāng)Action為為6時(shí)的對(duì)話框，是一個(gè)標(biāo)準(zhǔn)時(shí)的對(duì)話框，是一個(gè)標(biāo)準(zhǔn)的對(duì)話窗口用于制作應(yīng)用程序的在線幫助。它不能的對(duì)話窗口用于制作應(yīng)用程序的在線幫助。它不能制作應(yīng)用程序的幫助文件，只能將已制作好的幫助制作應(yīng)用程序的幫助文件，只能將已制作好的幫助文件從磁盤(pán)中讀出，并與界面連接起來(lái)，達(dá)到顯示文件從磁盤(pán)中讀出，并與界面連接起來(lái)，

16、達(dá)到顯示并檢索幫助信息的目的。并檢索幫助信息的目的。 幫助文件需要用其它的工具制作，如幫助文件需要用其它的工具制作，如 Microsoft Windows Help Compiler。（六）（六） “ “幫助幫助”對(duì)話框?qū)υ捒?（六） “幫助”對(duì)話框 屬性屬性1 HelpCommand（幫助命令）屬性（幫助命令）屬性：用于返回：用于返回或設(shè)置需要的在線或設(shè)置需要的在線Help幫助類型。幫助類型。2 HelpFile（幫助文件）屬性（幫助文件）屬性：用于指定已制作：用于指定已制作好的幫助文件的路徑及文件名好的幫助文件的路徑及文件名3HelpKey（幫助關(guān)鍵字）屬性（幫助關(guān)鍵字）屬性：用于指定幫助

17、：用于指定幫助信息的內(nèi)容，幫助窗口中顯示由該幫助關(guān)鍵字指信息的內(nèi)容，幫助窗口中顯示由該幫助關(guān)鍵字指定的幫助信息。定的幫助信息。4 HelpContext（幫助上下文）屬性（幫助上下文）屬性：四、菜單設(shè)計(jì)四、菜單設(shè)計(jì)（一）（一） 概述概述 菜單是圖形化界面一個(gè)必不可少的組成元素，菜單是圖形化界面一個(gè)必不可少的組成元素，通過(guò)菜單對(duì)各種命令按功能進(jìn)行分組，使用戶通過(guò)菜單對(duì)各種命令按功能進(jìn)行分組，使用戶能夠更加方便、直觀地訪問(wèn)這些命令。能夠更加方便、直觀地訪問(wèn)這些命令。Windows環(huán)境下的應(yīng)用程序一般為用戶提供三環(huán)境下的應(yīng)用程序一般為用戶提供三種菜單：種菜單：窗體控制菜單窗體控制菜單下拉式菜單下拉式

18、菜單彈出式（快捷）菜單彈出式（快捷）菜單 啟動(dòng)菜單編輯器：?jiǎn)?dòng)菜單編輯器：有三種方法有三種方法 1 單擊工具欄菜單圖標(biāo)單擊工具欄菜單圖標(biāo) 2 工具工具/菜單編輯器菜單編輯器 (CTRL+E) 3 窗體上快捷菜單窗體上快捷菜單 菜單編輯器菜單編輯器 菜單編輯器操作界面如菜單編輯器操作界面如右所示。右所示。（二）（二） 菜單編輯器菜單編輯器 （二）（二） 菜單編輯器菜單編輯器1. 標(biāo)題標(biāo)題(Caption)：2. 名稱名稱(Name)：3. 快捷鍵快捷鍵(Shortcut)：4. 下一個(gè)下一個(gè)(Next)：5. 和和按鈕按鈕6. 插入插入(Insert)按鈕：按鈕：7. 刪除刪除(Delete)按

19、鈕：按鈕：8 和和按鈕：按鈕：9. 復(fù)選復(fù)選(Checked)檢查框：檢查框：10. 有效有效(Enabled)檢查框：檢查框：11. 顯示窗口列表顯示窗口列表(Window List)檢查框：檢查框： 根據(jù)設(shè)計(jì)要求，依次輸入或選擇所需項(xiàng)目，即可完成。根據(jù)設(shè)計(jì)要求，依次輸入或選擇所需項(xiàng)目，即可完成。 菜單的主要屬性：菜單的主要屬性：1. 標(biāo)題標(biāo)題(Caption)：在窗口上顯示，例如：輸入：在窗口上顯示，例如：輸入&File，顯，顯示為：示為： File，熱鍵：，熱鍵：Alt+F 2. 名稱名稱(Name)：菜單項(xiàng)的名稱，分界符也應(yīng)有名稱。：菜單項(xiàng)的名稱，分界符也應(yīng)有名稱。3. 快捷鍵

20、快捷鍵(Shortcut)：下拉列表框：下拉列表框4. 下一個(gè)下一個(gè)(Next)：設(shè)置下一個(gè)菜單項(xiàng)。：設(shè)置下一個(gè)菜單項(xiàng)。5. 和和按鈕按鈕：“” 下一級(jí)菜單項(xiàng)；下一級(jí)菜單項(xiàng)；“”上一級(jí)菜單上一級(jí)菜單項(xiàng)。項(xiàng)。6. 插入插入(Insert)按鈕按鈕：插入菜單項(xiàng)：插入菜單項(xiàng)四、菜單設(shè)計(jì)四、菜單設(shè)計(jì)7. 刪除刪除(Delete)按鈕按鈕：刪除菜單項(xiàng)：刪除菜單項(xiàng)8. 和和按鈕按鈕：改變菜單項(xiàng)位置。改變菜單項(xiàng)位置。9. 復(fù)選復(fù)選(Checked)檢查框檢查框：菜單項(xiàng)為選定項(xiàng)。：菜單項(xiàng)為選定項(xiàng)。10. 有效有效(Enabled)檢查框檢查框：True：菜單項(xiàng)可選；：菜單項(xiàng)可選；False：不可選。不可選。1

21、1. 顯示窗口列表顯示窗口列表(Window List)檢查框檢查框：決定是否顯示所有打開(kāi)的子窗體標(biāo)題。決定是否顯示所有打開(kāi)的子窗體標(biāo)題。對(duì)對(duì)MDI窗體和窗體和MDI子窗體有效，對(duì)普通窗體無(wú)效。子窗體有效，對(duì)普通窗體無(wú)效。四、菜單設(shè)計(jì)1設(shè)計(jì)下拉菜單設(shè)計(jì)下拉菜單2設(shè)計(jì)子菜單或改變子菜單級(jí)別設(shè)計(jì)子菜單或改變子菜單級(jí)別 3為菜單項(xiàng)分組，菜單名用減號(hào)為菜單項(xiàng)分組，菜單名用減號(hào)“-”。4為菜單項(xiàng)指定訪問(wèn)鍵和快捷鍵與命令按鈕設(shè)置訪問(wèn)鍵為菜單項(xiàng)指定訪問(wèn)鍵和快捷鍵與命令按鈕設(shè)置訪問(wèn)鍵相同。相同。5為菜單項(xiàng)加上復(fù)選標(biāo)記為菜單項(xiàng)加上復(fù)選標(biāo)記6禁止使用菜單項(xiàng)，在程序代碼中可以通過(guò)程序代碼：禁止使用菜單項(xiàng)，在程序代碼

22、中可以通過(guò)程序代碼： 菜單名菜單名.Enabled=False7菜單項(xiàng)的增減菜單項(xiàng)的增減 菜單設(shè)計(jì)的幾項(xiàng)操作：菜單設(shè)計(jì)的幾項(xiàng)操作：四、菜單設(shè)計(jì)四、菜單設(shè)計(jì)（1）設(shè)計(jì)一個(gè)如圖所示的菜單，各菜單項(xiàng)的屬性）設(shè)計(jì)一個(gè)如圖所示的菜單，各菜單項(xiàng)的屬性設(shè)置如表所示，要求實(shí)現(xiàn)如菜單標(biāo)題所示功能，所有設(shè)置如表所示，要求實(shí)現(xiàn)如菜單標(biāo)題所示功能，所有圖形用一個(gè)形狀控件（圖形用一個(gè)形狀控件（Shape1）來(lái)實(shí)現(xiàn)。）來(lái)實(shí)現(xiàn)。菜單名菜單名稱稱菜單分類菜單分類菜單標(biāo)題菜單標(biāo)題菜單名菜單名稱稱菜單分類菜單分類菜單標(biāo)題菜單標(biāo)題a主菜單主菜單1基本圖形基本圖形b主菜單主菜單2填充方式填充方式(&T)a1一級(jí)子菜單一級(jí)子菜單正方形正方形b1一級(jí)子菜單一級(jí)子菜單水平線水平線a2一級(jí)子菜單一級(jí)子菜單圓圓b2一級(jí)子菜單一級(jí)子菜單豎直線豎直線c主菜單主菜單3退出退出(&E)（2）程序設(shè)計(jì)界面如圖所示，要求：?jiǎn)螕舫绦蛟O(shè)計(jì)界面如圖所示，要求：?jiǎn)螕簟白笠谱笠啤辈藛尾藛魏?，?biāo)簽以每后，標(biāo)簽以每100毫秒毫秒100個(gè)單位的速度向左移動(dòng)，當(dāng)標(biāo)簽的左個(gè)單位的