Visual Basic - Problema Indices Field

Estoy accediendo a una tabla y a sus campos a traves del indice.

Pero el orden de los campos no es el orden en el que aparece al abrir la tabla access. Es decir que si le digo que me devuelva la columna (2), me devuelve una columna que al abrirlo en access es la 10.

Dim con As ADODB.Connection
Dim cat As ADOX.Catalog = New ADOX.Catalog
Dim tbl As ADOX.Table

con = New ADODB.Connection
con.Mode = ADODB.ConnectModeEnum.adModeReadWrite
con.Open("Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & databaseName & ";")

cat.ActiveConnection = con

aStrTablas = EnumerarTablas(cat, 0)

tbl = cat.Tables(aStrTablas(0))

tbl.Columns(m).Name.

//si el m es 2, me devuelve la décima columna al abrilo en access...

Compruebe si EnumerarTablas devuelve resulado que ud. necesita