[LilLoco]

а структура этого xml именно нужна такая?

Ну в общем вот какая картина:

У типа XmlNode есть свойство NextSibling, которое, как я понял, пока есть еще элементы с одним "названием" next4 возвращает следующий XmlNode.
То есть получается так:

Код:

Dim XN As XmlNode = Nothing
...........
XN = node("next4")
при добавлении первой строки берем XN.InnerText
While(пока есть еще элементы)
XN = XN.NextSibling;
Me.DataGridView1.Rows.Add("", "", "", XN.InnerText)
EndWhile

Осталось сделать проверку на существование других элементов.

P.S. C VB не знаком, могут быть ошибки...