Visual Basic - Campo de Base como sacar

hola a todos espero que puedan ayudar

tengo una base en access y algunos de los campor son:

asignatura_1
asignatura_2
asignatura_3
asignatura_4
....
.....
....
asignatura_20

mi pregunta como lo puedo a hacer par leer todos los campos de por medio de una fucion e ir asignado a un arreglo, tengo una idea al respecto per pme falta el incremento del campo (macro)

for xx =1 to 20
cRamo(xx) = asignatura_(XX)
next

el campor asignatura es la duda ??????

Es de suponer que accederás a la tabla mediante un Recordset. Supongamos que se llama "tabla"; tu idea debe ser hacer algo así:

for xx =1 to 20
cRamo(xx) = tabla![asignatura_XX]
next

Bien, efectivamente no es posible. No puedes utilizar una variable como nombre de otra variable; lo que sí puedes hacer es hacer uso de la coleccion "Fields" del recordset para acceder a un campo proporcionando el nombre del camo mediante una variable:

for xx =1 to 20
cRamo(xx) = tabla.Fields("asignatura_"" & xx)
next

También es posible proporcionar un índice numérico a Fields; esto te podría servir si la tabla tiene únicamente los campos asignatura_1 a asignatura_20:

for xx =1 to 20
cRamo(xx) = tabla.Fields(xx - 1)
next