contoh aplikasi sederhana login dengan vb 6.0

Buatlah dua buah Form, nama Form biarkan Defaut (Form1 dan Form2)

Pada Form1 tambahkan komponen:
2 TextBox (kosongkan text , pada PasswordChar TextBox2 isi tanda bintang (*))
3 Label ( Caption: FORM LOGIN, User Name, Password)
2 Command Button (Login dan Exit)

Pada Form2 Tambahkan 1 buah Label, ubah captionnya menjadi "INI FORM MENU UTAMA"

Selanjutnya tinggal memasukkan script ke Form1, Klik kanan pada Form1 dan pilih View Code
untuk membuka jendela code. kemudian masukkan script kode berikut ini:

Private Sub Command1_Click()
If Text1 = "admin" And Text2 = "admin" 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

Tekan F5 untuk melihat hasilnya.

Coba isi User Name dan Password dengan "admin" kemudian kilk Login, maka jendela Form2 atau Form Utama akan ditampilkan.

Terima kasih & semoga bermanfaat.

sumber : http://trikmudahvb6.blogspot.co.id/2014/02/cara-membuat-form-login-sederhana.html