Tugas VB 7

 MEMBUAT MENU VARIASI DAN FORM MDI PADA 

VB 2010

Pada Post ini saya memosting program membuat menu dan mdi form pada vb 2010,dengan ketentuan sebagai berikut :

1. Pengaturan menu form menggunakan MDI Form,MDI child.

     -Horizontal

     -Vertikal

     -Cascade

2. Membuat tampilan toolstrip di atas menustrip

3.Membuat Menu tambahan menggunakan Library pada VB 2010.

1. Pengaturan menu form menggunakan MDI Form, MDI Child (Horisontal, vertikal, Cascade)

     

Berikut kodenya :

Private Sub SatuToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SatuToolStripMenuItem.Click

        Form3.Show()

        Form3.MdiParent = Me

    End Sub

    Private Sub DuaToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DuaToolStripMenuItem.Click

        Form4.Show()

        Form4.MdiParent = Me

    End Sub

    Private Sub TigaToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TigaToolStripMenuItem.Click

        Form5.Show()

        Form5.MdiParent = Me

    End Sub

    Private Sub EmpatToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles EmpatToolStripMenuItem.Click

        Form6.Show()

        Form6.MdiParent = Me

    End Sub

    Private Sub LimaToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles LimaToolStripMenuItem.Click

        Form7.Show()

        Form7.MdiParent = Me

    End Sub

    Private Sub HorisontalToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles HorisontalToolStripMenuItem.Click

        Me.LayoutMdi(MdiLayout.TileHorizontal)

    End Sub

    Private Sub VertikalToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles VertikalToolStripMenuItem.Click

        Me.LayoutMdi(MdiLayout.TileVertical)

    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

Hasil 

HASIL

- Cascode 

-Horizontal

-Vertical

2. Membuat tampilan toolstrip di atas menustrip

    -klik kanan toolstripnya 

    -klik send to back

Hasil

Cukup kita lakukan penge-klikan pada Tool Strip dan Menu Strip seperti pada

gambar di atas .Atur posisi sesuai yang anda inginkan pada Dock atau bisa juga   menggunakan
 Anchor

3. Membuat Menu tambahan menggunakan Library pada VB 2010

  Membuat menu ribbon

1. download terlebih dahulu library dengan nama dotnebar, kemudian instal

2. drag and drop file yang berekstensi .dll ke toolbox pada vb.net 2010.maka menu ribbon   muncul di toolbox.

3. buat tampilan sesuka kita.