ايران ويج

من میخوام با for each تمام textbox های روی فرمم رو enable آنها رو false کنم ولی با for each مشکل دارم

TextBox های شما باید همه از یک Collection باشن یعنی مثلا Textbox1 رو چند بار کپی کنی و تکست باکس هایی بسازی با یک اسم ولی Index های متفاوت . کد زیر اون وقت اینکار رو برات انجام میده :

بدون Index هم ميشه:
Dim t As Object
For Each t In Controls
If TypeOf t Is TextBox Then t.Enabled = False
Next

سلام.
کد ممد این برتری رو داره که حلقه کمتر میچرخه و سرعت برنامه میره بالاتر. کد ajlajlajl هم این برتری رو داره که نیازی نیست تکس باکس ها از یه collection باشن. البته برای مثلا 50 تا کنترل روی فرم قضیه افزایش سرعت محسوس نیست.