grazie mille
allora io ho un campo codice tipo

codice = "testo"

ed una list1 = "nome"

adesso vorrei fare una ricerca incrociata e trovare in tutte le 3 tabelle il codice "testo" e la parola "nome" che prendo dalla list1 e poi stampare i risultati in una list2 ed ho fatto cosi:

codice:
Dim sqlstring As String
Dim db1 As Database
Dim rs1 As Recordset
sqlstring = "select * from tabella1, tabella2, tabella3 where codice='" & codice & "' AND tipo='" & List1 & "'"
Set db1 = OpenDatabase(App.Path & "\database.mdb", False, False)
Set rs1 = db1.OpenRecordset(sqlstring)
Set Data2.Recordset = rs1
If Not Data2.Recordset.EOF Then
Do While Not Data2.Recordset.EOF

List2.AddItem = (Data2.Recordset.Fields("cognome"))

Data2.Recordset.MoveNext
Loop
Else
MsgBox "Nessun record"
End If

rs1.Close
in questo modo (sbagliato) secondo le mie scarse conoscenze di VB lui dovrebbe cercare dentro le 3 tabelle i due parametri passati e riportare il valore del campo cognome dentro la list2

sapresti darmi qualche consiglio

grazie ancora