pasar un dato de un campo a una variable

[okdoris]

hola!!!
consulto por una "pequeña dudita", se trata de informacion de un campo que no he podido imprimir no se que mas hacerle para que salga, he pensado que debo pasar la informacion de la consulta a una variable y luego mandarla a imprimir pero el lio es que no he entendido donde se guarda el dato cuando hago la consulta, ya me volvio a surgir la misma inquietud al tratar que otro dato consultado aparesca en un label.
alguien podria ser tan amable de ayudarme a entender esto?
ustedes han sido muy colaboradores conmigo y se los agradezco mucho!!!

Set wrkODBC = CreateWorkspace("", "admin", "", dbUseODBC)
Set conEdits = wrkODBC.OpenConnection("grado", , , _
"ODBC;DATABASE=deposito;DSN=grado;OPTION=0;PORT=0; SERVER=localhost;UID=root")
Set qdfTemp = conEdits.CreateQueryDef("SELECT NOM_USUARIO, NOM_MANUAL From USUARIOS, MANUAL Where COD_USUARIO = " & Text1.Text & " AND COD_MANUAL = '" & Text3.Text & "'")
With qdfTemp
.Prepare = dbQUnprepare
.SQL = "SELECT NOM_USUARIO, NOM_MANUAL From USUARIOS, MANUAL Where COD_USUARIO = " & Text1.Text & " AND COD_MANUAL = '" & Text3.Text & "'"
.Execute
Printer.CurrentX = 0: Printer.CurrentY = 550: Printer.Print "Usuario"
Printer.CurrentX = 560: Printer.CurrentY = 550: Printer.Print ":"
Printer.CurrentX = 610: Printer.CurrentY = 550: Printer.Print NOM_USUARIO
Printer.CurrentX = 0: Printer.CurrentY = 750: Printer.Print "Manual"
Printer.CurrentX = 560: Printer.CurrentY = 750: Printer.Print ":"
Printer.CurrentX = 610: Printer.CurrentY = 750: Printer.Print NOM_MANUAL
Printer.EndDoc
End With
conEdits.Close
wrkODBC.Close

[Manu_Leon]

Hola, nunca use el objeto wrkODBC, pero asemejando con el resto de objetos de acceso a bases de datos, la información se guardaria de la siguiente forma:
o bien en conEdits.fields("NOM_USUARIO")
o bien en qdfTemp.fields("NOM_USUARIO")
Prueba, alguna de las dos debe ser.

La informacion se guarda en la variable con la que has realizado la consulta. la porpiedad .fields es un array que contiene las columnas que has seleccionado

así .fields("NOM_USUARIO") y .fields("NOM_MANUAL") te darán lo que querías

Un saludo ;)

[okdoris]

MUCHAS GRACIAS POR RESPONDER!!!
TE COMENTO QUE PUDE HACER QUE IMPRIMIERA
Set rstTemp = conEdits.OpenRecordset("")

a = rstTemp.Fields("NOM_USUARIO") PERO ME TOCO CERRAR LA CONEXION Y ABRIRLA OTRA VEZ PARA QUE ME MOSTRARA EL OTRO CAMPO.
GRACIAS POR TU GUIA!!!