Visual Basic - Cargar campos en matriz

Hola a todos, tengo el sig. codigo.. a ver quien puede dar una mano a este principiante:
Do Until miSobre.EOF
Resta = miSobre![IM01]
If Resta = 0 Then
Resta = " "
miSobre.Edit
miSobre![IM01] = Null
miSobre.Update
End If
miSobre.MoveNext
Loop
si tengo los campos IM01 a IM30 como tendria que quedar el codigo para no hacer un bucle por cada campo? muchas gracias

Uhmmm.. tienes que investigar colega... soplarte un poco el MSDN pulsando F1 en vb... te dejo un tip y espero que tomes la elección correcta... MIra hay varias formas de referenciar a un campo de ADO entre ellas :
1. TuObjRstTabla!TuCampo = "ValorAAsignar"
2. TuObjRstTabla.Fields("TuCampo") = "ValorAAsignar"

SI eliges la correcta vas a poder hacer un bucle...