Bır sıfre ıslemı

*GEREKEN KONTROLLER:1 text,1buton
*KODLAR:
PRIVATE SUB FORM_LOAD()
if inputbox("sifreyi giriniz") <> "sifre" then
msgbox ("sifreyi bilemedin islem yapamazsin")
form1.locked=true
end if
end sub
*ACIKLAMA:
bu kod ile kullanici sifreyi bilmedigi takdirde islem yapmasini engeller 

Categories: Visual Basic