منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : استخراج regex
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
                                                                         السلام عليكم ورحمة الله وبركاته


اريد استخراج regex للبحث عن روابط في هذه الصفحة



كود :
<a class="web-bing__title" href="https://en.wikipedia.org/wiki/Algiers" data-thash="b4nIxcaV5KLXMAD9YFjV" data-extra="p=0&amp;b=bing" target="_blank"><b>Algiers</b> - <b>Wikipedia</b></a>


                                                                                                             Huh Huh Huh
وعليكم السلام ورحمة الله وبركاتة


كود :
       Dim strRegex As String = "<?href\s*=\s*[""'].+?[""'][^>]*?"
       Dim myRegex As New Regex(strRegex, RegexOptions.None)
       For Each myMatch As Match In myRegex.Matches(RichTextBox1.Text)
           If myMatch.Success Then
               MsgBox(myMatch.Value)
           End If
       Next