+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28)
+---- الموضوع : طلب كود (/showthread.php?tid=24319)
طلب كود - حسن الغزي - 26-03-18
السلام عليكم
احتاج كود استثناء بمعنى اخر
لوكان لدينا 10 تيكست واريد ان اضع فيهما رقم 90 ماعدا التيكست الرابع والثامن على سبيل المثال
كيف سيكون الكود ارجو المساعدة
RE: طلب كود - Omar Abd - 26-03-18
السلام عليكم
يمكنك عمل هذا الكود لاستثناء مربع نص :
و لكن يجب عمل 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