Dim xml As String = "<?xml version=""1.0""?><PingResponse xmlns=""https://mws.amazonservices.com""><Timestamp timestamp=""2018-08-22T16:54:45.702Z"" ></Timestamp></PingResponse>"
Dim doc As New Xml.XmlDocument
doc.LoadXml(xml)
msgbox(doc.DocumentElement.FirstChild.Attributes.GetNamedItem("timestamp").Value)