Actualizar y Borrar registros en un BD

[RsOfT]

He intentado actualizar el datos del campo Nombre con lo que hay en el TxtNombre.txt y no me sale , he puesto lo siguiente:

SQL = "UpDate TblDatos Set Nombre='" & TxtNombre.Text & "'"
ó
SQL = "UpDate TblDatos Set Nombre= TxtNombre.Text

Nada me funciona me sale error de Type Mismatch.

Lo mismo me sucede con el borrado de un registro específico, eh puesto:

SQL = "Delete from TblDatos where (Nombre='" & TxtNombre & "')"
ó
SQL = "Delete from TblDatos where (Nombre = TxtNombre)"

Alguien me podría hechas una mano?

.::RsOfT::.
--El que se aferra a lo conocido, nunca conocerá lo desconocido--
--Es intentando lo imposible como se realiza lo posible--
--Es de pesimo gusto contentarse con algo mediocre cuando lo excelente esta a nuestro alcance--

[RsOfT]

Esto tampoco me funciona

CnDatos.Open "dbdatos"
RsTblDatos.Open , "Select Distinct Nombre,Apellido,Direccion,TelCasa,TelTrabajo,TelCe lular,Email,PaginaWeb,Tipo,Nota,Fecha from TblDatos", CnDatos, 3, 3

RsTblDatos!Nombre = ""
RsTblDatos!Direccion = ""
RsTblDatos!TelCasa = ""
RsTblDatos!TelTrabajo = ""
RsTblDatos!TelCelular = ""
RsTblDatos!EMail = ""
RsTblDatos!PaginaWeb = ""
RsTblDatos!Tipo = ""
RsTblDatos!Nota = ""
RsTblDatos!Fecha = ""
CnDatos.Close

.::RsOfT::.
--El que se aferra a lo conocido, nunca conocerá lo desconocido--
--Es intentando lo imposible como se realiza lo posible--
--Es de pesimo gusto contentarse con algo mediocre cuando lo excelente esta a nuestro alcance--

[RsOfT]

Este tampoco

CnDatos.Open "dbDatos"
TxtNombre.Text = Registros_Modificados
RsTblDatos.Open ("UpDate TblDatos Set Nombre ='" & Registros_Modificados & "'")
RsTblDatos.Open SQL, CnDatos, 3, 3

.::RsOfT::.
--El que se aferra a lo conocido, nunca conocerá lo desconocido--
--Es intentando lo imposible como se realiza lo posible--
--Es de pesimo gusto contentarse con algo mediocre cuando lo excelente esta a nuestro alcance--