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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  كيف اتعامل مع اتجاه النص DOX.1 8 187 10-11-18, 09:30 PM
آخر رد: DOX.1
  حذف جزء بسيط من النص ابو روضة 4 175 29-10-18, 05:30 PM
آخر رد: ابو روضة
  [سؤال] ضبط وتعديل معادلة تقسيم ساعات عمل الورديات herofox 8 299 03-09-18, 04:38 PM
آخر رد: herofox
  [VB.NET] كود لنسخ الجزء المظلل عليه من النص waelalmsry75 3 158 20-08-18, 08:39 PM
آخر رد: elgokr
  تعدد لون النص في TextBox او RichBox YousefOkasha 10 473 20-08-18, 05:30 AM
آخر رد: elgokr
  [كود] احتاج فكرة لعمل تقسيم الصنف الى حبة شدة كرتون فراس الغزي 2 174 20-07-18, 02:44 AM
آخر رد: sendbad100
  [سؤال] عندما أقوم بارسال كلام من تيكست الى صفحة ويب لو كان النص عربي يظهر ؟؟؟ dametucorazon 14 466 11-07-18, 06:19 AM
آخر رد: elgokr
  سؤال عن الاكمال التلقائي لصندوق النص hatem555 5 269 18-06-18, 08:25 AM
آخر رد: elgokr
  ما هي افضل طريقة لعمل جدول مجموعات متفرعة قاسم 6 414 02-06-18, 02:13 AM
آخر رد: sendbad100
Bug [VB.NET] مشروع سأحتاج فيه أكثر من ألف 1000 زر ما رأيكم sniperjawadino 33 2,938 08-05-18, 10:41 PM
آخر رد: viv

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


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