چک کردن چک باکس های متوالی

[ameri110]

:گریه:سلام
من 80 تا تکست باکس روی صفحه دارم و باید بدونم که آیا همشون تیک خوردن یا نه
اسمشون ها یه این صورته:
check1(1)
check1(2)
.
.
.
تا اینجا که برنامه در ابتدای کاره فقط 1710 تا چک باکس دارم:متعجب: که باید چک شن:ناراحت: پس مطمئنا نمی تونم به طور دستی این کار رو بکنم:افسرده:
لطفا راهنمایی کنید:خجالت:
خیلی ممنون:قلب:

[shedayat]

:گریه:سلام
من 80 تا تکست باکس روی صفحه دارم...
check1(1)
check1(2)
.
.
.

منظورتون همون چک باکسه دیگه؟ :لبخند:

این کد می تونه مشکلت رو حل کنه.


For i = 1 To Check.Count
If Check(i).Value = 1 Then
MsgBox "Checked"
Else
MsgBox "Not Checked"
End If
Next

[ameri110]

:عصبانی: چرا به فکر خودم نرسید :لبخند:

منظورتون همون چک باکسه دیگه؟ :لبخند:
بله :لبخند: