Assalamu'alaikum  Wr.Wb

Saya akan memaparkan tugas pada pertemuan ke- 7 mengenai "Menu & Toolbar" mata kuliah "Pemrograman Visual" yang diampu oleh Dosen Bp.Nandang Hermanto.

Dalam tugas kali ini terdapat tiga persolan yang harus diselesaikan yaitu :

1. Buat agar posisi toolbar berada di bawah menu.
2. Menambahkan library agar lebih interaktif.
3. Buat menu tampilan tile horizontal, vertical, dan cascade.

Untuk menjawab semua persoalan di atas. Pertama kita buat form baru. Kemudian tambahkan menu dengan menggunakan  menu strip pada Toolbox kelompok Menus & Toolbar. Isikan sesuai keinginan.
Untuk menambahkan Toolbar pilih Toolstrip pada Toolbox kelompok Menus & Toolbar. Isikan textnya sesuai keinginan.
--> Tampilan awal

Mengaitkan form dengan menu yang kita inginkan
Contoh pada aplikasi saya. Saat ditekan menu Profile->Data Diri muncul form yang berisikan data diri.

Tampilan saat membuaka form secara bersamaan

Menampilkan dua form secara vertikal

Menampilkan dua form secara horizontal

Menampilkan form secara cascade

Untuk source code aplikasi tersebut secara keseluruhan adalah sebagai berikut

Public Class Form1

    Private Sub Lat1ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Lat1ToolStripMenuItem.Click
        Form2.MdiParent = Me
        Form2.Show()

    End Sub

    Private Sub ToolStripMenuItem2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripMenuItem2.Click
        Form3.MdiParent = Me
        Form3.Show()

    End Sub

    Private Sub YayaToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles YayaToolStripMenuItem.Click

        Form4.Show()

    End Sub

    Private Sub MenuStrip1_ItemClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.ToolStripItemClickedEventArgs) Handles MenuStrip1.ItemClicked

    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 HorizontalToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles HorizontalToolStripMenuItem.Click
        Me.LayoutMdi(MdiLayout.TileHorizontal)
    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

   
End Class

*Sekian yang saya bisa paparkan kali ini. Untuk soal no.2 belum bisa saya selesaikan. Mohon maaf. Terima Kasih :)