Membuat Form Login Pada VB 6.0

0
Sebelum memulai project, pastikan dahulu anda telah menginstal aplikasi Visual Basic 6.0 pada PC anda. Apabila anda tidak ada anda boleh download di sini. *Gratis secara cuma-cuma lhoo..... Hihiiii
Lanjuuttt lagi.... setelah itu buka aplikasi VB dan tool box yang kita gunakan adalah LABEL, TEXT, dan COMMAND lalu setting tampilannya mirip-mirip seperti ini lah.


setelah itu ubah nama dari masing-masig tool box tadi sehingga menjadi seperti ini :


lalu klik 2X pada Command1 (Masuk) hingga muncul tempat menaruh listing code untuk proses programnya. contoh gambarnya seperti ini :
lalu isi listing codenya dengan mengCoPast code di bawah ini dan taruh di Command1 dan Command2.

Private Sub Command1_Click()
If Text1.Text = "123456" And Text2.Text = "123456" Then
msg = MsgBox("Anda berhasil LOG IN ", vbInformation,"Message")
Else
msg = MsgBox("Pasword atau Id anda tidak Valid", vbCritical,"Message")
text1.text=""
text2.text=""
End If
End Sub

Private Sub Command2_Click()
p = MsgBox("Anda yakin ingin keluar ?", vbQuestion + vbYesNo, "Message" )
If p = vbYes Then
End
End If
End Sub

Setelah itu tekan F5 atau Run dan hasilnya akan seperti ini apabila anda berhasil Login.



Selamat Mencoba dan Tetap Semangattt.....