主题：表达式？

Dim strXML = Tables("表A")(0,0)

Dim xmlDoc As New System.XML.XmlDocument

xmlDoc.LoadXml(strXML)

Dim ndList As System.XML.XmlNodeList = xmlDoc.GetElementsByTagName("ADDRESS_value")

For i As Integer = 0 To ndList.count - 1 '取出所有的 ADDRESS_value

    output.Show(ndList(i).ChildNodes(1).Attributes.GetNamedItem("state").value) '显示 省份

Next