hihihihihih . . . . (^_^)
USER LOGIN
Caranya gini nih yang aku dapetin :
Pertama-tama bikin dulu Formnya seperti ini
Nah abis itu ketik perintahnya kaya gini nih :
ini untuk di tombol commad OK
Private Sub Command1_Click()
If Text1.Text = "Lab07" And Text2.Text = "mahasiswa" Then
MsgBox ("Selamat Datang di Lab 07")
Else
MsgBox ("Password dan User Name Anda Tidak Valid, Silahkan Masukkan Lagi")
Text1.Text = ""
Text2.Text = ""
Exit Sub
End If
End Sub
yang ini buat di tombol command EXIT
Private Sub Command2_Click()
MsgBox "Selamat Tinggal !"
End
End Sub
note : yang berwarna merah bisa di rubah sesuai keinginan :)
Setelah itu coba di running
masukan User Name dan Password, jika kita salah memasukan akan muncul seperti ini
Namun, jika kita masukan
User Name : Lab07
Password : mahasiswa
Maka akan muncul seperti ini
wew . . . .
selamat mencoba . . . (^_^)
No comments:
Post a Comment