Dim myResult As Result ' Oggetto in cui incamero i dati della ricerca fatta sul db
Dim strSql As String = "SELECT * FROM TABELLA" ' Stringa che compone la ricerca da effettuare
Dim i As Integer 'Variabile intera a cui assegnare il valore/i ricevuti dal db
myResult = myConnection.Exec(strSql) ' eseguo la ricerca sul db tramite l'oggetto myConnection
if myResult.Available Then ' verifico che il db abbia restituito almeno un risultato
i=myResult!nome_colonna ' assegno il valore recuperato dal db alla variabile
Endif
Se la ricerca restituisce piu di un valore, puoi scorrere i valori con un semplice ciclo for.