xavis

Dim xml As String = "XML код полученный из ВК"
dim status as string=""
Dim myXml As New Xml.XmlDataDocument
myXml.LoadXml(xml)
status = myXml.SelectSingleNode("/response/text").InnerText