Visual Basic - Recorrer columnas con For

Hola a todos,

Quiero recorrer las columnsa de un recordset mediante un for algo así:

For i = 0 To AdodcLinea.Recordset.RecordCount
If IsNull(AdodcRef.Recordset.Fields(i).Value) Then
MsgBox "Registro nulo"
Else
MsgBox AdodcRef.Recordset.Fields(i).Value
End If
Next i

La cosa es que me da error, pero si pongo un número fijo dentro del field si que me devuelve el valor de la columna.

So me pudiesen ayudar con esto o mostrarme otra forma similar estaría muy agradecido.

Saludos

For i = 0 To AdodcLinea.Recordset.RecordCount - 1

RecordCount dá el número de registros del recordset, como empieza por cero tienes que restarle uno.