nggak usah pake call juga bisa

jadi lsg aja TutupSemuaForm


--- Rommy Zamanuddin <[EMAIL PROTECTED]>
wrote:

> saya punya coding di module seperti ini :
>  
>   Public Sub TutupSemuaForm()
>   Dim Frm As Form
>      For Each Frm In Forms
>          Unload Frm
>          Set Frm = Nothing
>      Next Frm
>     If Not Dbs Is Nothing Then Set Dbs = Nothing
>      If Not Rs Is Nothing Then Set Rs = Nothing
>      End
>   End Sub
>  
>   klo  saya ingin panggil di form1 dengan penulisan
> :
>  
>   call TutupSemuaForm (True) atau
>   call TutupSemuaForm (False)
>  
>   gimana cara penulisan coding di modulenya ?
>  
>   Terima Kasih banyak atas perhatiannya !
>  
>   Wassalam
>  
> __________________________________________________
> Apakah Anda Yahoo!?
> Lelah menerima spam?  Surat Yahoo! memiliki
> perlindungan terbaik terhadap spam 
> http://id.mail.yahoo.com


__________________________________________________
Do You Yahoo!?
Tired of spam?  Yahoo! Mail has the best spam protection around
http://mail.yahoo.com


Wahana Programmer Groups Links

<*> Untuk mengunjungi sponsor milis ini, klik link berikut:
    http://wahanaprogrammer.net

<*> Untuk menghubungi owner milis ini, kirim email ke:
    [EMAIL PROTECTED]

<*> Konsultasi pemrogramman bisa chat disini:
    Yahoo! Messenger: wahanaprogrammer




SPONSORED LINKS
Programmer Indonesia Basic programming language
Computer programming languages Programming languages Java programming language


YAHOO! GROUPS LINKS




Kirim email ke