تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] تقسيم النص الى مجموعات كل واحده 1000 حرف
#1
Lightbulb 
السلام عليكم
شباب عندي نص طوييل جدا
واحتاج ان اقسمه باخذ كل 1000 حرف مجموعه واحده
يعني لو عندي نص عدد الاحرف 2000 حرف انا احتاج ان اقسم ال 2000
الى مجموعتين كل مجموعه 1000 حرف اتمنى وصلت الفكره
واذا ممكن تساعدوني لأن ما عندي اي فكره عن الكود المطلوب
هم يسرقون والقانون كتب لنا...
بعض اسهاماتي

الرد
تم الشكر بواسطة:
#2
وعليكم السلام ،،

لنفرض النص موجود في تكست بوكس 2

الكود يكون كالتالي :

كود :
MsgBox(TextBox2.TextLength)
       For i = 1 To TextBox2.TextLength
           MsgBox(Mid(TextBox2.Text, i, 1000))
           i = Val(i) + 999
       Next
يا رحمن الدنيا والآخرة ورحيمهما
الرد
تم الشكر بواسطة: DK-x , DK-x , Rabeea Qbaha , elgokr



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم