[حسن الغزي]

السلام عليكم
احتاج كود استثناء بمعنى اخر
لوكان لدينا 10 تيكست  واريد ان اضع فيهما رقم 90 ماعدا التيكست الرابع والثامن على سبيل المثال
كيف سيكون الكود ارجو المساعدة

[Omar Abd]

السلام عليكم
يمكنك عمل هذا الكود لاستثناء مربع نص :
و لكن يجب عمل Index لمربع النص من 0 حتى 9

كود :

Dim i As Integer
For i = 0 To 9
If i = 4 Or i = 8 Then

Else
Text1(i).Text = "90"
End If
Next