consulta

[banrey]

muchachos vuelvo con otra pregunta como hago un insert lo estoy haciendo asi pero me da un error en la sintasis

Private Sub Command7_Click()
Set RecSQL = New ADODB.Recordset
SQL_INSERT = " INSERT INTO pacientes (nombre,apellido,cedula,numerodehistoria,edad,sexo ) VALUES (" & Text2 & ",'" & Text3 & ",'" & Text4 & ",'" & Text1 & ",'" & Text5 & ",'" & Text6 & ",');"
BD.Execute SQL_INSERT
MsgBox "LOS DATOS FUERON INSERTADOS", vbExclamation
End Sub

ahora si no tengo idea de como hacerlo