1、第十章 界面設計教學目的及要求：掌握菜單的設計、對話框的使用、MDI界面。重點與難點：1 掌握下拉式菜單、彈出式菜單的設計方法2 掌握設計自定義對話框及對話框之間的調用主要外語詞匯：menu、popupmenu、commondialog授課內容：第一節 菜單設計與應用菜單（Menu）的分類：（1）下拉式菜單 （2）彈出式菜單（快捷菜單）VB的菜單系統最多共達6層。VB中的每一個菜單項都可以視為一個控件。菜單控件只接受一個事件，即Click事件。一、菜單編輯器：1、打開方法：（1）工具 -> 菜單編輯器 （2）工具欄 -> 菜單編輯器（3）Ctrl+E （4）窗體（右鍵）->

2、菜單編輯器2、菜單編輯器共分三個區：屬性設置區、編輯區、菜單項列表區。（1）標題：相當于菜單控件的Caption屬性。 熱鍵：&字符，運行時訪問字符會自動加上一條下劃線，“&”字符則不可見。 打開：Alt+字符 只有主菜單項才有熱鍵的設置。另外，CommandButton的Caption屬性。（2）名稱：相當于菜單控件的Name屬性，一般以mnu作為前綴，不能為空。（3）索引：設置菜單項控件數組的下標。 若不是控件數組，則不用設置Index值。 Index值可以從任意值開始。 注：菜單項控件數組索引必須為升序。（4）快捷鍵：列表框中是供用戶選擇的快捷鍵。例：文件(F) 打開(O

3、) Ctrl+O主菜單：Alt+F子菜單：（1）在顯示出菜單的情況下，直接按字母“O” （2）直接按Ctrl+O（5）復選：是否加上復選標記（默認為未選定）。注：不能在頂層菜單項和含有下層級聯菜單的菜單項中加快捷鍵和復選標志。（6）有效：Enabled，是否可用（默認為被選定）。（7）可見：Visible，是否可見（默認為被選定）。（8）內縮符號 <- ->：確定菜單的級別，可以上移或下移一個等級。 頂層菜單不需要內縮符號。（9）下一個 （10）插入：上插 （11）刪除（12）分隔線：標題文本框中鍵入一個“-”。二、下拉式菜單：1、主菜單（頂層菜單）、子菜單2、熱鍵（訪問鍵）、快捷

4、鍵、分隔線3、菜單控件數組：例題10-2：Clipboard是VB提供的剪貼板對象。Text1.SelText：文本框中選中的文本。（1）Clipboard.SetText( )：將括號中的文本送到剪貼板中。（2）Clipboard.GetText( )：返回剪貼板當前的內容。（3）Clipboard.Clear：清空剪貼板中的內容。4、菜單項的增減：利用控件數組，通過代碼的方式實現動態地增減菜單中的菜單項。（1）增加菜單項：Load 控件數組名(索引值)（2）刪除菜單項：UnLoad 控件數組名(索引值)（3）用Load方法不能復制控件數組元素的Top、Left和Visible屬性。（4）L

5、oad只能添加已有控件數組的元素，不能創建控件數組。（5）Unload方法只能刪除用Load添加的元素，不能刪除設計時創建的控件數組元素。三、彈出式菜單（快捷菜單）：1、建立步驟：（1）利用“菜單編輯器”建立菜單設置頂級菜單項為不可見，即不選中菜單編輯器里的“可見”選項。（2）利用PopupMenu方法顯示彈出式菜單。編寫與彈出式菜單相關聯的MouseUp或MouseDown事件過程，其中用到對象的PopupMenu方法。2、格式：對象名. PopupMenu 菜單名,Flags,x,y,BoldCommand對象名：缺省時為當前窗體。菜單名：頂級菜單項的名稱。（1）Flags：位置常數 等效

6、值 說明vbPopupMenuLeftAlign 0 默認值，彈出式菜單左上角位于xvbPopupMenuCenterAlign 4 彈出式菜單的中間位于xvbPopupMenuRightAlign 8 彈出式菜單的右上角位于x行為常數 等效值 說明vbPopupMenuLeftButton 0 默認值，菜單只接受左鍵單擊 vbPopupMenuRightButton 2 菜單可接受左、右鍵單擊在引用時，可以將兩個常數（或等效值）相加或用Or相連。例：64+2vbPopupMenuCenterAlign + 2vbPopupMenuCenterAlign + vbPopupMenuRightB

7、uttonvbPopupMenuCenterAlign Or vbPopupMenuRightButton（2）x、y：彈出式菜單在窗體上顯示的位置。（3）BoldCommand：指定在顯示的彈出式菜單中以粗體出現的菜單項的名稱，只能有一個菜單項被加粗體。第二節 對話框的設計對話框（DialogBox）是應用程序與用戶交互的主要途徑。一、對話框的分類：VB中的對話框分為三種類型：1、預定義對話框（內部對話框）2、自定義對話框3、通用對話框二、對話框的模式：VB中的對話框分為兩種模式：1、模式對話框：在切換到其他窗體或對話框之前，必須先關閉該對話框。注：InputBox和MsgBox對話框是模式

8、對話框。2、無模式對話框：在切換到其他窗體或對話框之前，不需要關閉該對話框。一般很少使用無模式對話框。3、對于自定義的對話框窗體，可以使用窗體的Show方法，來決定對話框窗體的顯示模式。格式：窗體名.Show Style,owner（1）Style：顯示模式：常數 等效值 說明 0 vbModeless 無模式（默認值） 1 vbModal 有模式（2）owner：用來指定窗體的父子關系。4、對話框的特點：（1）無最大化、最小化按鈕 （2）無控制菜單5、對話框屬性的設置：屬性 值 說明BorderStyle 1 固定邊框，不能改變大小，無最大化、最小化按鈕MaxButton False 取消最

9、大化按鈕MinButton False 取消最小化按鈕ControlBox False 取消控制菜單按鈕三、預定義對話框：VB系統自身攜帶，VB提供了兩種預定義對話框，即由InputBox和MsgBox兩個函數調用。四、自定義對話框：創建自定義對話框就是建立一個窗體。用窗體自定義對話框，一般步驟如下：1、向工程添加窗體2、在窗體上創建其他控件對象，定義對話框的外觀3、設置窗體和控件對象的屬性4、在代碼窗口中創建事件過程五、通用對話框（CommonDialog）：通用對話框是一種ActiveX控件。存放在：C:WindowsSystemComdlg32.ocx只有添加到工具箱中，才可以使用Act

10、iveX控件。用戶可以利用通用對話框控件在窗體上創建6種標準對話框：（1）打開（Open） （2）另存為（Save As）（3）顏色（Color） （4）字體（Font）（5）打印機（Printer） （6）幫助（Help）1、添加“通用對話框”到工具箱中：（1）工程 -> 部件 -> 控件標簽 -> Microsoft Common Dialog Control 6.0（2）工具箱(右鍵)-> 部件 -> 控件標簽 -> Microsoft Common Dialog Control 6.0當程序運行時，通用對話框是不可見的。Name：CommandDia

11、logX（X=1,2,3）2、調用“通用對話框”：VB提供了一組方法和一個Action屬性都可用來打開通用對話框。Action屬性的值不能在屬性窗口中設置，只能在程序中賦值。方法 Action 功能showOpen 1 顯示文件打開對話框showSave 2 顯示文件另存為對話框showColor 3 顯示顏色對話框showFont 4 顯示字體對話框showPrinter 5 顯示打印機對話框showHelp 6 顯示Windws幫助對話框例：Private Sub Command1_Click( )CommonDialog1.ShowOpen CommonDialog1.Action=1E

12、nd Sub3、“通用對話框”的屬性：（1）屬性窗口（2）屬性頁：通用對話框（右鍵）-> 屬性頁：打開/另存為、 顏色、字體、打印、幫助4、“打開”對話框：（1）CommonDialog1.ShowOpen（2）CommonDialog1.Action=1DialogTitle：對話框標題FileName：文件名稱，返回用戶選擇的文件名及其路徑FileTitle：文件標題，只返回用戶選擇的文件名DefaultExt：缺省擴展名Filter：過濾器，用于在“文件類型”列表框中顯示要打開的文件類型。如果要打開的文件類型很多，可以用“|”符號將不同文件類型分隔。FilterIndex：過濾器索

13、引值，默認值為1。InitDir：初始化路徑，用來指定“打開”對話框中的初始目錄，若顯示當前目錄，則該屬性不需要設置。5、“另存為”對話框：（1）CommonDialog1.ShowSave（2）CommonDialog1.Action=2 DialogTitle：對話框標題FileName：文件名稱，返回用戶選擇的文件名及其路徑FileTitle：文件標題，只返回用戶選擇的文件名DefaultExt：缺省擴展名Filter：過濾器，用于在“文件類型”列表框中顯示可保存的文件類型。如果可保存的文件類型很多，可以用“|”符號將不同文件類型分隔。FilterIndex：過濾器索引值，默認值為1。I

14、nitDir：初始化路徑，用來指定“另存為”對話框中的初始目錄，若顯示當前目錄，則該屬性不需要設置。6、“顏色”對話框：（1）CommonDialog1.ShowColor（2）CommonDialog1.Action=37、“字體”對話框：（1）CommonDialog1.ShowFont（2）CommonDialog1.Action=4注：在使用ShowFont之前，必須對Flags屬性進行指定。 格式：CommonDialog1.Flags=<值>例：CommonDialog1.Flags=cdlCFBoth Or cdlCFEffectsCommonDialog1.Show

15、Font8、“打印”對話框：（1）CommonDialog1.ShowPrinter（2）CommonDialog1.Action=5Copies：設定打印份數FromPage：設定打印起始頁碼ToPage：設定打印終止頁碼9、“幫助”對話框：（1）CommonDialog1.ShowHelp（2）CommonDialog1.Action=6可以用于制作應用程序的在線幫助。幫助對話框本身不能制作應用程序的幫助文件，只能將制作好了的、保存在磁盤上的幫助文件與“幫助”對話框界面連接起來，達到在線幫助的目的。HelpKey：在幫助窗口中顯示由HelpKey指定的標題幫助信息。注：在實際應用程序中，幫

16、助文件“*.hlp”是需要用戶自己創建的。第三節 多文檔界面（MDI）的創建一、文檔的界面形式：1、SDI：Single_Document Interface，單文檔界面，一次只能打開一個文檔。2、MDI：Multiple_Document Interface，多文檔界面，同時可以打開多個文檔，每個文檔顯示在它自己的窗口中。但當前窗口只有一個，可以用鼠標點擊切換到各文檔窗口。例如：Microsoft Word中，每個子窗口都被限制在Word父窗口的區域之內。當最小化Word時，所有的文檔窗口也被最小化，只有父窗口的圖標顯示在任務欄中。二、MDI界面特性：1、一個應用程序中只能有一個MDI窗體（

17、父窗體），但是可以有多個子窗體。2、想要添加其他控件，必須先添加PictureBox作為其他控件的容器。3、當子窗體最小化時，被放在MDI窗體顯示區的左下角處，而不是放在Windows的任務欄上。4、當子窗體最大化時，它會將MDI窗體的顯示區占滿，并且子窗體的標題欄與MDI窗體的標題欄合并在一起。5、MDI窗體與子窗體可以分別設計自己的菜單。標準窗體不能擁有子窗體。三、含MDI應用程序的創建：1、創建MDI窗體：（1）工程 -> 添加MDI窗體（2）添加窗體（工具欄）-> 添加MDI窗體Name：MDIForm12、建立MDI窗體的子窗體：當把新建或打開的普通窗體的MDIChild屬性設置為True（默認值為