1、VB程序設(shè)計(jì)(chn x sh j)共二十一頁2第9章 界面設(shè)計(jì)9.1 通用對(duì)話框9.2 菜單設(shè)計(jì)(shj)9.3 多文檔界面（自學(xué)）9.4 工具欄和狀態(tài)欄（自學(xué)）共二十一頁39.1 通用(tngyng)對(duì)話框ActiveX控件；提供(tgng)了6種標(biāo)準(zhǔn)對(duì)話框。將通用對(duì)話框加載到工具箱的步驟：(1) “工程”+“部件”，引導(dǎo)出“部件”對(duì)話框；(2) 在控件選項(xiàng)卡中選擇“Microsoft Common Dialog Control 6.0”左側(cè)的復(fù)選框，然后單擊“確定”。共二十一頁4“打開”對(duì)話框“另存為”對(duì)話框“顏色”對(duì)話框“字體”對(duì)話框“打印機(jī)”對(duì)話框共二十一頁5Action(功能)屬性

2、(shxng): 0None：無對(duì)話框顯示 1Open：顯示“打開”對(duì)話框 2Save As：顯示“另存為”對(duì)話框 3Color：顯示“顏色”對(duì)話框 4Font：顯示“字體”對(duì)話框 5Printer：顯示“打印機(jī)”對(duì)話框 6Help：顯示“幫助”對(duì)話框 重要(zhngyo)屬性：該屬性只能在程序中設(shè)置ShowOpenShowSaveShowColorShowFontShowPrinterShowHelp對(duì)應(yīng)的方法：共二十一頁6 例如：使用通用(tngyng)對(duì)話框?qū)?yīng)的顏色對(duì)話框設(shè)置文本框的前景色，代碼如下： CommonDialog1.Action = 3 Text1.ForeColor=C

3、ommonDialog1.Color end of 9.19.1 通用(tngyng)對(duì)話框共二十一頁79.2 菜單(ci dn)設(shè)計(jì)菜單以分組的形式組織(zzh)多個(gè)命令或操作；為操作提供便捷的手段；菜單分為兩種：下拉式菜單彈出式菜單菜單也是一個(gè)控件對(duì)象，稱菜單控件，只響應(yīng)Click事件。共二十一頁89.2.1 下拉式菜單(ci dn)9.2.1.1 下拉式菜單的基本(jbn)組成共二十一頁9啟動(dòng)方法（有三種）：(1)窗體上單擊右鍵快顯菜單(ci dn)菜單(ci dn)編輯器(2)工具菜單編輯器 (3)工具欄 菜單9.2.1 下拉式菜單(ci dn)9.2.1.2 菜單編輯器創(chuàng)建菜單的工具

4、共二十一頁10編輯區(qū) 屬性區(qū)菜單項(xiàng)顯示區(qū)共二十一頁11標(biāo)題(biot)：顯示菜單項(xiàng)的文本；重要(zhngyo)屬性：名稱：必要屬性，菜單項(xiàng)的名字。標(biāo)題為：文件(&F)，表示F是熱鍵字母， 用“ALT+F”可選擇該菜單。快捷鍵：按下快捷鍵等同于執(zhí)行該菜單項(xiàng)。注意區(qū)分熱鍵和快捷鍵！共二十一頁12 在設(shè)計(jì)(shj)時(shí)，為將菜單分成若干組，可使用分隔條：“標(biāo)題”文本框：“-”；“名稱”文本框：不能空白！有關(guān)(yugun)分隔條：共二十一頁13例9-2：建立一個(gè)菜單，能做簡(jiǎn)單的加、減、乘、除以及清除(qngch)工作。每一個(gè)命令都有快捷鍵。步驟：1.建立控件2.設(shè)計(jì)(shj)菜單3.代碼設(shè)計(jì)共二十一頁1

5、4 利用菜單編輯器所創(chuàng)建的菜單是固定的，菜單項(xiàng)不能自動(dòng)增減(zn jin)。 要實(shí)現(xiàn)自動(dòng)增減，可利用菜單項(xiàng)數(shù)組，并結(jié)合Load和Unload語句。菜單編輯器中索引(suyn)屬性要設(shè)置！共二十一頁159.2.2 彈出式菜單(ci dn)系統(tǒng)彈出式菜單定制彈出式菜單步驟(bzhu)：(1)使用“菜單編輯器”創(chuàng)建菜單；(2)把菜單的Visible屬性設(shè)為False，即不出現(xiàn)窗體頂部；(3)使用PopupMenu方法。Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)If

6、Button=2 Then PopupMenu mnu1, 2End Sub共二十一頁169.2.2 彈出式菜單(ci dn)(快顯菜單)方法(fngf):先用VB菜單編輯器設(shè)計(jì)，再用 PopupMenu方法彈出對(duì)象名.PopupMenu 菜單名,標(biāo)志,x,y共二十一頁179.2.2 彈出式菜單(ci dn)(快顯菜單)對(duì)象名.PopupMenu 菜單(ci dn)名,標(biāo)志,x,y標(biāo)志：0：彈出式菜單項(xiàng)僅識(shí)別鼠標(biāo)左鍵 對(duì)菜單項(xiàng)的選擇。 2：彈出式菜單項(xiàng)識(shí)別鼠標(biāo)左鍵和 右鍵對(duì)菜單項(xiàng)的選擇； PopupMenu方法只能用在MouseDown事件過程。共二十一頁18 把例9-2中的“乘除(chngc

7、h)運(yùn)算” 菜單作為快顯菜單顯示出來。(MouseDown詳見214頁)9.2.2 彈出式菜單(ci dn)(快顯菜單)共二十一頁19Sub Form_MouseDown(Button As Integer, _ Shift As Integer, X As Single, Y As Single) If Button = 2 Then 單擊右鍵 PopupMenu mnuMulDiv , 2 End IfEnd Sub 9.2.2 彈出式菜單(ci dn)(快顯菜單)共二十一頁20 本 章 總 結(jié) 要掌握通過使用菜單編輯器在應(yīng)用程序中設(shè)計(jì)(shj)下拉式菜單、彈出式菜單菜單的方法。共二十一頁內(nèi)容摘要VB程序設(shè)計(jì)。(1) “工程”+“部件(bjin)”，引導(dǎo)出“部件(bjin)”對(duì)話框。0None：無對(duì)話框顯示。2Save As：顯示“另存為”對(duì)話框。6Help：顯示“幫助”對(duì)話框。CommonDialog1.Action = 3。Text1.ForeColor=CommonDialog1.Color。9.2.1.1 下拉式菜單的基本組成。(1)窗體上單擊右鍵快顯菜單菜單編輯器