SQL - este codigo esta mal???

Desde visual basic tengo un boton de guardar y este codigo ejecuta la accion , pero no me guarda ....alguien me puede ayudar
gracias de antemano

Dim strSQL As String
Set db1 = OpenDatabase(App.Path & "\database\video.mdb")
Set clientes1 = db1.OpenRecordset("Clientes", dbOpenDynaset)
If Text1.Text <> "" Then
clientes1.AddNew
strSQL = "Select * From clientes1"
strSQL = "INSERT INTO clientes1 " & _
"([Cedula], [Nombre_Apellido],[Direccion],[Telefono],[Ciudad]) " & _
"VALUES([text1],[text2],[text3],[text4],[text5])"
'INSERT INTO clientes1([Cedula],[Nombre_Apellido])
MsgBox "REGISTRO AÑADIDO"
Command6.Enabled = False
Command5.Enabled = True
Command7.Enabled = True
Command8.Enabled = True
Command10.Enabled = True
strSQL = "UPDATE clientes1 " & _
"([Cedula]=[text1], [Nombre_Apellido]=[text2],[Direccion]= text3] , [Telefono]=[text4],[Ciudad]=[text5]) "
Else
MsgBox "EL CAMPO CEDULA ESTA VACIO DEBE INTRODUCIR DATOS"
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text4.Text = ""
Text5.Text = ""
Text1.SetFocus
End If

Cambie esta linea:

"VALUES(" & [text1.text] & "," & [text2.text] & "," & [text3.text] & "," & [text4.text] & "," & [text5.text] & ")"