VB Menu Strip

Membuat Menu Strip

Masukan Menu Strip Dari Toolbox kelompok Menus & Toolbars sehingga terlihat Seperti Tampilan Berikut ini :

Tuliskan menu yang akan dibuat Pada Type Here sampai selesai
















Contoh Menu Strip

Toolbar

Membuat Toolbar
Masukan Toostrip dari Toolbox kelompok Menus & Toolbars
Untuk Menambahkan Toolbar 

Pada Batang Toolstrip kemudian pilih Add Toolstrip Button 
 


















Menambahkan Gambar pada Toolbar

Pada batang diklik kanan pilh Set Image

MDI Form

adalah apilkasi yang dapat menampilkan beberapa form sekaligus.
MDI Form disebut juga sebagai Form Induk yang dapat membuat beberapa form lain yang bersama.
Form yang dipanggil form induk disebut form anakan / MDI Child
Cara membuat MDI form
Atur Propertis IsMDIContainer pada Form menjadi True

Tampilan Program ketika di klik form dan klik form child 1 - 4

Tampilan Cascade

Caranya klik Windows kemudian klik  Cascade

Tampilan Tile Horizontaly

Caranya menampilkannya klik Windows lalu klik Tile Hoorizontaly

Code Keseluruhan Program Saya

Public Class Form1

    Private Sub CloseToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CloseToolStripMenuItem.Click

        End

    End Sub

    Private Sub Form1ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Form1ToolStripMenuItem.Click

        Form2.MdiParent = Me

        Form2.Show()

    End Sub

    Private Sub Form2ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Form2ToolStripMenuItem.Click

        Form3.MdiParent = Me

        Form3.Show()

    End Sub

    Private Sub Form3ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Form3ToolStripMenuItem.Click

        Form4.MdiParent = Me

        Form4.Show()

    End Sub

    Private Sub Form4ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Form4ToolStripMenuItem.Click

        Form5.MdiParent = Me

        Form5.Show()

    End Sub

    Private Sub ToolStripButton1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton1.Click

        Form2.MdiParent = Me

        Form2.Show()

    End Sub

    Private Sub ToolStripButton2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton2.Click

        Form3.MdiParent = Me

        Form3.Show()

    End Sub

    Private Sub ToolStripButton3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton3.Click

        Form4.MdiParent = Me

        Form4.Show()

    End Sub

    Private Sub ToolStripButton4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton4.Click

        Form5.MdiParent = Me

        Form5.Show()

    End Sub

    Private Sub CascadeToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CascadeToolStripMenuItem.Click

        Me.LayoutMdi(MdiLayout.Cascade)

    End Sub

    Private Sub TileHorizontalyToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TileHorizontalyToolStripMenuItem.Click

        Me.LayoutMdi(MdiLayout.TileHorizontal)

    End Sub

    Private Sub TileVerticalyToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TileVerticalyToolStripMenuItem.Click

        Me.LayoutMdi(MdiLayout.TileVertical)

    End Sub

    Private Sub WindowToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles WindowToolStripMenuItem.Click

    End Sub

End Class

Sekian program VB Menu Strip dari saya
Terima  Kasih