set table=currentdb.operecordset ("select Campo from tabella")

oppure set table=currentdb.operecordset ("nome query")

il valore del campo sarā table.nomecampo

'presumo ke mettendo il valore in una casella d testo sia unico


if not Table.eof then
casellatesto=Table.nomecampo
endif



VaneX