Como abrir una base de datos de access 2003 en vb6

Es la primera vez que manejo bases de datos

La idea es que al elegir el nombre de un vendedor en un combobox, se filtre un vendedor especifico y todos los datos aparezcan en labels y textbox para poder modificarlos

El problema es que al intentar modificar uno de estos me sale el error 3027

Este es el código que uso para filtrar un dato

Private Sub Combo1_CLICK()
Data1.RecordSource = ( Select * FROM VENDEDORES WHERE NOMBRES like '* & Combo1.Text & *' )
Data1.Refresh
If Text2.Text = LIBRE Then
Command1.Enabled = True
Command2.Enabled = False
Command3.Enabled = False
Else
Command1.Enabled = False
Command2.Enabled = True
Command3.Enabled = True
End If
End Sub

Y este el que uso para modificar el dato

Private Sub Command1_Click()
If Text2.Text = Then
MsgBox Ingrese un nombre , vbOKOnly
End If
If Text2.Text = LIBRE Then
MsgBox Nombre invalido. , vbOKOnly
End If
If Data1.Recordset.Fields( Nombre ) <> LIBRE Then
MsgBox Borre este vendedor primero. , vbOKOnly
End If
If Text2.Text <> And Text2.Text <> LIBRE And Data1.Recordset.Fields( Nombre ) = LIBRE Then
Data1.Recordset.Edit
Data1.Recordset.Fields( Nombre ).Value = Text2
Data1.Recordset.Fields( NOMBRES ).Value = Label6 & . & Text2
Data1.Recordset.Fields( FECHA ).Value = Date
Data1.Recordset.Fields( TELÉFONO ).Value = Text3
Data1.Recordset.Fields( DIRECCIÓN ).Value = Text4
Data1.Recordset.Update
Data1.Refresh
End If
End Sub

La base de datos se llama "BASE.mdb"

Gracias de antemano