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