Sunday, July 7, 2013

Membuat Form Login Sederhana dengan Visual Basic 6.0

Tak Terasa sebentar lagi bulan Ramadhan tiba, Bulan yang penuh berkah. Sebelum posting dan sebelum bulan Ramadhan tiba, saya selaku Admin dari Hunter Science minta maaf kepada semua sobat Hunter yang sebesar-besarnya atas semua kesalahan dalam menulis, kata-kata yang menyinggung perasaan sobat Hunter.

Alhamdulillah, setelah bergelut dengan kewajiban-kewajiban di kampus, Praktek Kerja Nyata (PKN) dan membuat laporannya, sekarang saatnya untuk berbagi ilmu dengan sobat Hunter semua yang sebelumnya telah lama tidak posting apa-apa karena tidak ada waktu. (Sok sibuk)..hehe..




Langsung saja, kali ini Admin akan mencoba share Membuat Form Login Sederhana dengan Visual Basic 6.0. Pertama-tama buka program Visual Basic 6.0 sobat Hunter, kalau belum ada, instal dulu. Kemudian bikin project baru. Admin anggap sobat Hunter sudah bisa, diteruskan menambahkan komponen-komponen berikut :
1. Label1 : Caption="Usename"
2. Label2 : Caption="Password"
3. Text1   : Name=txtUser, Text=Kosongkan
4. Text2   : Name=txtPassword, Text=Kosongkan
5. Command1 : Name=cmdLogin, Caption=LOGIN
6. Command2 : Name=cmdBatal, Caption=BATAL

Udah?
Langsung saatnya "Ngoding", I like it...hihihi
Klik Ganda pada cmdLogin, Masukkan Coding berikut :

Private Sub cmdLogin_Click()
    If Me.txtUser.Text = "Hunter" And Me.txtPassword.Text = "Science" Then
        MsgBox "Login Berhasil"
    Else
        MsgBox ("Username atau Password Salah, Silahkan Ulangi Lagi")
    End If
End Sub

--sstttt, Copas ja biar cepet....hihihi....

Selanjutnya klik ganda pada cmdBatal, Masukkan Coding Berikut :

Private Sub cmdBatal_Click()
    Me.txtUser.Text = ""
    Me.txtPassword.Text = ""
    Me.txtUser.SetFocus
End Sub

Penjelasan Sedikit :

Me.txtUser.Text = ""--> Untuk mengosongkan txtUser
Me.txtUser.SetFocus--> Untuk mengaktifkan cursor pada txtUser
If Me.txtUser.Text = "Hunter" And Me.txtPassword.Text = "Science" --> Untuk pengecekkan pada txtUser dan txtPassword, Jika txtUser diisi Hunter dan txtPassword diisi Science maka syntax selanjutnya akan dijalankan yaitu menampilkan message box "Login Berhasil", jika salah satu salah atau kedua-duanya salah maka akan menampilkan pesan "Username atau Password Salah, Silahkan Ulangi Lagi"

Semuanya sudah selesai, Untuk menjalankan tekan F5 pada keyboard dan lihat hasilnya. Masukkan "Hunter" pada username dan Science pada Password. Mungkin cukup sekian posting kali ini, sobat Hunter bisa mengembangkannya sendiri.

NB: JANGAN COPAS Coding tapi ketik dan pahami coding dan fungsi-fungsinya, Jika mengalami debug/error jangan putus asa tapi cobalah sampai menemukan kesalahanya.

BELAJAR PEMROGRAMAN HARUS ERROR/DEBUG terlebih dahulu sehingga kita akan mengetahui kesalahannya, jika selalu benar maka kita akan kesulitan kalau mengalami kesalahan(DEBUG)

Semoga artikel Membuat Form Login Sederhana dengan Visual Basic 6.0 yang sederhana ini bisa bermanfaat bagi sobat Hunter. Amin.....

3 comments:

  1. gimana caranya kalo misalkan cuman user yg salah,, MsgBox nya cuman menampilkan user salah saja..
    bukan user dan pass salah..
    trims

    ReplyDelete
    Replies
    1. mungkin itu di bagian kondisionalnya tinggal di rubah pada masalah alert diMsgBox, coba kunjungi :

      http://www.materi-it.com/2014/12/cara-membuat-form-login-visual-basic.html

      untuk pembahasan lebih lanjut :) ...

      Delete
  2. cara buat

    -Username & Passwor nya gimana ??

    ReplyDelete