Come faccio in ADO ad inserire in una variabile x, il risultato di una query?

vorrei fare una cosa del genere:

rs è il mio recordset
dim x as integer

x = rs.open "select idaccount from account where idaccount=1"

naturalmente quello che ho scritto non significa nulla ma rende l'idea di quello che voglio fare! :master: