Ottenere posizione dell'elemento XML all'interno ciclo For Each

Question

Come ottengo la posizione dell'elemento XML in questo ciclo?

For Each objNode In objDoc.SelectNodes("//books/book")

 ???

Next

Quello che voglio in uscita sarebbe qualcosa di simile

1 2 3 4 ....

Answer 1

Probabilmente si desidera qualcosa di simile:

objBooks = objDoc.SelectSingleNode("//books")

Dim pos As Integer = 1
For Each book As XmlNode In objBooks.ChildNodes

   Console.Write(pos & " ")

   pos = pos + 1
Next