تيك زدن هرچي checkbox رو فرم هست

[crying sphere]

سلام
من مي خوام هر چي چك باكس رو فرم هست رو با زدن يك دكمه تيكدار كنم يا تيكشون رو بردارم . مي دونم بايد با for each اين كارو انجام بدم ، اما چطور ؟ كدش 3 يا 4 خط بيشتر نيست . كسي كدشو سراغ داره به من كمك كنه ؟ ممنون

[Shahram_Shobeiri]

For Each ctrl In parent.Controls
If TypeOf ctrl Is CheckBox Then ctrl.checked = True
Next

[crying sphere]

For Each ctrl In parent [or Me].Controls
If TypeOf ctrl Is CheckBox Then ctrl.checked = True
Next


با تشكر فراوان از شما دوست عزيز

اين كد رو هم كه برگرفته از كد دوست عزيز است من اضافه كنم كه اگر checkbox ها توي groupbox بودند رو هم تيك بزنه :




For Each ctrl In Me.GroupBox1.Controls
If TypeOf ctrl Is CheckBox Then ctrl.checked = True
Next