PERTEMUAN 12 : MATERI MENUBAR & MAINFORM

Menubar adalah sebuah strip horizontal yang berisi daftar menu yang tersedia untuk program tertentu. Dalam program Windows, menu bar berada di bagian atas  jendela layar yang terbuka.

MDI (Multiple Document Interface)

Mdi form  ialah form yang dapat menapilkan beberapa form sekaligus. Terbagi menjadi 2 jenis form yaitu form induk dan form anak. Form induk inilah yang akan menjadi tempat form-form anak ditampilkan. Berikut langkah-langkah dalam membuat MDI form :

Mainform

Main Form merupakan sebuah form yang dijadikan form induk tempat untuk mengakses form-form lainnya.

 Buatlah desain Form sebagai berikut :

1. 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.

 Atur form1( form Induk ) pada properti  Windowstate menjadi  maximized.

 Buatlah sebuah Menustrip untuk memanggil form form anak,  pilih MenuStrip dari toolbox .

 Lalu buatlah menu-menu seperti gambar diatas.

 Untuk memanggil form anak hanya dengan menggunakan code 

           Nama form.Mdiparent=me 

           Nama form.show/show  dialog() 

Untuk membuka form-form ini melalui form menu utama, perintahnya adalah sebagai berikut :

Public Class Form1

    Private Sub ExitToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ExitToolStripMenuItem.Click

        MsgBox("Anda Keluar Dari Form Ini")

        Application.Exit()

    End Sub

    Private Sub DataPegawaiToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DataPegawaiToolStripMenuItem.Click

        Form2.MdiParent = Me

        Form2.Show()

    End Sub

    Private Sub DataGajiToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles DataGajiToolStripMenuItem.Click

        Form3.MdiParent = Me

        Form3.Show()

    End Sub

    Private Sub LaporanPegawaiToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles LaporanPegawaiToolStripMenuItem.Click

        Form4.MdiParent = Me

        Form4.Show()

    End Sub

    Private Sub LaporanToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles LaporanToolStripMenuItem1.Click

        Form5.MdiParent = Me

        Form5.Show()

    End Sub

End Class

Double klik pada menustrip yang ingin dijadikan pemanggil form, misalnya saya akan memanggil data pegawai, maka kode program diletakkan pada menustrip yang bertuliskan Data Pegawai kemudian panggil form yang akan dibuka misal FORM DATA PEGAWAI.