guardar en base de datos con acces y vb.net

[kass_mad]

si mira este es el codigo donde va el da

Dim CadenaConexion As String
CadenaConexion = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=|DataDirectory|\ejemplo.mdb;Persist Security Info=True"
Dim miconexion As New OleDbConnection(CadenaConexion)
Dim da As New OleDbDataAdapter
Dim dt As New DataTable
Dim ds As New DataSet

miconexion.ConnectionString = CadenaConexion

y luego viene lo que puse, se que debe tener un campo claves pero esta base de datos fue usada con vb 6 y cuando vi la base de dato me pregunte lo mismmo , es raro porque como no va a tener un capo clave, la instruccion del vb 6 es asi

If listp = "Enero" Then
Data2.Recordset.Fields("Enero") = Text1.Text
Data2.Recordset.Fields("EneroReal") = Text2.Text
End If

aca en vb.net ya no esta el objeto data tendria que modificar la base de datos?? ayuda

gracias por toda tu