PDA

View Full Version : سوال: تغییر Enable تمامی کنترلها



roya_hh
چهارشنبه 14 اسفند 1387, 10:03 صبح
چطور میشه تمام کنترلهای روی یک فرم را بجز یکی enable آنها را false کرد؟

sh2007
چهارشنبه 14 اسفند 1387, 10:08 صبح
سلام
اونها رو توي يه گروپ باكس بذار بعد انيبل گروب باكس رو فالس كني همه غير فعال مي شن و برعكس براي اون يكي هم بايد كدبنويسي

anooshiran
چهارشنبه 14 اسفند 1387, 13:40 عصر
سلام دوست عزيز

به غير از روش درستي كه دوست عزيز sh2007 فرمودند از روش زير نيز ميتواني استفاده كني.




Private Sub EnableCotrols()
For Each C As Control In Me.Controls
If Not C.Name = "TextBox1" Then
C.Enabled = False
End If
Next
End Sub




بر فرض Textbox1 همان كنترلي است كه نميخواهي enable آن را False كني