Borrar registro de una base de datos VB6.?

aheinz
05 de Octubre del 2008
Hola soy nuevo en el foro,, y le mando saludos a todos los genios que se encuentra aqui.
Estoy creando mi primer programita el VB6. El programa se conecta a una base de acces por medio de DataEnvironment, en un formulario tengo los botones "agregar cliente, buscar, borrar" y me los muestra en un datagrid, bueno el problema es el boton BORRAR me sale error de sintacxis y no puedo borrar ningun registro de la base.... ojala me aya espresado bien gracias.
Les dejo el codigo de Boton BORRAR, VB me dice que hay un error de compilacion en "" if msgbox ("Desea ...........





Private Sub bcbborrar_Click()
nombreclinetes = InputBox("Ingrese el Nombre del Cliente que desea Eliminar", "ELIMINAR CLIENTE", "Ingrese Cliente")
If nombreclinete = "" Then
MsgBox "Debe ingresar el Nombre del Cliente", vbInformation, "AVISO"
Exit Sub
Else
With rsclietes
.Requery
.Find "nombre='" & Trim(nombreclientes) & "'"
If .EOF Then
MsgBox "No se encontro ningun Cliete con ese Nombre", vbInformation, "AVISO"
Exit Sub
Else
if MsgBox("Desea Eliminar este Cliente" & nombreclietes, vbInformation + vbYesNo, "AVISO") = vbYes
.Delete
.Requery
Else
.Requery
End If
End With
End If
End Sub