Visual Basic - ESTOY DESESPERADA!!

Hola buenas!!! Gracias por intentar ayudarme!!
el caso es que tengo este código:

***********************************************
dim rs as new ADODB.Recordset

set rs = CurentProject.Connection.Execute ("Select IPE from BDME_IPEITEM")

dim i as integer
dim strcadena as string

for i = 0 to rs.Fields.count - 1
strcadena=rs(i).value & ","
next

************************************************
El caso es que quiero hacer una select al campo IPE de la tabla BDME_IPEITEM, y debrían salir por lo menos 8 filas y solo me sale un dato!!!

Quiero que la variable strcadena guarde todas las filas que tiene ese campo pero solo me guarda uno y es siempre el mismo....Supongo que estoy haciendo algo mal pero no se que es....

Podríasis ayudarme??

strcadena = strcadena & rs(i) & ","

TAMBIEN PUEDES UTILIZAR UN ARRAY

DIM strcadena(100) AS STRING

for i = 0 to rs.Fields.count - 1
strcadena (I)=rs(i).value
next
ESO SE ALMACENARIA EN UN ARREGLO

ncha!!:

Esta linea esta mal:
for i = 0 to rs.Fields.count - 1

aqui le dices que el for que sea de 0 a el numero de campos cargados y no al numero de REGISTROS cargados. De esta manera, como al hacer las select solo tienes un campo cargado, solo haces un ciclo de for que es 1 (coges el primer registro solamente).

Buenas, tu problema creo que es bien sencillo, si te das cuenta estas guardando en una variable string (strcadena) un dato y después otro y así sucesivamente, pero el dato que te guardará será siempre el último, si quieres todos los datos por que va tomando debes crear un array de cadenas( ej: strcadena(20) ) en este caso podrias guardar hasta 20 datos distintos. Si no sabes el número de registros en lugar de crear strcadena(20) con "Dim strcadena(20) " crealo con Dim strcadena() y después Redim preserve strcadena(rs.fields.count).
Otra opción es que quieras almacenar en la misma variable strcadena todos los registros consecutivamente(no recomendable si hay muchos) entonces dentro de la instrucción For deberias poner: strcadena=strcadena & rs(i).value & ","

Espero que te sirva de algo, si quieres que te lo explique mejor tienes mi correo, Chaoo

Muchas gracias a todos chic@s!! Ya esta solucionado!

ncha!!:

Podrias decir cual fue la solucion, ya que aqui todos expusimos soluciones cada cual mas diferente.

La solución correcta es la que me dió Necro-air...tenía mal una linea de codigo