对XML数据使用XMLConvert

<?xml version="1.0" encoding="utf-8" ?>
<Data>
<String>Test</String>
<Integer>123</Integer>
<Double>1234.56</Double>
<Date>2003-01-01/</Date>
</Data>

这段代码在C:/Temp目录中寻找名为Convert.xml的XML文件：

Dim xmlDoc As New System.Xml.XmlDocument()

xmlDoc.Load("c:/temp/Convert.xml")

Dim newString As String
newString = xmlDoc.SelectSingleNode("//String").InnerText
Debug.WriteLine(newString)

Dim newInteger As Integer
newInteger = System.Xml.XmlConvert.ToInt32( _
xmlDoc.SelectSingleNode("//Integer").InnerText)
Debug.WriteLine(newInteger)

Dim newDouble As Double
newDouble = System.Xml.XmlConvert.ToDouble( _
xmlDoc.SelectSingleNode("//Double").InnerText)
Debug.WriteLine(newDouble)

Dim newDate As DateTime
newDate = System.Xml.XmlConvert.ToDateTime( _
xmlDoc.SelectSingleNode("//Date").InnerText)
Debug.WriteLine(newDate)