Hola amigos...
Tengo un formulario y en un campo del mismo, se evalúa el contenido de un
texto escrito y si ya existe emite un mensaje de aviso "valor repetido" y
regresa el foco al mismo campo para que se corrija, Como puedo hacer para
que una ves regresado el foco al campo en cuestión se borre lo escrito por
el usuario.
RESPUESTAS
==========
Te puede servir...
Me.NombreControl = ""
o
Me.NombreControl = Null
Saludos
marjan
------------------
Hola amigo. A mi me ha ocurrido algo parecido no hace mucho y con ayuda de lo colegas
de este foro tan autentico pude solucionarlo. Te adjunto el codigo para que lo veas
y lo adaptes a tus necesidades.
Private Sub Palabra_BeforeUpdate(Cancel As Integer)
Dim StrX As String
Dim vX As Variant
vX = DLookup([IdPalabra], "Palabras", "[Palabra]= '" & [Palabra] & "'")
If Not IsNull(vX) Then
StrX = CStr(vX)
DoCmd.Beep
MsgBox "Esta palabra ya existe", vbInformation + vbOKOnly, "AVISO"
Me.Undo
Else
StrX = Me.IdPalabra
End If
End Sub
               (
geocities.com/es/ensolva/Descargas)                   (
geocities.com/es/ensolva)                   (
geocities.com/es)