rellenar un listview con un recordset ado vb net

Hola, como podría cargar un conjunto de registros en un listview con vb

antes con vb6 podia con el metodo add pero ahora me da un error que

"un valor de tipo adodb.field no se puede convertir en 2"
no se lo que quiere decir ni porque falla antes en vb6 hacia asi...

listview1.listitems.add(rs.fields("codigo"))

e iba perfecto, pero ahora me sale ese error, porque?

Gracias.