[3booody]

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

كود :

Dim divs = WebBrowser1.Document.Body.GetElementsByTagName("div")
       For Each d As HtmlElement In divs
           If d.GetAttribute("className") = "epg-number" Then
               MsgBox(d.InnerText)
           End If
       Next