用这种方式手工分析xml:http://www.foxtable.com/mobilehelp/topics/0171.htm
比如
Dim xml As String = "<xml><to>George</to><from>John</from><content>Don't forget the meeting!</content></xml>"
Dim xo As Foxtable.XObject = Foxtable.XObject.Parse(xml)
Dim r As Row = Tables("表A").AddNew
r("发送人") = xo("to")
r("接收人") = xo("from")
r("内容") = xo("content")