Problema con listview

[maron]

Hola a todos!
Quiero cargar un listview con el contenido de una tabla temporal. Uso VB6 y ADO.
Tengo el siguiente trozo de código:

Dim item As ListItem
Dim rsttemp As Recordset
Dim strquerytemp As String
............
rsttemp = le asigno la consulta ...

While Not rsttemp.EOF
'añadimos un nuevo elemento a la lista
Set item = lsvSaldos.ListItems.Add(, , rsttemp!tmp_UE)
item.SubItems(1) = rsttemp!tmp_Codigo
item.SubItems(2) = FormatNumber(CSng(rsttemp!tmp_SaldoAnterior), 2)
item.SubItems(3) = FormatNumber(CSng(rsttemp!tmp_Prestamos), 2)
item.SubItems(4) = FormatNumber(CSng(rsttemp!tmp_Pagos), 2)
item.SubItems(5) = FormatNumber(CSng(rsttemp!tmp_SaldoActual), 2)
rsttemp.MoveNext
Wend

Sucede que en tiempo de ejecución, cuando intenta cargar los datos, da el siguiente mensaje de error:

'13' no coinciden los tipos

Alguna idea de lo que puede pasar?

Gracias!!!!!