Pada Postingan kali ini saya akan membahas tentang bagaimana cara
pengaturan pada menu strip, toolbar dan pada MDI form pada Microsoft
Visual Basic 2010.
Terdapat 3 soal :
1. Mengatur menu toolbar yang berada di atas (top) menjadi (bottom) di bawah
2. Pengaturan menu form menggunakan MDI Form,MDI child.
-Horizontal
-Vertikal
-Cascade
3. Membuat Menu tambahan menggunakan Library pada VB 2010.
Penyelesaian :
1. Untuk menjawab soal no. 1 Pertama kita desain form
terlebih dahulu dengan cara memasukan MenuStrip pada toolbox, seperti
gambar dibawah ini :
Setelah selesai mendesain kita akan coba mengatur tata letak toolbar
dari posisi atas (top) menjadi posisi di kiri (left), caranya klik
toolbar yang akan dipindah lalu pilih pada opsi DOCK pada tabel
properties da ganti posisi ke arah kiri (left). dan hasilnya sebagai
berikut :
2. Membuat form menjadi MDI dan didalamnya terdapat MDI child...
caranya pertama kita buat beberapa form baru yang sudah di hubungkan
dengan menu pada menu bar. sehingga apabila salah satu menu bar di pilih
maka akan menampilkan form-form yang telah dibuat tadi, caranya :
pertama kita rubah form menjadi form mdi dengan mengaktifkan form pada
properties kita pilih IsMDIContainer dan rubah dari False ke True :
Selanjutnya kita masukan codingnya :
Public Class Form1
Private Sub NamaToolStripMenuItem_Click(ByVal sender As
System.Object, ByVal e As System.EventArgs) Handles
NamaToolStripMenuItem.Click
Form2.Show()
Form2.MdiParent = Me
End Sub
Private Sub KelasToolStripMenuItem_Click(ByVal sender As
System.Object, ByVal e As System.EventArgs) Handles
KelasToolStripMenuItem.Click
Form3.Show()
Form3.MdiParent = Me
End Sub
Private Sub NIMToolStripMenuItem_Click(ByVal sender As
System.Object, ByVal e As System.EventArgs) Handles
NIMToolStripMenuItem.Click
Form4.Show()
Form4.MdiParent = Me
End Sub
Private Sub MapelToolStripMenuItem_Click(ByVal sender As
System.Object, ByVal e As System.EventArgs) Handles
MapelToolStripMenuItem.Click
Form5.Show()
Form5.MdiParent = Me
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Me.Close()
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
End Class
hasilnya sebagai berikut :
Form menggunakan "Mode Pilihan" Cascade :
Form menggunakan "Mode Pilihan" Horizontal dan Vertikal :
3. untuk membuat menu tambahan ribbon harus menggunakan library tambahan dengan nama dan ekstensi. caranya :
- Download Librarynya.
- kemudian arahkan kursor pada toolbox paling bawah .
- drag and drop file "
System.Windows.Forms.Ribbon.dll" pada menu yang telah di sediakan.