Tahap 1 : agan / sis buat tampilan form seperti pada gambar diatas yang terdiri dari
- Label1.text = "Username"
- Label2.text = "Password"
- Textbox1.text = ""
- Texbox2.text = ""
- Button1.text = "Sign In"
- checkbox / radiobutton untuk merubah kolom password menjadi tidak terlihat
setelah agan / sis selesai di tahap 1 sekarang lanjut ke tahap beikutnya yaitu tahap 2
Tahap 2 : Syntax
- klik button 2 kali
- masukan syntax berikut :
If TextBox1.Text = "Terserah Agan / Sis" And TextBox2.Text = "Terserah Agan / Sis" Then
Main.Show() <---("form yang dituju ketika sudah masuk")
Me.Hide() <--("form login langsung menghilang")
Else
msgbox("username atau password salah") <---("memunculkan pemberitahuan jika tidak valid)
End If
- klik 2 kali radibutton / checkboxnya
- masukan syntax berikut :
If CheckBox1.Checked = True Then
TextBox2.UseSystemPasswordChar = True
ElseIf CheckBox1.Checked = False Then
TextBox2.UseSystemPasswordChar = False
End If
Disini TS pake checkbox kalau agan / sis pake radiobutton tinggal ganti checkbox1.checkednya jadi radiobutton1.checked
NB kalau mau dibikin default passwordnya tidak terlihat, klik dua kali formnya ntar ada "namaform"_load blabla..... kemudian masukan syntax berikut :
TextBox2.UseSystemPasswordChar = True
dan syntax di radiobutton / checkbox pun harus diubah menjadi seperti berikut ini :
If CheckBox1.Checked = True Then
TextBox2.UseSystemPasswordChar = False
ElseIf CheckBox1.Checked = False Then
TextBox2.UseSystemPasswordChar = True
End If <-- cuma dibalik doang kok :D
Kira kira hasilnya menjadi seperti gambar dibawah ini NB ini pake yang default hide
Sekian dan terima kasih mohon maaf bila ada kekurangan coz TS masih newbi dan baru belajar :D
Special Thanks : Google, Visual Studio, and ManyMore
03.47
0 komentar:
Posting Komentar