Dunkel xmlDocObj som XmlDocument = ingenting
Försök
xmlDocObj = nya XmlDocument
xmlDocObj.Load (”http://client5.google.com/complete/search?hl=en-us&q=pontiac gx&client=ie8&inputencoding=UTF-8&outputencoding=UTF-8”)
Dunkel nodeList som XmlNodeList = xmlDocObj.GetElementsByTagName (”text”)
För varje objekt som XmlElement i nodeList
Debug.Print (item.InnerText)
Därefter
Fånga före detta som undantag
MsgBox (före detta. Meddelande)
Avsluta försök
|