[سعود]

حبيت اشارك بالموضوع باستخدام الـregular expression
لنفترض ان النص المطلوب هو بالتنسيق التالي

كود :

<[ip=77.55.11]>

مخزن بمربع نص الكود سيكون كالتالي

كود :

Dim ma As Match = Regex.Match(TextBox2.Text, "(<\[ip=)(.*)(\]>)")
        Dim ip As String = ma.Groups(2).Value
        MsgBox(ip)
        Dim all As String = ma.Value
        TextBox2.Text = TextBox2.Text.Replace(all, String.Empty)