Kali ini kita akan mencoba membuat Form Login dengan Bahasa Pemrogaraman VB 6 Tanpa Database.
Komponen yang diperlukan :
- TextBox
- Label
- Command Button
- 2 Buah Form
Buatlah Form Seperti Dibawah ini :
1. Form Login
2. Form Menu Utama
Object Properties :
Form 1 = ( Property - Name : Form1 )
Form 2 = ( Property - Name : Form2 )
TextBox 1 = ( Property - Name : Text1 )
TextBox 2 = ( Property - Name : Text2 )
Command Button = ( Property - Name : Command1 )
Form 2 = ( Property - Name : Form2 )
TextBox 1 = ( Property - Name : Text1 )
TextBox 2 = ( Property - Name : Text2 )
Command Button = ( Property - Name : Command1 )
Copy dan Pastekan Kode Berikut Kedalam Command Button Login :
If Me.Text1.Text = "Admin" And Me.Text2.Text = "123" Then
MsgBox "Login Berhasil", vbInformation, ""
Form2.Show
Unload Me
Else
MsgBox "Username/Password Salah", vbCritical, ""
Me.Text1.Text = ""
Me.Text2.Text = ""
Me.Text1.SetFocus
End If
MsgBox "Login Berhasil", vbInformation, ""
Form2.Show
Unload Me
Else
MsgBox "Username/Password Salah", vbCritical, ""
Me.Text1.Text = ""
Me.Text2.Text = ""
Me.Text1.SetFocus
End If
Keterangan :
- Ganti Username dan Password (yang Berwarna Merah) dengan yang Diinginkan.
ScreenShot :
How to play baccarat at home - Worrione
ReplyDeleteBaccarat is a popular table game that is popular in the 메리트카지노 casino industry. 바카라 The most popular game is baccarat. 메리트 카지노 쿠폰