Concatenar

[luisolan]

hola a todos desde Veracruz, Mexico.
Tengo un problema y por mas que he buscado no puedo encontrar la solución.

quiero concatenar un objeto para asignarle valores de un select cuando este corriendo el Do Until

F = 1

Set GrupoEq = ObjConn.Execute("Select TqpNum, descripcion from GrupoEq_p where FamiliaEq = 'ESTATICO' and Estado = 'A'")

Do until GrupoEq.Eof
Fre"&F&" = GrupoEq("descripcion")
F = F + 1
GrupoEq.MoveNext
Loop

Intento asignar un valor a la Variable "Fre", de tal manera que los resuldatos que encuentre los asigne a Fre1, Fre2, Fre3, etc...

Es posible esto..?

[Malenko]

Y porque no tener un array y que "F" sea el indice del array? No sería más sencillo?

[luisolan]

Pero con un Array, termino listando los resultados con un For-Next imprimiendo en pantalla, similar a un Do Until, pero lo que deseo es guardar el registro para Imprimirlos en cualquier parte de la pantalla, por ejemplo en diferentes tablas o celdas de las tablas, que el registro quede en memoria.

No se si me explico:

Paso 1.- Inicio un conteo ; F = 1
Paso 2.- Ejecuto un Select
Paso 3.- Corro un Do-Until
Paso 4.- Aquí es donde quiero concatenar el resultado del conteo "F"
Fre"&F&" = GrupoEq("descripcion")
Paso 5.- Agrego un numero a F; F = F + 1
Paso 6.- Al dar vuelta el Do-Until, F ya vale 2

Pero el problema es al concatenar el Objeto con la Variable.

Gracias.

[Malenko]

El generar nombres de variables en tiempo de ejecución como indicas en el primer mensaje no es posible.

No entiendo el problema de tener los datos en un array. Recuerda que puedes acceder a su contenido sin necesidad de bucles, es decir, puedes hacer un:

Código:

Label1.Text = F[2]

Sin ningún tipo de problema y sin necesidad de imprimir por pantalla el resto de valores.