Modul VB – Latihan Membuat MDI Form dan Menu
Buat MDI Form dengan Struktur Sebagai berikut :
File
- About Me Ctrl+A
- Exit Ctrl +E
Sequence
- Phitagoras
- Squere
Condition
- Ticketing
- 7 Miracle of Word

Modul VB - Latihan MDI Form dan Menu bar
Jawaban
- Tambahkan MDI Form:
- Project|
Add MDI Form
- Klik
Open
- Buat Menu : Tools | Menu Editor
- Buat Struktur Menu
|
Caption
|
Name
|
Shortcut
|
|
&File
|
mnFile
|
|
|
…About Me
|
mnAboutMe
|
Ctrl+A
|
|
…Exit
|
mnExit
|
Ctrl+E
|
|
&Sequence
|
mnSequence
|
|
|
…Phitagoras
|
mnPhitagoras
|
|
|
…Squere
|
mnSquere
|
|
|
&Condition
|
mnCondition
|
|
|
…Tiketing
|
mnTiketing
|
|
|
…7 Miracle
|
mnMiracle
|
|
|
Control Array
|
mnControlArray
|
- Atur Property MDI Form
- Caption : Kisi-kisi Soal Ujian
- WindowState : Maximize
• Pengkodean
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
|
Private Sub mnAboutme_Click()
Form1.Show
End Sub
Private Sub mnControlArray_Click()
Form6.Show
End Sub
Private Sub mnExit_Click()
End
End Sub
Private Sub mnMiracle_Click()
Form5.Show
End Sub
Private Sub mnPhitagoras_Click()
Form2.Show
End Sub
Private Sub mnSquere_Click()
Form3.Show
End Sub
Private Sub mnTiketing_Click()
Form4.Show
End Sub
|
- Tambahkan 5 Form Baru
- Menu: Project | Add Form
- Klik Open
- Atur property MDIChild bernilai True untuk semua form anak
- Atur property BorderStyle bernilai FixedDialog untuk semua form agar ukurannya tidak berubah
- Atur MDI Form agar tampil Pertama kali
- Project|Project1 Properties
- Pada Bagian Start Up Object pilih MDIForm
- Klik Ok
No comments:
Post a Comment