![]() |
![]() |
1. Tambahkan Form2 ke dalam project anda (caranya : Pada menu Project, pilih Add Form), Kemudian tanamkan Command1 pada Form2, sehingga menjadi sebagai berikut :
2. Aktifkan jendela koding Form2 dengan menekan F7, atau pada Menu View, pilih Code, atau klik icon View Code pada jendela Project Explorer. Pada DropDownList object, pilih Form, dan pada DropDownList procedure pilih Initialize.
![]() |
![]() |
Dan lakukan koding untuk Event Initialize untuk form2, sebagai berikut :
Private Sub Form_Initialize()
MsgBox "Ini adalah initialize form2"
End Sub
Dan dengan cara yang sama lakukan juga koding untuk Event-Event berikut :
Private Sub Form_Load()
MsgBox "Ini adalah Load Form2"
End SubPrivate Sub Form_Activate()
MsgBox "Ini adalah Activate Form2"
End SubPrivate Sub Form_Deactivate()
MsgBox "Ini adalah Deactivate Form2"
End SubPrivate Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
MsgBox "Ini adalah QueryUnload Form2"
End SubPrivate Sub Form_Unload(Cancel As Integer)
MsgBox "Ini adalah Unload Form2"
End SubPrivate Sub Form_Terminate()
MsgBox "Ini adalah terminate form2"
End Sub
Dan akhirnya lakukan juga koding untuk Command1 pada Form2
Private Sub Command1_Click()
Unload Me
End Sub
3. Tampilkan kembali Form1. (caranya : Double Klik pada Form1 di jendela Project Explorer), dan kemudian tanamkan Command1 s/d 4 diatasnya, dan lakukan koding berikut :
Kemudian atur properti masing-masing menurut tabel berikut :
Kontrol | Properti | Value |
Command1 | Name Caption |
cmdShow &Show |
Command2 | Name Caption |
cmdHide &Hide |
Command3 | Name Caption |
cmdLoad &Load |
Command4 | Name Caption |
cmdUnLoad &UnLoad |
Lakukan koding untuk masing-masing Command
Private Sub cmdShow_Click()
Form2.Show
End SubPrivate Sub Form_Resize()
MsgBox "Ini adalah Resize Form2"
End SubPrivate Sub cmdHide_Click()
Form2.Hide
End SubPrivate Sub cmdLoad_Click()
Load Form2
End SubPrivate Sub cmdUnload_Click()
Unload Form2
End Sub
4. Simpan Project anda FormEvent.vbp, Form1.frm, Form2.frm
5. Jalankan project anda
6. Jalankan project anda
7. Lakukan percobaan sendiri untuk menambah pengertian anda.