اضافة باعلى الكود الفورم
Imports System.Text.RegularExpressions
واستخدم
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)
من اضافة الاخ سعود
الكود الموضح يستخدم على التالى
<[ip=×××.×××.×××.×××]>
قم بتعديل الكود حسب نتيجة اخراج الكود من قيمة textbox
تحياتى
بارك االله فى الاخ سعود والاخ جوكر والله يوفقكم ويسعدكم شكرا لمساعدتكم