Visual Basic - ciclo

Buenas como podria convertir esto en un ciclo en lugar de repetirlo innecesariamente :S, esto se tiene que ir cumpliento si text2.text es diferente a vacio, luego si text10 es diferente a vacio y asi sucesivamente.GRACIAS

'Data5.Recordset.AddNew
'Data5.Recordset.Fields("idfactura") = pedido.Text
'Data5.Recordset.Fields("idcodigo") = Text2.Text
'Data5.Recordset.Update

'Data5.Recordset.AddNew
'Data5.Recordset.Fields("idfactura") = pedido.Text
'Data5.Recordset.Fields("idcodigo") = Text10.Text
'Data5.Recordset.Update

'Data5.Recordset.AddNew
'Data5.Recordset.Fields("idfactura") = pedido.Text
'Data5.Recordset.Fields("idcodigo") = Text18.Text
'Data5.Recordset.Update

Tienes que poner indice a Text (Propiedad Index), con lo que tendrás Text(1),Text(2),Text(3), etc i entonces la cosa quedaría así

if Text(index)<>"" then
Data5.Recordset.AddNew
Data5.Recordset.Fields("idfactura") = pedido.Text
Data5.Recordset.Fields("idcodigo") = Text(index).Text
Data5.Recordset.Update
Endif

Ok gracias, y como colocaria el acumulador??
Para que vaya incrementando 8
GRACIAS

¿Acumulador?, ¿que acumulador?, no hay nada que acumular, el indice viene en el nombre del control, uno de los dos no ha entendido nada.