溫馨提示×

溫馨提示×

您好,登錄后才能下訂單哦!

密碼登錄×
登錄注冊×
其他方式登錄
點擊 登錄注冊 即表示同意《億速云用戶服務條款》

VB.NET如何創(chuàng)建菜單項目

發(fā)布時間:2021-12-02 14:24:59 來源:億速云 閱讀:175 作者:小新 欄目:編程語言

這篇文章主要介紹了VB.NET如何創(chuàng)建菜單項目,具有一定借鑒價值,感興趣的朋友可以參考下,希望大家閱讀完這篇文章之后大有收獲,下面讓小編帶著大家一起了解一下。

首先,我們先回顧一些菜單的基礎知識。為了在您的應用軟件中使用菜單,您需要在設計時使用MainMenu組件創(chuàng)建一個主菜單項目,這個MainMenu組件將允許您:創(chuàng)建和添加新菜單和新的菜單欄;使用屬性窗口來改變菜單項目屬性;并為菜單事件創(chuàng)建事件處理器。

在設計時創(chuàng)建VB.NET菜單項目

您可以在表單工具箱中找到MainMenu組件,為了添加MainMenu組件到您的表單上,可以將該控件托拽到表單上或在該控件上用右鍵點擊。

通過MainMenu組件,您可以向VB.NET的Windows表單中快速而簡便地添加菜單,而且顯示在您的表單中的菜單和運行時顯示的是一樣的。當您輸入時,額外的菜單框會在***個菜單項目的右邊出現(xiàn),子菜單也可以按同樣的方式創(chuàng)建。如果要創(chuàng)建一個子菜單,只需要簡單地在您想擴展的菜單項目右邊輸入一個條目。

在運行時操作VB.NET菜單項目

您可以在運行時動態(tài)操作菜單項目,這種動態(tài)操作是必須的,如果您需要對軟件用戶的某一操作做出響應來顯示某一組特殊的菜單。而且,如果用此功能來禁止菜單對錯誤進行響應也是很有用的。您可以選擇在運行時添加、隱藏或者禁止菜單,并可對它們旁邊的復選按鈕做出同樣的選擇。

VB.NET菜單項目操作代碼示例

在列表A中,我創(chuàng)建了三個新的菜單項目,mnuMenuItem1、mnuMenuItem2和mnuMenuItem3,我向MainMenu1菜單中添加了mnuMenuItem1和mnuMenuItem2,并設定mnuMenuItem3作為mnuMenuItem2的子菜單。注意我將mnuMenuItem3的選中屬性(Checked)設為True并在這個項目旁邊放置了一個復選框,我還定義了兩個事件:mnuMenuItem1_Click和mnuMenuItem3_Click,當用戶點擊了菜單之后將顯示一個消息對話框,列表A中的代碼的運行結果應該和圖B看上去相仿。

列表A:

  1. Private Sub Form1_Load()  

  2. Sub Form1_Load(ByVal sender 
    As System.Object, ByVal e 
    As System.EventArgs)   

  3. Handles MyBase.Load SetMenus()   

  4. End Sub   

  5. Private Sub SetMenus()  

  6. Sub SetMenus()   

  7. Dim mnuMenuItem1 As MenuItem, 
    mnuMenuItem2 As MenuItem, 
    mnuMenuItem3 As MenuItem 
    mnuMenuItem1 = New MenuItem
    ("Item 1", New EventHandler
    (AddressOf mnuMenuItem1_Click))   

  8. MainMenu1.MenuItems.Add(mnuMenuItem1)   

  9. mnuMenuItem2 = New MenuItem("Item 2")  

  10. MainMenu1.MenuItems.Add(mnuMenuItem2)   

  11. mnuMenuItem3 = New MenuItem
    ("Item 3", New EventHandler
    (AddressOf mnuMenuItem3_Click))   

  12. mnuMenuItem3.Checked = True 
    mnuMenuItem2.MenuItems.Add
    (mnuMenuItem3)   

  13. End Sub   

  14. Private Sub mnuMenuItem1_Click()  

  15. Sub mnuMenuItem1_Click(ByVal 
    sender As Object, ByVal e As 
    System.EventArgs)   

  16. MessageBox.Show("Menu Item 
    1 Clicked")   

  17. End Sub   

  18. Private Sub mnuMenuItem3_Click()  

  19. Sub mnuMenuItem3_Click(ByVal 
    sender As Object, ByVal e As 
    System.EventArgs)   

  20. MessageBox.Show("Menu 
    Item 3 Clicked")   

  21. End Sub  

感謝你能夠認真閱讀完這篇文章,希望小編分享的“VB.NET如何創(chuàng)建菜單項目”這篇文章對大家有幫助,同時也希望大家多多支持億速云,關注億速云行業(yè)資訊頻道,更多相關知識等著你來學習!

向AI問一下細節(jié)

免責聲明:本站發(fā)布的內(nèi)容(圖片、視頻和文字)以原創(chuàng)、轉載和分享為主,文章觀點不代表本網(wǎng)站立場,如果涉及侵權請聯(lián)系站長郵箱:is@yisu.com進行舉報,并提供相關證據(jù),一經(jīng)查實,將立刻刪除涉嫌侵權內(nèi)容。

AI