Cara Membuat Pasword Dalam Visual Basic

1. Desain Awal Program

2. Atur Properties Masing-masing Objek sebagai berikut:

NO.	OBJEK	PROPERTIES	PENGATURAN
1	Form1	Text	-
2	Label1	Text	Password
3	Textbox1	Name	TxtPass
4	Button1	Text	Proses
		Name	Btnproses
5	Button2	Text	Bersih
		Name	Btnbersih

3. Tampilan program setelah pengaturan properties sebagai berikut:

 

4. Pemberian Perintah/Instruksi pada Program

     Alur Program:

a.    Masukkan password pada label1 (Password) pada Textbox1 (Txtpass).

b.    Setelah itu klik Button1 (Proses)maka akan memproses Password yang kita masukkan benar atau tidak. Jika Password yang kita masukkan benar maka akan ada pemberitahuan bahwa Password yang kita massukan benar, dan bila Password yang kita masukkan salah maka ada pemberitahuan Password yang kita masukkan salah berdasarkan sesuai Perintah Program.

c.    Jika diklik tombol Button2(Tutup), maka program akan ditutup (keluar dari program)

Perintah Program :

PrivateSub TxtProses_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TxtProses.Click

If Txtpass.Text = "Rahasia"Then

            MsgBox("Password yang Anda Masukkan Benar", MsgBoxStyle.Information, "Info Login")

Else

            MsgBox("Password yang Anda Masukkan Salah", 16, "Info")

EndIf

EndSub

PrivateSub Btnbersih_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)

EndSub

PrivateSub Btntutup_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Btntutup.Click

Dim pesan AsString

        pesan = MsgBox("Apakah Anda ingin menutup Program ini ?", MsgBoxStyle.YesNo + 32, "Tutup Program")

If pesan = vbYes Then

End

Else

ExitSub

EndIf

EndSub

EndClass

Tampilan Program setelah dijalankan berdasarkan Password yang benar sebagai berikut :

Untuk menjalankan program, klik tombol Start Debugging   atau tekan tombol F5 pada keyboard.

Untuk menutup program, klik tombol Stop Debugging