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 صبح
یه نمونه براتون نوشتم که از یه روش جالب و کارا برای فعال/غیرفعال کردن همه ی کنترل های داخل فریم با یه حلقه استفاده می کنه.
vBulletin® v4.2.5, Copyright ©2000-1403, Jelsoft Enterprises Ltd.