یک متغیر تعریف کن اگر رمز اشتباه بود یک واحد بهش اضافه کن بعد یک دستور if بنویس اگر متغیر برابر با 3 بود تمامی کنترل ها رو غیرفعال کن به همین راحتی
Printable View
یک متغیر تعریف کن اگر رمز اشتباه بود یک واحد بهش اضافه کن بعد یک دستور if بنویس اگر متغیر برابر با 3 بود تمامی کنترل ها رو غیرفعال کن به همین راحتی
بیا اینم کد راستی این رو تو کافی نت نوشتم اشتباه بود ببخشید دیگه
dim Err1 as byte
if txtpassword.text<>"159" then
err1=err1+1
if err1=3 then
me.enable=false
endif
else
frmmain.show
endif