...fatto questo mi dirigo verso visual basic 6...apro il form..metto data1 (setto il database access-97,Recorsource Tabella1

Dovresti controllare nelle proprietà del data1:
Connect = Access
DatabaseName =



Se hai solo un form in generale(dichiarazioni) scrivi:
Private Db As Database

A Form_Load :
NomeDB = c:\miodb.mdb
Set Db = OpenDatabase(NomeDB, False, False, Pass)
Set Data1.Recordset = DbNow.OpenRecordset("select * from tabella")
Data1.Recordset.LockEdits = False

Quando click sul pulsantino:
Dim Fld as Field
Dim Stringa1 as String
Do Until Data1.Recordset.EOF
For Each fld In Data1.Recordset.Fields
stringa1 = stringa1 & " " & Data1.Recorset(fld.Name)
'Debug.Print stringa1
Next
List1.AddItem stringa1
stringa1 = ""
Data1.Recordset.MoveNext
Loop

Controlla anche in Progetto Riferimenti di aver selezionato la libreria: Microsoft DAO 3.6 Object Library (dao36.dll)

Spero sia chiaro, ciao