تقييم الموضوع :
  • 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 ك ب / التحميلات : 5)
الرد
تم الشكر بواسطة: 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)

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


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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  سؤال فى بحث بالتاريخ احمد خطاب 1 26 منذ 4 ساعة مضت
آخر رد: larbihamri
  [VB.NET] سؤال اسيل1 1 38 اليوم, 12:58 AM
آخر رد: ابراهيم ايبو
  سؤال بخصوص البحث باستخدام التاريخ عن طريق WebService masry4u 3 76 08-12-18, 08:36 PM
آخر رد: masry4u
Heart سؤال عن حساب السن (العمر) عن طريق تاريخ الميلاد ahmadpal 10 183 07-12-18, 04:52 PM
آخر رد: ahmadpal
  سؤال بخصوص الكتابة داخل داتا جريد احمد خطاب 3 76 05-12-18, 11:35 AM
آخر رد: احمد خطاب
  [VB.NET] سؤال عن الداتا جريد فيو M.SOFT 1 61 04-12-18, 04:31 AM
آخر رد: محمد كريّم
Star سؤال بخصوص جدول فاتوره المشتريات ، vb2010 0 59 30-11-18, 08:57 PM
آخر رد: vb2010
  [سؤال] سؤال عن موضوع الكريستال ريبورت m_eljabo 1 56 29-11-18, 10:57 PM
آخر رد: baha
  سؤال في إضافة مكتبه Emam emam 1 60 29-11-18, 04:24 PM
آخر رد: ابراهيم ايبو
  سؤال بخصوص الديف اكسبرس ابو روضة 15 258 28-11-18, 01:23 PM
آخر رد: ابو روضة

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


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