Visual Basic - Utilizar format en listview

Hola, tengo el problema de que en una base de datos los campos numericos los expongo en un listview de la siguiente forma
tlliMinuta.SubItems(3) = .Fields("pendiente") & ""
he probado poniendo tlliMinuta.SubItems(3) =
format(adodc3.recordset.Fields("pendiente"), "#,###.00") & "" pero siempre me pone el importe del primer registro, es decir, no se realizar en este campo (para el resto de campos si los dejo como tlliMinuta.SubItems(3) = .Fields("importeentregado") & "" si)el salto al campo siguiente????? dentro de un Do While Not .EOF????????????

Fijate con esto:

While Not adodc3.recordset.EOF
ListView1.ListItems.Add ,,adodc3.recordset.Fields.Item("CampoTexto").Value
ListView1.ListItems.Item(ListView1.ListItems.Count).SubItems(3)=adodc3.recordset.Fields.Item("pendiente").Value
adodc3.recordset.MoveNext
Wend

Gracias Cecilia muchas gracias por responderpor responder.
He encontrado otro camino. Y así no tengo que modificar mi código.
tlliMinuta.SubItems(7) = Format(.Fields("ivatotal"), "#,###.00") & ""