[D-Z]

السلام عليكم اخواني 

رايد تعديل هذا الكود 

وجعل الكود عند سحب الاسماء من الموقع وضع امامها 

@yahoo.com

لكي يصبح اميل 

الكود للتعديل علية 

كود :

  Dim name As HtmlElementCollection = WebBrowser1.Document.GetElementsByTagName("div")
       For Each elem As HtmlElement In name
           If elem.GetAttribute("id") = ("medNameColumns") Then
              listbox1.Text = elem.InnerText
           End If
       Next

وشكرا للجميع