if yang kedua jadikan elseif. If password = "1" Then DoCmd.OpenForm "kuning" ElseIf password = "2" Then DoCmd.OpenForm "Hijau" Else DoCmd.Close End If
--- On Thu, 5/28/09, nadhif_fakhri <[email protected]> wrote: From: nadhif_fakhri <[email protected]> Subject: [belajar-access] fungsi if.....? [1 Attachment] To: [email protected] Date: Thursday, May 28, 2009, 2:16 PM [Attachment(s) from nadhif_fakhri included below] Siang semua, saya mau nanya nih... saya sedang bikin program access sederhana menggunakan if saya isi code nya seperti ini : Private Sub password_AfterUpdat e() If password = "1" Then DoCmd.OpenForm "kuning" Else DoCmd.Close End If End Sub saya maunya bisa membuka form lain, misalkan : saya tambahin if lagi Private Sub password_AfterUpdat e() If password = "1" Then DoCmd.OpenForm "kuning" If password = "2" Then DoCmd.OpenForm "Hijau" Else DoCmd.Close End If End Sub kok gak bisa ya .... file nya saya lampirkan ... Terima kasih Best regards, nadhif_fakhri mailto:nadhif_ fak...@yahoo. co.uk
