تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
حل مشكلة مربع الأكواد في مواضيع الموقع
#1
السلام عليكم
يمكنكم إستخدام هذه الدالة لحذف الاقواس التي تظهر داخل مربع النص البرمجي

كود :
Function RemoveHilals(ByVal Text As String) As String
       Dim txt As String = Text
       Dim ret As String = ""


       Dim h As Boolean = True
       Dim i As Integer = 0

       Do While i <= txt.Length - 1

           If txt.Chars(i) = "[" Then
               h = False
           ElseIf txt.Chars(i) = "]" Then
               h = True
               GoTo 1
           End If

           If h = True Then
               ret &= txt.Chars(i)
           End If
1:          i += 1
       Loop


       Return ret
   End Function
الرد }}}}
تم الشكر بواسطة: VB_Local
#2
عاشت الايادي
بارك الله فيك
استغفر الله العظيم واتوب اليه  Heart
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [مشاريع و مواضيع] إسهاماتي في المنتدى الغالي سعود 7 2,700 30-08-16, 12:32 AM
آخر رد: الكاتب

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


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