计算机程式Visual BASIC 程式设计

1、計算機程式Visual BASIC 程式設計四海工商專校 電算中心E-Mail: 1Chapter 7 VB功能表1. 一般功能表2. 快顯功能表3. 工具列21. 功能表的建立功能表編輯器建立新的功能表在現有的功能表上新增指令項目用自己的指令來取代現有的功能表指令修改或刪除現有的功能表開啟功能表編輯器工具/功能表編輯器工具列 /功能表編輯器按鈕3功能表編輯器的屬性Name(名稱) :功能表控制項的名稱Caption(標題) :出現在功能表控制項上的文字Caption 屬性設為減號字元（-）:表示一個分隔線分隔線可把功能表項目劃分成若干個組別4功能表控制項功能表標題:位於清單方塊中左側平齊的功

2、能表控制項功能表項目:被縮排一次的功能表控制項次功能表標題:縮排一次的功能表控制項後面，還緊跟著再次縮排的一些功能表控制項次功能表控制項在次功能表標題之下縮排的各個功能表控制項，就成為該次功能表的項目5功能表項的分隔以一條水平線隔開功能表中不同性質的控制項無法作為分隔線:功能表標題帶有次功能表控制項被核取、或暫止具有快速鍵，那麼就6對應鍵使用方法:使用 ALT 鍵+對應鍵字元開啟一功能表功能表開啟之後，按下對應鍵字元選取控制項。例如:ALT + E 鍵開啟編輯功能表再 P 鍵可選取貼上功能表項在功能表控制項的標題中，帶底線的字母就是對應鍵字元7快速鍵使用快速鍵時，程式會立刻執行一個功能表控制項

3、目的功能快速鍵的指定:功能鍵與控制鍵的組合如 CTRL + F1 或 CTRL + A快速鍵會出現在功能表中相應功能表項的右邊8功能表標題準則(Caption 屬性的設定)同一功能表中應當是唯一不同功能表中相似功能項目，仍可用相同名稱簡短的名詞或數個名詞的組合每個項目應有一個唯一的對應鍵字元通常使用功能表標題的英文名稱的第一個字母，兩個功能表標題無法用同一個對應字元項目名稱儘量簡短9功能表命名準則功能表控制項字首 : mnu最上層功能表名稱如 mnuFile次功能表命名在上層名稱後再緊跟著次功能表的標題如 mnu10建立次功能表每個功能表可以包含最多五層的次功能表次功能表會在上層功能表旁邊另外

4、產生出一個功能表，以顯示它自己的功能表項目需要使用到次功能表場合有：功能表列已滿較少被使用的特殊功能要突顯出某一功能表控制項與其上層功能表項目的相依性11功能表控制項陣列 (Index 屬性)同一功能表上功能表控制項組成的一個集合物件共用相同名稱和事件程序索引值功能表編輯器裏的 Index 屬性當某控制項陣列成員發生某個事件時，將其 Index 屬性值做為一個引數傳遞給事件程序事件程序內檢查 Index 屬性值以判斷是那個元件的事件。12核取記號 (Checked 屬性)使用 Checked 屬性顯示一個核取記號在功能表上告訴使用者某種開關的狀態指示正在使用的工作模式功能表編輯器中 /可核取執

5、行階段 :從程式碼中設定 Checked 屬性Private Sub mnuOptions_Click（）根據 Visible 屬性設定核取記號的狀態。mnuOptionsToolbar.Checked = picToolbar.VisibleEnd Sub13隱藏功能表控制項 (Visible 屬性)設計階段 : 選取可看見核取方塊等於設定了功能表控制項的 Visible 屬性的初始執行階段 : 從程式碼中設定其 Visible 屬性mnu（0）.Visible = True 顯示控制項mnu（0）.Visible = False 隱藏控制項14隱藏功能表控制項隱藏功能表控制項同一功能表中的

6、其它控制項自動往上移隱藏功能表列上的控制項功能表列上其餘控制項往左移以填補該空間控制項暫時失效透過功能表、對應鍵或快速鍵都暫時無法存取隱藏功能表標題，該功能表標題所屬控制項均無效15為功能表控制項撰寫程式碼Click 事件 :所有功能表控制項除了分隔線除了暫止的或隱藏的功能表控制項Sub mnu（）Unload MeEnd Sub162. 快顯功能表是獨立於功能表列之外的浮動式功能表滑鼠右鍵來啟動又稱內容功能表所顯示出來的項目，依使用者按下滑鼠右鍵時滑鼠的位置而定執行階段，只要是含有一個以上功能表控制項的任何功能表，都可以作為快顯功能表17PopupMenu 方法語法:object.Popup

7、Menu menuname , flags ,x , y , boldcommand Private Sub Form_MouseUp （Button As Integer, Shift As _Integer, X As Single, Y As Single）If Button = 2 Then 檢查使用者是否按下滑鼠右鍵。PopupMenu mnuFile 把檔案功能表顯示為一個快顯功能表。End IfEnd Sub快顯功能表的作用會持續到有一項功能被選取了，或者是使用者取消了這個功能表的時後，程式才會繼續執行 PopupMenu 敘述之後的程式碼18Flags 引數位置常數vbPopu

8、pMenuLeftAlign 預設值。指定的 x 座標定義了該快顯功能表的左邊界vbPopupMenuCenterAlign 快顯功能表以指定的 x 座標為中心vbPopupMenuRightAlign 指定的 x 座標定義了該快顯功能表的右邊界行為常數vbPopupMenuLeftButton預設值。只有當使用者在某個功能表項目上按一下滑鼠左鍵時，才顯示快顯功能表vbPopupMenuRightButton不管使用者用在某個功能表項目上，按一下滑鼠右鍵或者左鍵，都會顯示快顯功能表指定旗標的方式從各組中選取一個常數，再用 Or 運算子將它們連起來19ExamplePrivate Sub Command1_Click （） X 變數和 Y 變數Dim xloc, yloc設定 X 變數和 Y 變數到表單中心xloc = ScaleWidth / 2yloc = ScaleHeight / 2顯示快顯功能表PopupMenu mnuEdi