Membuat Login pada Visual Basic

Pembelajaran kali ini adalah bagaimana cara menggunakan komponen komponen pada VB seperti Label , Text , list , dan Command. Kalau di bandingkan dengan Delphi sebenarnya mamiliki beberapa kesamaan , pada komponennya pun sama Cuma saja beda namanya seperti

Text pada Delphi yaitu Edit.

            List = Memo

            Command = Button

            Label = Label

            Pada kesempatan kali ini saya akan membuat beberapa jenis program perulangan dan dari situ akan bisa dilihat perbedaannya.

Pertama kita buat dulu form1 jalankan program VB 6 , buat project baru , maka akan muncul form baru (form1) yang masih kosong , pada form masukkan

            3 label

            2 Text dan

            2 command

dan juga buat form 2 . untuk bukti bahwa loginnya berhasil

lihat listing program ini :

==============================================================

Private sub command1_click()

If text1.text = "djuneardy" and text2.text = "saputra" then

Form1.hide

Form2.show

Else: msgbox "wrong username or password", vbOKOnly +vbInformation, "info"

End

End if

End sub

==============================================================

Listing program diatas merupakan suatu listing yang dibuat dengan tujuan untuk membuat form login menuju form ke 2, dengan username djuneardy dan password saputra, di sisipkan pada komponen command ok/submit, dan supaya ketika menuliskan password karakternya di hide pada properties tab alphabetic cari menu passwordchar, nah disana bisa menuliskan apa saja sebagai pengganti karakternya, umumnya menggunakan asterix untuk hide passwordnya , maka ganti dengan symbol asterix (*).

Lalu form1.Hide & form2.show , berarti ketika login berhasil maka form1 akan disembunyikan dan akan masuk keform2. Namun apabila ketika memasukkan password salah maka akan keluar dialog message yang memberitahukan bahwa password tersebuat salah.
isi dari dialog message dan juga username dan password silahkan di sesuaikan dengan keinginan anda .

Private sub command2_click()

End

End sub

kalo listing di atas di buat untuk tombol exit , di pasang di command button dengan caption exit

sekian penjelasan beserta listingnya semoga bermanfaat . ^^:LC