Aşağıdaki kodda menü öğeleri içeren bir menü çubuğunun nasıl oluşturulabildiğini gösteren bir örnek verilmiştir.
Vb.Net:
Public Class Form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
'Ana menü çubuğunu tanımlama
Dim mnuBar As New MainMenu()
'Ana menü çubuğu için menü öğelerini tanımlama
Dim menuItemDosya As New MenuItem("&Dosya")
Dim menuItemDuzen As New MenuItem("Düz&en")
Dim menuItemGorunum As New MenuItem("&Görünüm")
Dim menuItemProje As New MenuItem("&Proje")
'Menü öğelerini ana menü çubuğuna ekleme
mnuBar.MenuItems.Add(menuItemDosya)
mnuBar.MenuItems.Add(menuItemDuzen)
mnuBar.MenuItems.Add(menuItemGorunum)
mnuBar.MenuItems.Add(menuItemProje)
'Alt menüleri tanımlama
Dim menuItemYeni As New MenuItem("&Yeni")
Dim menuItemAc As New MenuItem("&Aç")
Dim menuItemKaydet As New MenuItem("&Kaydet")
'Dosya menüsüne alt menüler ekleme
menuItemDosya.MenuItems.Add(menuItemYeni)
menuItemDosya.MenuItems.Add(menuItemAc)
menuItemDosya.MenuItems.Add(menuItemKaydet)
'Ana menüyü forma ekle
Me.Menu = mnuBar
End Sub
End Class