[Tutorial] Membuat Form Login Sederhana

Yah, ini pertama saya yang membahas tentang visual basic 6. Disini saya akan mencoba menjelaskan membuat form login yang sederhana menggunakan visual basic atau sering disingkat vb6. Meski sudah banyak beredar tutorial seperti ini tapi saya tetap membuatnya dengan ala Garry Laly :)
Ini menurutku lebih cocok untuk referensi saja sih sepertinya. Untuk yang belum punya visual basic 6 silahkan cari dan download di google, hehe XD

Oh ya, kenapa saya tidak memakai vb.net saja, kan itu lebih baru? memang sih, tetapi sudah sudah terlanjur jatuh cintn sama vb6 ini, hihihi ^^
Yah, mungkin suatu saat saya akan migrasi ke vb6. Oke langsung saja :)

Pertama kita buka program vb nya, lalu akan muncul tampilan seperti ini :

Untuk memperjelas gambar mungkin di klik saja :)
Pilih Standard EXE (yang saya kasih tanda merah itu)

Oke, selanjutnya akan tampil sebuah form yang kosong.
Lalu isi form itu seperti gambar berikut :

Kurasa sudah jelas banget gambarnya XD
Untuk membuat User Name dan Password, bisa menggunakan tool Label
sedangkan yang putih itu namanya TextBox, bisa menggunakan tool TextBox
Kalau untuk yang Login dan Exit itu menggunakan tool CommandButton

Yak, kalau sudah dipasang dan di tata seperti gambar di atas, sekarang mengatur propertiesnya
agar sama persis kayak yang di gambar :)

Propertiesnya berada di sebelah kanan.
Untuk Label1 ganti dengan Caption "User Name" (tanpa tanda petik, tapi kalau pakai juga boleh :v )
Label2 ganti dengan Caption "Password"
Untuk TextBox1 ganti dengan Name "txtName" dan hapus Textnya yang di properties agar menjadi kosong
TextBox2 ganti dengan Name "txtPass" dan hapus juga Textnya

Untuk CommandButton1 ganti dengan Name "cmdLogin" dan Caption "Login"
CommandButton2 ganti dengan Name "cmdExit" dan Caption "Exit"
Kalau Garry Laly © 2012 itu pakai Label.
Tapi gak pentinglah, itu hanya untuk gaya-gayaan saja... :3

Oke, mengatur properties telah selesai, sekarang waktunya untuk coding / mengetik kodenya.
Pertama Menu View, lalu pilih Code, maka akan muncul kotak putih untuk mengetik kodenya.

Ketik kode seperti berikut :

Dim i As Integer

Private Sub cmdLogin_Click()
If txtName.Text = "Garry Laly" And txtPass.Text = "my pass" Then
    MsgBox "Anda berhasil", vbInformation, "SELAMAT"
    End
Else
    i = i + 1
    MsgBox "ID tidak terdaftar, mohon periksa kembali", vbInformation, "ERROR"
    txtName.SetFocus
    txtName.Text = Empty
    txtPass.Text = Empty
End If
    If i = 2 Then MsgBox "Ini kesempatan terakhir anda", vbInformation, "CAUTION"
    If i = 3 Then
        MsgBox "Ma'af, kami harus mengeluarkan anda secara paksa", vbCritical, "CAUTION!!!"
        End
    End If
End Sub

Private Sub cmdExit_Click()
End
End Sub

Private Sub Form_Load()
i = 0
End Sub



Itu lah kodenya :3
Bisa di copas atau diketik sendiri :v
Kalau mau tanya fungsi-fungsi dari coding di atas bisa ditanya lewat komen, saya juga sedang belajar kok.
Untuk sample projectnya bisa download disini

Sekian dari saya, semoga bermanfaat :)

• Tweet
• Share
• [i]