Thanx ya mbak lilis atas share informasi yg berguna ini ;)

Lilis Suryani ArjaMaya <[EMAIL PROTECTED]> wrote:                               
   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
 
     
                       

       
---------------------------------
Ready for the edge of your seat? Check out tonight's top picks on Yahoo! TV. 

[Non-text portions of this message have been removed]

Kirim email ke