PDA

View Full Version : اعمال تغییرات به صورت گروهی روی کنترل ها



martoor
یک شنبه 15 آبان 1390, 19:27 عصر
سلام دوستان، من چند کنترل CheckBox روی فرم دارم، می خوام یک سری تغییرات و چک های گروهی روی این کنترل ها داشته باشم. توی VB 6 این CheckBox ها رو حالت آرایه بهشون Index می دادم و توی حلقه ی For استفاده می کردم. توی VB.Net چون استاندارد هست فکر نمی کنم از این روش بشه این کار رو کرد و با توجه به تجربه ی برنامه نویسیم فکر می کنم اگه قابلیت Index دادن رو نداشته باشه، باید بشه از طریق دستور For...Each به صورت گروهی روشون این کار رو کرد. حالا از دوستان خواهشی که دارم اینه که در کل یه راهی بهم نشون بدن که این کار رو انجام بدم. تا حد امکان اگه این تیکه خط کدی که این کار رو انجام می ده رو بهم بدین ممنون می شم.

martoor
یک شنبه 15 آبان 1390, 21:07 عصر
چقدر واقعاً تو این انجمن به ضعیف تر ها کمک می شه :قلب:، بابا من تازه از VB 6 به VB.Net مهاجرت کردم، تو رو خدا یه کم کمک کنید :لبخند:

در مورد For Each فکر کنم درست فکر می کردم، چون تا یه جاهایی پیش رفتم:

For Each ctrl As CheckBox In GroupBox1.Controls
ctrl.Checked = True
Next

این تیکه کد تمام کنترل های از نوع CheckBox موجود در GroupBox1 رو تیک دار می کنه. ولی من می خوام، کنترل بیشتری داشته باشم، مثلا می خوام فقط Checkbox اولی و سومی رو تیک دار کنم. لطفا کمک کنید به من، یکی از برنامه هام رو می خوام از VB6 به VB.net تبدیل کنم، لنگ همینم :ناراحت:

Hossis
دوشنبه 16 آبان 1390, 00:14 صبح
http://barnamenevis.org/showthread.php?312250-%D9%BE%D8%A7%DA%A9-%DA%A9%D8%B1%D8%AF%D9%86-%D9%85%D8%AA%D9%86-%D8%AA%D9%85%D8%A7%D9%85%DB%8C-%D8%AA%DA%A9%D8%B3-%D8%A8%D8%A7%DA%A9%D8%B3%D9%87%D8%A7-%D8%AF%D8%B1-%DA%AF%D8%B1%D9%88%D9%BE-%D8%A8%D8%A7%DA%A9%D8%B3

Hossis
دوشنبه 16 آبان 1390, 00:16 صبح
dim I as integer
for Each ctrl As CheckBox In GroupBox1.Controls
I+=1
if I<4 then ctrl.Checked = True
Next