Visual Basic - Ayuda con UPDATE!!!

Hola

Por favor, necesito ayuda con este código.
Cuando lo ejecuto me aparece Error 424 en tiempo de ejecución: Se requiere un objeto

Gracias

Private Sub cmdUpdateTexto_Click()

Dim Cancel As Integer

If grdDataGrid.Columns(5).Text = "Modificar registro" And grdDataGrid.Columns(37).Text = "<>" Then
cn.Execute "UPDATE MiTabla Set Texto = '" & datcboTexto & "' Where Texto =
"<>" And Option = Modificar registro"

datPrimaryRS.Refresh
grdDataGrid.Refresh

Else

MsgBox "No puede justificar los cambios" _
+ Chr(10) + "verifique los parámetros", vbExclamation, "Error"
Cancel = True
End If
End Sub

Empezaría por agregar la cadena vacía del Where

SQL = \"UPDATE MiTabla SET Texto = \'\" & txtTexto.Text & \"\' Where Texto = <>\'\'\"
Además, antes de actualizar el datagrid, tenés que actualizar el recordset. Los datos están en el recordset, la grilla solo muestra el contenido del recodçrdset. Si el recordset no se actualiza, la grilla tampoco

Saludos Ruri

SQL = "UPDATE MiTabla SET Texto = '" & txtTexto.Text & "' Where Texto = <>''"
Disculpá, no sé porqué aparecen las barras inclinadas, pero no van

Saludos Ruri