dear programmers,
kali ini aku coba share gimana koding utk menutup semua form yg terbuka
pada aplikasi MDIForm kecuali MDIForm nya.
ok spt biasa silahkan copy paste kode berikut ini, dan spt biasa juga
ini adalah contoh yg paling sederhana.
Sub tutupForm()
Dim frm As Form
For Each frm In Forms
If frm.Name <> Me.Name
Unload frm
set frm = Nothing
End If
Next
End Sub
salam
Lilis Suryani ArjaMaya
____________________________________________________________________________________
Sucker-punch spam with award-winning protection.
Try the free Yahoo! Mail Beta.
http://advision.webevents.yahoo.com/mailbeta/features_spam.html