منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : طلب كود
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم
احتاج كود استثناء بمعنى اخر
لوكان لدينا 10 تيكست  واريد ان اضع فيهما رقم 90 ماعدا التيكست الرابع والثامن على سبيل المثال
كيف سيكون الكود ارجو المساعدة
السلام عليكم
يمكنك عمل هذا الكود لاستثناء مربع نص :
و لكن يجب عمل 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