Berikut adalah langkah-langkah pembuatan form login sederhana dengan vb 6.0
Setelah masuk aplikasi vb 6.0 buat 2 buat form baru :
- Form1 = Menu Utama
- Form2 = Form Login
Caranya dengan klik kanan di Project1- add - Form. Seperti gambar dibawah ini.
1 Desain Form1 seperti gambar berikut :
No.
|
Komponen
|
Properties
|
1
|
Label
|
Name : Label1
Caption : Ini Form Menu Utama
|
Desain Form 2 seperti gambar berikut :
Klik kanan di project1-> Project1 properties ..
No.
|
Komponen
|
Properties
|
1.
|
Label
|
Name: Label2
Caption : Form Login
|
2.
|
Label
|
Name : Label3
Caption : Username
|
3.
|
Label
|
Name : Label4
Caption : Password
|
4.
|
Textbox
|
Name : Text1
Text :
|
5.
|
Textbox
|
Name : Text2
Text :
PasswordChar : *
|
6.
|
CommandButton
|
Name : Command1
Caption : Login
|
7.
|
CommandButton
|
Name : Command2
Caption : Keluar
|
Klik kanan di project1-> Project1 properties ..
Ubah Startup Object menjadi Form2 lalu klik ok.
Klik ganda di tombol Login kemudian masukan code berikut :
Private Sub Command1_Click()If Text1 = "admin" And Text2 = "admin123" Then Form2.Show 'Perintah Menampilkan Form 2 Form1.Visible = False 'Menyembunyikan Form 1 Unload Me 'Menutup Form 1 Else MsgBox "User Name atau Password yang Anda Masukkan salah" _ & vbNewLine & "Silahkan Coba lagi !!", vbCritical, "Warning!!" Text1 = "" Text2 = "" Text1.SetFocus End If End Sub Private Sub Command2_Click() Unload Me End Sub |
Klik ganda di tombol keluar lalu masukan kode berikut :
Private Sub Command2_Click()Unload MeEnd Sub |
Jalankan Program (F5). Masukan username = admin, Password = admin123 lalu klik login.
