Con ADO ti crei una connessione al database:

codice:
Dim cn as new adodb.connection

cn.open "Stringa di connessione"
Aggiunta record:

codice:
INSERT INTO nomeTabella ("Campi che vuoi inserire") Values (valore che vuoi dare ai campi")
Modifica:

codice:
UPDATE nomeTabella SET nomeCampo = Valore, nomecampo = Valore... WHERE condizione
Eliminazione:

codice:
DELETE FROM nomeTabella WHERE condizione
Per eseguire le query usi cn.execute

Spero di non aver di errori perchè sono andato a memoria e la memoria non è il mio forte!

Ciaoz