Sebelumnya saya akan menampilkan tampilan Menu, Toolbar, dan Statusbar :
Dan berikut ini adalah tamoilan yang sudah dijalanakan
Dan berikut ini adalah Listing Programnya:
- Public Kelas Daftar_Menu
- Private Sub QuiZPdAMToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles QuiZPdAMToolStripMenuItem.Click
- QuiZ_PdAM . MdiParent = Me
- QuiZ_PdAM . Tampilkan ( )
- End Sub
- Private Sub PDAMToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) HandlesPDAMToolStripMenuItem.Click
- Gaji_Pegawai . MdiParent = Me
- Gaji_Pegawai . Tampilkan ( )
- End Sub
- Private Sub LatihanMenghitungNilaiToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e AsSystem.EventArgs) Handles NilaiMahasiswaToolStripMenuItem.Click
- Nilai_Mahasisiwa . MdiParent = Me
- Nilai_Mahasisiwa . Tampilkan ( )
- End Sub
- Private Sub KeluarToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) HandlesKeluarToolStripMenuItem.Click
- Me . Tutup ( )
- End Sub
- Private Sub KeluarToolStripMenuItem1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) HandlesKeluarToolStripMenuItem1.Click
- Dim k As String
- k = MsgBox ( "Apakah Andari Yakin Ingin Keluar" , MsgBoxStyle . yesno )
- Jika k = vbYes Lalu
- Me . Tutup ( )
- End Jika
- End Sub
- Akhir Kelas
Demikianlah artikel dari saya yang berjudul Membuat Aplikasi Program Menu, Toolbar, and Statusbar dengan Vb.Net. Semoga artikel diatas dapat bermanfaat bagi anda.
0 komentar:
Posting Komentar