主题：求教如何解析 调用webservice端口后返回的xml文件？

Dim url As String
Dim http As Object
url = "http://118.145.18.236:9999/smsGBK.aspx?action=send&userid=xxxx&account=xxxx&password=xxxx&mobile=12345678&content=【中心】测试测试&sendTime=&extno="
http = CreateObject("MSXML2.XMLHTTP")
http.Open("post", url, False)

http.send()
MessageBox.Show(http.responseXML.GetElementsByTagName("returnstatus")(0).text)
MessageBox.Show(http.responseXML.GetElementsByTagName("message")(0).text)