Makasih mas sekarang dah bisa...

    

    

tapci> Pak Nadhif, ini jawabannya :

tapci> Private Sub password_AfterUpdate()

tapci>      If password = "1" Then

tapci>      DoCmd.OpenForm "kuning"

tapci>     ElseIf password = "2" Then

tapci>     DoCmd.OpenForm "Hijau"

tapci>      Else

tapci>      DoCmd.Close

tapci>  End If

tapci>  End Sub



Best regards,
 nadhif_fakhri                            
mailto:[email protected]



------------------------------------

SPAM IS PROHIBITEDYahoo! Groups Links

<*> To visit your group on the web, go to:
    http://groups.yahoo.com/group/belajar-access/

<*> Your email settings:
    Individual Email | Traditional

<*> To change settings online go to:
    http://groups.yahoo.com/group/belajar-access/join
    (Yahoo! ID required)

<*> To change settings via email:
    mailto:[email protected] 
    mailto:[email protected]

<*> To unsubscribe from this group, send an email to:
    [email protected]

<*> Your use of Yahoo! Groups is subject to:
    http://docs.yahoo.com/info/terms/

Kirim email ke