تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] البحث RichTextBox
#1
اريد كود للبحث RichTextBox

مابداخل الريش تيكست كالاتي

[year1]
2005
2010
[end]
[year2]
2005
2010
2011
2013
[end]

طبعا السنوات كثيرة وليست ثابتة العدد او العناصر
اريد كود البحث عن السنة وعند وجود السنة بالبحث يستخلص اللينات اسفل السنة حتي كلمة end
السنوات كثيرة
مثلا بحثت عن year1
يظهر بالتيكست بوكس هذة العناصر بعد استخلاصها من الريش بوكس يعني استخلص مابعد حملة البحث الي end

[year1]
2005
2010
الرد }}}
تم الشكر بواسطة:
#2
اقترح ان تكتب النصوص المراد البحث عنها بصيغ html حتى يسهل البحث عنها باستخدام ادوات جاهزة
انظر للسؤال
http://vb4arb.com/vb/Thread-%D9%85%D8%B3...chhtextbox
الرد }}}
تم الشكر بواسطة:
#3
كود :
Public Function GetBody(ByVal str As String, ByVal start As String, ByVal [end] As String) As String
        Dim len As Integer = 0
        len = (str.IndexOf(start) + start.Length)
        len = (str.IndexOf([end]) - len)
        Return str.Substring((str.IndexOf(start) + start.Length), len)
    End Function
كود :
RichTextBox2.Text = GetBody(RichTextBox1.Text, "[year1]", "[end]")
الرد }}}
تم الشكر بواسطة: السندبااد
#4
اكواد تعمل جيدا Aly El-Haddad جزاك اللة الف خير

الف شكر لك اخي في اللة مسعود علي متابعة وردك علي الموضوع انا تابعت مواضيع كتير عن البحث وعندي اكواد البحث ولكن الفكرة استخلاص اسطر جديدة بالنسبة لي جزاكم اللة الف خير علي المتابعة
الرد }}}
تم الشكر بواسطة:



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


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