Recorrer archivo XML recursivamente

[juantux]

Supongamos el siguiente xml:

Código:

<ejemplo>
   <encabezado>
      <hijo1></hijo1>
      <hijo2></hijo2>
      <hijo3></hijo3>
      <hijo4></hijo4>
   </encabezado>
</ejemplo>

Como puedo recorrer este archivo xml desde el nodo root hasta los nodos hijos sin nombrar los nodos por su nombre. Es decir con puros ciclos hasta llegar los nodos hijos.

Algo he logrado:

Código:

        Dim objLectorXml As New XmlDocument()
        objLectorXml.Load(Me.XmlBanco)

        Dim NodoInicial As XmlNode = objLectorXml.DocumentElement
        Dim ListaNodos As XmlNodeList = NodoInicial.ChildNodes

        For Each NodoInicial In ListaNodos
            'Si tiene nodos hijos, recorremos los elementos y atributos
            If NodoInicial.ChildNodes.Count > 0 Then
                Dim ListaNodosHijos As XmlNodeList = NodoInicial.ChildNodes
                For Each NodoHijo As XmlNode In ListaNodosHijos
                    Console.WriteLine(NodoInicial.Name)
                Next
            End If
            'NodoInicial = NodoInicial.NextSibling
        Next

Agradecería cualquier apoyo.

Saludos,
Juantux