سلام
فرض کنید میخوایم از فایل متنی که ضمیمه کردم شماره موبایل ها رو که با 0912 شروع میشن رو جدا کنیم و توی یه لیست باکس درج کنیم
میدونم که میشه با Regex این کارو کرد.

خودم کدی براش نوشتم ولی مشکل داره و درست کار نمیکنه...!

این تکه کدیه که خودم نوشتم برای جدا کردن شماره موبایل ها از فایل:

    Dim s = Web_tel.Document.Body.InnerText.ToLower.TrimStart

Dim mc_tel As MatchCollection = Regex.Matches(s, "([0912]+)([ -][0-9]{11,20})")

For i = 0 To mc_tel.Count - 1
List1_tel.Items.Add(mc_tel(i).Value)
Next



میشه کمکم کنید؟


فایل ضمیمه