PDA

View Full Version : سوال: سوالی در مورد Mask & CheckBox



alifatehi
یک شنبه 16 تیر 1387, 13:51 عصر
سلام
خوبی

می خواستم کد ساده در مرود چک باکس ها بنویسم که زمانی که چک باکس تیک می خورد optionButton , label , text boxها غیرفعال و فعال شوند

البته قابل ذکر زمانی که opt غیرنقدی اقساط اجرا می شود هر 3 مورد غیر فعال و با زدن تیک ها فعال شود >


ببخشید یک سوال دیگه آیا می شود طبق تصویر اعداد ماسک رو فارسی نوشت

با تشکر

تصویر 1 غیر فعال
تصویر 2 فعال

اوبالیت به بو
یک شنبه 16 تیر 1387, 21:18 عصر
می خواستم کد ساده در مرود چک باکس ها بنویسم که زمانی که چک باکس تیک می خورد optionButton , label , text boxها غیرفعال و فعال شوند

Label يه كنترل UnBound هستش پس نميشه كاريش كرد.
اما Text Box يا Option Button


Select Case CheckBox.Value
Case 0
TextBox1.Enabled = False
OptionButton1.Enabled = False
Case 1
TextBox1.Enabled = True
OptionButton1.Enabled = True
End Select

alifatehi
دوشنبه 17 تیر 1387, 13:33 عصر
ببخشید ایا نمونه برنامه است یا نمونه عملی از آن

دوست عزیز می خواهم وقتی frame باز می شود فقط چک باکس فعال باشد و با تیک زدن آن بقیه فعال شوند .

bobrus
دوشنبه 17 تیر 1387, 15:24 عصر
اگه منظورت اينه كه اگه تيك زدي ديده بشه و اگه برداشتي مخفي بشه بجاي Enable از Visible استفاده كن


Select Case CheckBox.Value
Case 0
TextBox1.visible = False
OptionButton1.visible = False
Case 1
TextBox1.visible = True
OptionButton1.visible= True
End Select

samiraamiri
دوشنبه 17 تیر 1387, 15:27 عصر
با سلام
کد دوستمون obalitjoOon درسته و باید تو رویداد click چک باکس بنویسید مطمئن باشید درست کار می کنه

alifatehi
دوشنبه 17 تیر 1387, 15:39 عصر
اگه منظورت اينه كه اگه تيك زدي ديده بشه و اگه برداشتي مخفي بشه بجاي Enable از Visible استفاده كن


Select Case CheckBox.Value
Case 0
TextBox1.visible = False
OptionButton1.visible = False
Case 1
TextBox1.visible = True
OptionButton1.visible= True
End Select



عزیزم می خواهم نمایش بده اما غیز فعال باشه ( کم رنگ بشه )

و لازم بگم کد درسته اما زمان اجرا که چک باکس تیک نخورده فعال بوده و این کد زمانی فعال می شود که با چک باکس کار کنیم ( چند بار کلید کنیم)


با سلام
کد دوستمون obalitjoOon درسته و باید تو رویداد click چک باکس بنویسید مطمئن باشید درست کار می کنه

و لازم بگم کد درسته اما زمان اجرا که چک باکس تیک نخورده فعال بوده (منظورم labal , textbox , optionButton() و این کد زمانی فعال می شود که با چک باکس کار کنیم ( چند بار کلید کنیم)

samiraamiri
دوشنبه 17 تیر 1387, 15:52 عصر
اگر شما می خواید که در لود فرم این کنترل هاتون غیر فعال باشه خب باید تو لود فرم هم کد غیر فعالی رو بنویسید دیگه و می تونید مقدار چک باکستون رو به 1 تغییر دهید

Private Sub Form_Load()
CheckBox.Value = 0
TextBox1.Enabled = False

End Sub

alifatehi
دوشنبه 17 تیر 1387, 18:33 عصر
اگر شما می خواید که در لود فرم این کنترل هاتون غیر فعال باشه خب باید تو لود فرم هم کد غیر فعالی رو بنویسید دیگه و می تونید مقدار چک باکستون رو به 1 تغییر دهید

Private Sub Form_Load()
CheckBox.Value = 0
TextBox1.Enabled = False

End Sub



عزیزم جواب بمی ده

نه خطا می گیره نه کاری انجام می ده

jeus
چهارشنبه 19 تیر 1387, 16:32 عصر
اینو توی event چک باکس بنویس

textbox1.Enable = checkBox.Value

alifatehi
چهارشنبه 19 تیر 1387, 16:46 عصر
سلام
مچکر بابت جواب

عزیز خطا می گیره

لطف کن یک نمونه از سورس آن رو قرار بده

jeus
چهارشنبه 19 تیر 1387, 17:08 عصر
دوست من با VB کار نکرده ام زیاد اگر میدونی به دردت میخوره کد C# را بگذارم اما فکر نمیکنم کد بالا اشتباه باشه دوستان اگه میتونند در اصلاحش کمک کنند

Mbt925
پنج شنبه 20 تیر 1387, 11:17 صبح
یه نمونه براتون نوشتم که از یه روش جالب و کارا برای فعال/غیرفعال کردن همه ی کنترل های داخل فریم با یه حلقه استفاده می کنه.