la classe recordset rende disponibili alcuni eventi tra i quali FetchComplete che si scatena al termine della query,
FetchProgress che restituisce la percentuale di elaborazione, ecc

per usare gli eventi di una classe bisogna dichiararla

dim withevents nome as tipo

la parola chiave withevents si deve dichiarare dentro ad un form e aggiunge l'oggetto dichiararto nella tendina in altro a sinistra e i relativi eventi in quella di destra

con withevents non si possono creare matrici di oggetti e non si può inizializzare nella dichiarazione