ايران ويج

سلام دوستام من تو یک فورم چند تا check دارم مثلا من تمام check ها رو تیک زدم

حالا می خوام با یک command botton

وقتی رو دکمه کلیک کردم تمام چکها برداشته بشه ممنون میشم اگه کمک ام کنید

تقریبا مثل این کد ولی برای چک

""=text1

اما من برای چک باکس یا همون check1 می خوام ممنون می شم هر کی کمک کنه

یک سوال دیگه هم داشتم من در لود فرم کد فارسی کننده صفحه کلید رو گذاشتم

فارسی هم مینویسه اما اعداد یعنی نامبر به فارسی نمی نویسه چرا ؟

امید وارم به هر دو سوال ام پاسخ بدید ممنون می شم

سوال اولت این کارو باید کنی:
Dim Ctr as Control
For Each Ctr In From.Controls
If Typeof Ctr Is CheckBox Then
ctr.Value=0
end if
Next

ممنون سهیل جان حالا سوال دوم ام هم خیلی مهمه ممنون میشم هرکی جواب بده

منم با این مشکل بر خوردم. اما وقتی اول حرفی رو وارد کنی و پشت سرش اعداد رو اعداد رو هم فارسی مینویسه ولی فقط عدد بدب فارسی نمیده

با سلام
د رخصوصیات تکست باکس
Right to left=true
راست به چپ کنید تا مشکل حل شود

سلام آقای ارفعی من کد فارسی کننده صفحه کلید رو تو فرم زدم و تو تکست باکس

فارسی هم مینویسه اما اعداد فارسی نمی نویسه همو خاصیت Number

RightToLeft = True این هم وارد کردم باز هم نشد !

ممنون میشم اگه کمک ام کنید

باید توی تنظیمات ریجستری..
نحوه خوندن عدد رو ملی (بومی ) کنی.
مشکل شما اینه که الان بین المللی !

دوست عزیز شما مشکل منو نگو کمک ام کن تا مشکل بر طرف شه

jabertnt نوشته است:دوست عزیز شما مشکل منو نگو کمک ام کن تا مشکل بر طرف شه

یعنی مشکل شما بوسیله ریجستری حل میشه .

HKEY_CURRENT_USER\Control Panel\International

امیدورام که بازم مشکل شما رو بیان نکرده باشم

لطفا تمتم کدی که در فرم یا در هرجایی باید بنویسم ذکر شود و بنویسید

ممنون می شم