TUGAS TUJUH PEMOGRAMAN VISUAL

PERANCANGAN MENU DAN TOOLBAR PADA VISUAL BASIC 2010

Pada pertemuan materi yang ketujuh ini membahas tentang menu, toolbar, dan MDI form dimana kita akan membuat suatu aplikasi yang menggunakan toolbox menus & tollbars,yang disitu terdapat menu ContextMenuStrip, MenuStrip, StatusStrip, ToolStripContainer, ToolStrip yang nanti akan kita gunakan:

1.Langkah pertama

Buatlah project baru, lalu pilih widows form application.
Set form pertama ( form 1 ) menjadi form induk dengan cara,atur properti IsMdiContainer menjadi “True”.Tambahkan 4 windows form lagi.

Masukan Menu Strip Dari Toolbox Kelompok Menus & Toolbars.Pada gambar di bawah ini kita gunakan MenuStrip dan ToolStrip, saya tambah kan menu Latihan,Tugas, dan Exit,selain dari menu standar file, edit, tools, dan help.

pada menu latihan dan tugas terdapat beberapa latihan dan tugas yang nantinya bisa kita buka sehingga terlihat sbb:

 

2.Langkah kedua

 pada menu latihan dan tugas terdapat beberapa latihan dan tugas yang nantinya bisa kita buka

 

3.Langkah ketiga
Setelah form yang telah kita buka tadi,kita bisa membuat form-form itu menjadi berurutan atau cascade,dengan mengklik icon cascade yang telah ada,dengan mengklik icon cascade maka akan menghasilkan sebagai berikut bertumpuk dan terkesan kurang rapi,menjadi horizontal ataupun vertical:

Cascade

Horizontal

Horizontal

Vertical

Vertical

Koding atau Listing Programnya yaitu,

Public Class Form1

Private Sub Latihan1ToolStripMenuItem_Click(sender As System.Object, e As System.EventArgs) Handles Latihan1ToolStripMenuItem.Click
    Form2.MdiParent = Me
    Form2.Show()
    Me.LayoutMdi(MdiLayout.TileHorizontal)
End Sub

Private Sub Latihan2ToolStripMenuItem_Click(sender As System.Object, e As System.EventArgs) Handles Latihan2ToolStripMenuItem.Click
    Form3.MdiParent = Me
    Form3.Show()
    Me.LayoutMdi(MdiLayout.TileHorizontal)
End Sub

Private Sub KeluarToolStripMenuItem_Click(sender As System.Object, e As System.EventArgs) Handles KeluarToolStripMenuItem.Click
    Me.Close()
End Sub

Private Sub LatihanToolStripMenuItem_Click(sender As System.Object, e As System.EventArgs) Handles LatihanToolStripMenuItem.Click

End Sub

Private Sub Latihan3ToolStripMenuItem_Click(sender As System.Object, e As System.EventArgs) Handles Latihan3ToolStripMenuItem.Click
    Form4.MdiParent = Me
    Form4.Show()
    Me.LayoutMdi(MdiLayout.TileHorizontal)
End Sub

Private Sub Latihan4ToolStripMenuItem_Click(sender As System.Object, e As System.EventArgs) Handles Latihan4ToolStripMenuItem.Click
    Form5.MdiParent = Me
    Form5.Show()
    Me.LayoutMdi(MdiLayout.TileHorizontal)

Note :)

Koding dari tombol-tombol tersebut adalah :
Tombol Cascade: Me.LayoutMdi(MdiLayout.Cascade)
Tombol Vertical : Me.LayoutMdi(MdiLayout.TileVertical)
Tombol Horizotal : Me.LayoutMdi(MdiLayout.TileHorizontal)

Menu dengan File Tambahan:

caranya sama seperti yang lainnya ambil control dari toolbox yaitu tabmenu lalu tinggal kita masukan apa yang kita inginkan.misalnya di tabepage2 terdapat deretan toolbar yang bergambar seperti gambar di bawah:

Alhamdulillah akhirnya selesai juga, semoga bermanfaat :)