11-12-13, 11:24 PM
أخي الكريم
هل انت تقصد انك تريد ان يحول الفراغ إلى سطر جديد
وإذا كان يوجد اكثر من فراغ متتالي يحول الأولى إلى سطر جديد والبقية يكتبها فراغ
مثلا لو كان لدينا هذي الكلمة
لنفرض ان النقطه عبارة عن فراغ لان المنتدى لا يقبل فراغين متتاليين (Easy.4..ever)
يكتبها هكذا
Easy
4
.ever
إذا كان نعم أضف في كود الأخ Sajad متغير من نوع Boolean حتى يكون فلتر للفراغات الزائدة
الكود بعد التعديل
معنى الكود ان إذا كان يوجد فراغ وفي نفس الوقت الفلتر مغلق قم بتحويل الفراغ إلأى سطر جديد وقم بتفعيل الفلتر
خلاف هذا يقوم بإضافة الحرف أو المسافه وفي نفس الوقت يسأل هل قام بإضافة حرف أو مسافه
إذا كان حرف يقوم بإقفال الفلتر أما إذا كان مسافة فلا يقفل الفلتر حتى ينتهي من المسافات المتتالية
هل انت تقصد انك تريد ان يحول الفراغ إلى سطر جديد
وإذا كان يوجد اكثر من فراغ متتالي يحول الأولى إلى سطر جديد والبقية يكتبها فراغ
مثلا لو كان لدينا هذي الكلمة
لنفرض ان النقطه عبارة عن فراغ لان المنتدى لا يقبل فراغين متتاليين (Easy.4..ever)
يكتبها هكذا
Easy
4
.ever
إذا كان نعم أضف في كود الأخ Sajad متغير من نوع Boolean حتى يكون فلتر للفراغات الزائدة
الكود بعد التعديل
PHP كود :
Dim FilterSp As Boolean = False
For i = 0 To TextBox1.Text.Length - 1
If TextBox1.Text(i) = " " And FilterSp = False Then
TextBox2.Text += vbNewLine
FilterSp = True
Else
TextBox2.Text += TextBox1.Text(i)
If TextBox1.Text(i) <> " " Then FilterSp = False
End If
Next
معنى الكود ان إذا كان يوجد فراغ وفي نفس الوقت الفلتر مغلق قم بتحويل الفراغ إلأى سطر جديد وقم بتفعيل الفلتر
خلاف هذا يقوم بإضافة الحرف أو المسافه وفي نفس الوقت يسأل هل قام بإضافة حرف أو مسافه
إذا كان حرف يقوم بإقفال الفلتر أما إذا كان مسافة فلا يقفل الفلتر حتى ينتهي من المسافات المتتالية
<---------------------------------------------------------------->