vb.net xml SelectSingleNode example

Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
Dim sc As New StreamReader("checks.xml")
Dim xr As New XmlTextReader(sc)
Dim doc As New XmlDocument
Static cc As Integer
doc.Load(xr)
Dim xnlist As XmlNodeList = doc.SelectNodes("Checks/Check")
Dim dt As XmlNode = xnlist.Item(cc).SelectSingleNode("Date")
Label1.Text = dt.InnerText
Dim ckn As XmlNode = xnlist.Item(cc).SelectSingleNode("CheckNum")
Label2.Text = ckn.InnerText
Label3.Text = xnlist.Item(cc).SelectSingleNode("Amount").InnerText
Label4.Text = xnlist.Item(cc).SelectSingleNode("To").InnerText
cc += 1
End Sub