Vb.net xml read/write method (1)

Dim domXmlDocument As System. Xml. XmlDocument
Dim tmpPath As String = AppTempFilePath
Dim xmlFile As String = tmpPath + "estXml. xml"
'Form loading event
Private Sub TestXml_Load (ByVal sender As System. Object, ByVal e As System. EventArgs) Handles MyBase. Load
'Xml reading process passed the test
Dim domXmlDocument As System. Xml. XmlDocument
Dim tmpPath As String = AppTempFilePath
Dim xmlFile As String = tmpPath + "estXml. xml"
Dim reader As System. Xml. XmlReader = Nothing
Try
Reader = New Xml. XmlTextReader (xmlFile)
'Reader.
While reader. Read
Me. lboxXml. Items. Add (reader. Name + reader. Value)
End While
Catch ex As Exception