Visual Basic - obtener datos de un campo

hola, estoy utilizando ado, tengo una tabla en access y los campos de la tabla los he llamado 1, 2, 3, 4, 5, 6 y 7, lo que quiero hacer es que dependiendo del valor que me dé el usuario del programa, entonces yo traiga el valor del campo, por ejemplo:

valor_del_usuario = 1
MsgBox rstArchivoTar.Fields(valor_del_usuario).Value

o sea:
Msgbox rstArvhicoTar.Fields("1").value

ojalá me haya podido explicar y ojalá me puedan echar la mano....salu2

haber veamos lo que podes hacer es guardar la seleccion del usuario en una variable llamado campo y luego haces la consulta osea:
sql="select 'campo' from tutabla"
luego lo abris
rstArvhicoTar.open sql,connection,keyset .....
guardas el valor en una var llamada eligio osea
eligio= rstArvhicoTar(0) 'ya q es un unico campo
y lo mostras
Msgbox "ud eligio & eligio& este campo"

creo que no me expliqué bien, resulta que tengo un recordset con los siguientes campos:

Tipo 1 2 3 4 5 6 7

el campo Tipo puede ser A o B y los campos 1, 2, 3, 4, 5, 6 y 7 van a tener el valor dependiendo del Tipo, ejemplo:

Tipo 1 2 3 4 5 6 7
A 10 11 12 13 14 15 16
B 15 16 17 18 19 20 21

si el usuario me dá un valor de 5 y si es del tipo A entonces voy a regresar el 14 que es el valor del campo 5.....o sea:

rstArchivoTar.MoveFirst
rstArchivoTar.Find ("TIPO = A")
If rstArchivoTar.EOF Then
MsgBox "No se encontró la tarifa...."
Else
t_cobro = t_hrs * rstArchivoTar.Fields("5")
End if

dónde "5" es el nombre del campo y no el indice

espero ahora si haberme explicado....salu2 y muchas gracias por su ayuda

y cual es el problema, man? porque no nos dices si da errar, si no funciona, si marca un valor incorrecto....

tampoco sabemos que es t_cobro ni t_hrs, de donde salen esas variable y como estan declaradas?

si empesaras por decir que es lo que quieres y como son los datos que menejas se podria haser una help, pero asi no es possible.