Kali ini saya akan menjelaskan tentang penggunaan IF.....THEN......END IF
Code ini di dapat manfaatkan untuk Memberi Password untu program kalian,mari kita praktek
Alat Yang Diperikan :
1. 1Textbox (Caption=Kosongkan,Passwordchar=*)
2. 1commandbuton (OK)
3. 1label (caption=Password)
Cara :
Klik 2kali command1 lalu masukan
if text1.text = "Passwordnya" then
text1.visible = false
command1.visible = false
label1.visible = false
else
msgbox "Password Salah"
end if
Selesai
Penjelasan :
Jika User mengklik command1 maka semua object akan hilang karena visible'y false
dan jika teks yang ada di textbox tidak sama dengan Passwordnya maka akan muncul msgbox
Bila Kurang Ngerti Silahkan Komen
Code ini di dapat manfaatkan untuk Memberi Password untu program kalian,mari kita praktek
Alat Yang Diperikan :
1. 1Textbox (Caption=Kosongkan,Passwordchar=*)
2. 1commandbuton (OK)
3. 1label (caption=Password)
Cara :
Klik 2kali command1 lalu masukan
if text1.text = "Passwordnya" then
text1.visible = false
command1.visible = false
label1.visible = false
else
msgbox "Password Salah"
end if
Selesai
Penjelasan :
Jika User mengklik command1 maka semua object akan hilang karena visible'y false
dan jika teks yang ada di textbox tidak sama dengan Passwordnya maka akan muncul msgbox
Bila Kurang Ngerti Silahkan Komen
No comments:
Post a Comment