تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
سؤال حول تعديل على نص
#1
السلام عليكم احبابي في الله
عندي سؤال بيسط 
كود :
#EXTINF:-1 tvg-id="" tvg-name="Bein2 1M" tvg-logo="" group-title="",Bein2 1M

اريد حذف كل شيء مكتوب قبل الفاصل " , "

انا اعمل على هذا الكود 
كود :
Dim Lines As String() = IO.File.ReadAllLines("Playlist\FirAs-" & Form1.TextBox3.Text & ".m3u")
       Dim dt As New DataTable

       Dim row(1) As String

       For i As Integer = 0 To Lines.Length - 1
           Dim line As String = Lines(i).ToString.Trim
           If line.StartsWith("#EXTINF") Then
               row(0) = line.Replace("#EXTINF:-1(.+?.+),", "").Trim
           ElseIf line.StartsWith("http://") Then
               row(1) = line.Trim
               Dim a As ListViewItem
               a = ListView1.Items.Add(row(0))
               a.SubItems.Add(row(1))
           End If
       Next
لو حد يصحح الخطأ و شكرا
الرد
تم الشكر بواسطة:
#2
السلام عليكم اخي الكريم
مافهمته من كلامك انك تريد قص النص وتأخذ الجزء الذي بعد الفاصلة
هذا المثال يبين الطريقة و يمكنك الاستفادة منه في ماتريد
ارجو ان بكون طلبك قد تحقق


الملفات المرفقة
.rar   cut string.rar (الحجم : 64.97 ك ب / التحميلات : 10)
الرد
تم الشكر بواسطة: rnmr , trakktour
#3
جرب هذا
كود :
row(0) = line.Split(",")(1)
الرد
تم الشكر بواسطة: trakktour , ابراهيم ايبو
#4
بما ان الجزء الذي يأت بعد الفاصلة هو الأخير فسيكون العنصر الأخير في المصفوفة 
الرد
تم الشكر بواسطة: rnmr , rnmr , trakktour , trakktour
#5
(01-10-18, 01:58 AM)ابراهيم ايبو كتب :
السلام عليكم اخي الكريم
مافهمته من كلامك انك تريد قص النص وتأخذ الجزء الذي بعد الفاصلة
هذا المثال يبين الطريقة و يمكنك الاستفادة منه في ماتريد
ارجو ان بكون طلبك قد تحقق

شكرا يا غالي تم حل المشكل الله يوفقك

(01-10-18, 02:03 AM)ابراهيم ايبو كتب :
بما ان الجزء الذي يأت بعد الفاصلة هو الأخير فسيكون العنصر الأخير في المصفوفة 

الله يحفظك اخي العزيز تم حل المشكل

(01-10-18, 02:02 AM)rnmr كتب : جرب هذا
كود :
row(0) = line.Split(",")(1)

شكرا حبيبي الله يحفظك تم حل المشكل
الرد
تم الشكر بواسطة: ابراهيم ايبو
#6
(01-10-18, 02:06 AM)trakktour كتب :
(01-10-18, 02:02 AM)rnmr كتب : جرب هذا
كود :
row(0) = line.Split(",")(1)

شكرا حبيبي الله يحفظك تم حل المشكل


عفواً عمو
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  سؤال في الفورم الذي يظهر فيه التقرير Emam emam 2 47 17-02-19, 03:59 PM
آخر رد: Emam emam
  سؤال فى صفوف الداتا جريد فيو احمد خطاب 1 77 07-02-19, 03:51 AM
آخر رد: حريف برمجة
  [كود] سؤال لأهل الخبرة كيف يمكن استدعاء شااشة لبرنامج تم برمجتة بالجافا dametucorazon 1 87 06-02-19, 10:35 AM
آخر رد: dametucorazon
  سؤال حول امر الطباعة الفورية Osama Bayoumy 6 595 02-02-19, 01:08 PM
آخر رد: atef_020
  مطلوب معاينة المثال والمساعدة في تعديل الكود وفقكم الله فراس الغزي 8 239 29-01-19, 10:43 PM
آخر رد: فراس الغزي
  طلب تعديل كود استعلام new_programer 2 98 25-01-19, 11:44 PM
آخر رد: حريف برمجة
  تعديل مثال العملاء الغير مسددين القسط new_programer 7 301 25-01-19, 08:40 PM
آخر رد: new_programer
  سؤال BackgroundWorker new_programer 5 204 23-01-19, 06:50 PM
آخر رد: %Eman%
  سؤال بخصوص تشيك ليست بوكس نور الهدى الهدى 3 143 22-01-19, 07:51 AM
آخر رد: حريف برمجة
  [SQL] مطلوب تعديل كود الاستعلام من جدولين غير مرتبطين فراس الغزي 10 333 18-01-19, 11:05 PM
آخر رد: asemshahen5

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


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