N'ayant pas eu de reponse, je me permets de reposer la question:
.
"Je voudrais stocker une valeur en entrant dans un champ et la comparer en
sortant de ce meme champ.
J'utilise le systeme champ.value et en sortant old.value
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Raymond [mvp]
Bonsoir.
tu as eu une réponse le même jour à 20:21
copie: si tu veux utiliser une variable il ne faut pas utiliser oldvalue. tu peux faire: Dim X As String Private Sub Texte1_GotFocus() ' entrée X = Me.Texte1 End Sub
Private Sub Texte1_LostFocus() ' sortie If X = Me.Texte1 Then MsgBox "égalité" Else MsgBox "différent" End If End Sub
tu peux aussi mettre une procédure dans AfterUpdate car s'il y a changement, cet événement sera déclanché.
-- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://OfficeSystem.Access.free.fr/runtime/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Jean-Claude" a écrit dans le message de news: 42309a91$0$15379$
Bonsoir.
N'ayant pas eu de reponse, je me permets de reposer la question: . "Je voudrais stocker une valeur en entrant dans un champ et la comparer en sortant de ce meme champ.
J'utilise le systeme champ.value et en sortant old.value
Je voudrais utiliser une variable et la comparer.
Comment faire ?"
Merci d'avance
Bonsoir.
tu as eu une réponse le même jour à 20:21
copie:
si tu veux utiliser une variable il ne faut pas utiliser oldvalue.
tu peux faire:
Dim X As String
Private Sub Texte1_GotFocus() ' entrée
X = Me.Texte1
End Sub
Private Sub Texte1_LostFocus() ' sortie
If X = Me.Texte1 Then
MsgBox "égalité"
Else
MsgBox "différent"
End If
End Sub
tu peux aussi mettre une procédure dans AfterUpdate car s'il y a changement,
cet événement sera déclanché.
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Jean-Claude" <arlequin7520@hotmail.com> a écrit dans le message de news:
42309a91$0$15379$626a14ce@news.free.fr...
Bonsoir.
N'ayant pas eu de reponse, je me permets de reposer la question:
.
"Je voudrais stocker une valeur en entrant dans un champ et la comparer en
sortant de ce meme champ.
J'utilise le systeme champ.value et en sortant old.value
copie: si tu veux utiliser une variable il ne faut pas utiliser oldvalue. tu peux faire: Dim X As String Private Sub Texte1_GotFocus() ' entrée X = Me.Texte1 End Sub
Private Sub Texte1_LostFocus() ' sortie If X = Me.Texte1 Then MsgBox "égalité" Else MsgBox "différent" End If End Sub
tu peux aussi mettre une procédure dans AfterUpdate car s'il y a changement, cet événement sera déclanché.
-- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://OfficeSystem.Access.free.fr/runtime/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Jean-Claude" a écrit dans le message de news: 42309a91$0$15379$
Bonsoir.
N'ayant pas eu de reponse, je me permets de reposer la question: . "Je voudrais stocker une valeur en entrant dans un champ et la comparer en sortant de ce meme champ.
J'utilise le systeme champ.value et en sortant old.value
Je voudrais utiliser une variable et la comparer.
Comment faire ?"
Merci d'avance
3stone
Salut,
"Jean-Claude" | N'ayant pas eu de reponse, je me permets de reposer la question: | . | "Je voudrais stocker une valeur en entrant dans un champ et la comparer en | sortant de ce meme champ. | | J'utilise le systeme champ.value et en sortant old.value | | Je voudrais utiliser une variable et la comparer.
Commence par faire ton test dans l'avant ou l'après mise à jour...
Si mise à jour il y à, c'est qu'il y a eu modification (au moins manipulation) ! Pour tester s'il à réellement une différence:
If Me!ZoneDeTexte.Value <> Me!ZoneDeTexte.OldValue Then MsgBox "modif..." 'variable inutile, mais si tu as besoin de la valeur précédente... toto = Me!ZoneDeText.OldValue Else MsgBox "pas modif" end if
"Jean-Claude"
| N'ayant pas eu de reponse, je me permets de reposer la question:
| .
| "Je voudrais stocker une valeur en entrant dans un champ et la comparer en
| sortant de ce meme champ.
|
| J'utilise le systeme champ.value et en sortant old.value
|
| Je voudrais utiliser une variable et la comparer.
Commence par faire ton test dans l'avant ou l'après mise à jour...
Si mise à jour il y à, c'est qu'il y a eu modification (au moins manipulation) !
Pour tester s'il à réellement une différence:
If Me!ZoneDeTexte.Value <> Me!ZoneDeTexte.OldValue Then
MsgBox "modif..."
'variable inutile, mais si tu as besoin de la valeur précédente...
toto = Me!ZoneDeText.OldValue
Else
MsgBox "pas modif"
end if
"Jean-Claude" | N'ayant pas eu de reponse, je me permets de reposer la question: | . | "Je voudrais stocker une valeur en entrant dans un champ et la comparer en | sortant de ce meme champ. | | J'utilise le systeme champ.value et en sortant old.value | | Je voudrais utiliser une variable et la comparer.
Commence par faire ton test dans l'avant ou l'après mise à jour...
Si mise à jour il y à, c'est qu'il y a eu modification (au moins manipulation) ! Pour tester s'il à réellement une différence:
If Me!ZoneDeTexte.Value <> Me!ZoneDeTexte.OldValue Then MsgBox "modif..." 'variable inutile, mais si tu as besoin de la valeur précédente... toto = Me!ZoneDeText.OldValue Else MsgBox "pas modif" end if
Premierement, je suis desole mais je n'ai pas vu la réponse d'où ma question. Desole, mais je ne suis pas redemandeur de reponses. Merci encore, mais c'est etrange si j'utilise une variable..ca ne marche pas. Je vais reessayer ce soir.
Bonne journée à vous deux :-)..et desole encore
jc
"3stone" a écrit dans le message de news: %23v0t$
Salut,
"Jean-Claude" | N'ayant pas eu de reponse, je me permets de reposer la question: | . | "Je voudrais stocker une valeur en entrant dans un champ et la comparer en | sortant de ce meme champ. | | J'utilise le systeme champ.value et en sortant old.value | | Je voudrais utiliser une variable et la comparer.
Commence par faire ton test dans l'avant ou l'après mise à jour...
Si mise à jour il y à, c'est qu'il y a eu modification (au moins manipulation) ! Pour tester s'il à réellement une différence:
If Me!ZoneDeTexte.Value <> Me!ZoneDeTexte.OldValue Then MsgBox "modif..." 'variable inutile, mais si tu as besoin de la valeur précédente... toto = Me!ZoneDeText.OldValue Else MsgBox "pas modif" end if
Premierement, je suis desole mais je n'ai pas vu la réponse d'où ma
question. Desole, mais je ne suis pas redemandeur de reponses.
Merci encore, mais c'est etrange si j'utilise une variable..ca ne marche
pas. Je vais reessayer ce soir.
Bonne journée à vous deux :-)..et desole encore
jc
"3stone" <spam@spam> a écrit dans le message de news:
%23v0t$7dJFHA.1172@TK2MSFTNGP12.phx.gbl...
Salut,
"Jean-Claude"
| N'ayant pas eu de reponse, je me permets de reposer la question:
| .
| "Je voudrais stocker une valeur en entrant dans un champ et la comparer
en
| sortant de ce meme champ.
|
| J'utilise le systeme champ.value et en sortant old.value
|
| Je voudrais utiliser une variable et la comparer.
Commence par faire ton test dans l'avant ou l'après mise à jour...
Si mise à jour il y à, c'est qu'il y a eu modification (au moins
manipulation) !
Pour tester s'il à réellement une différence:
If Me!ZoneDeTexte.Value <> Me!ZoneDeTexte.OldValue Then
MsgBox "modif..."
'variable inutile, mais si tu as besoin de la valeur précédente...
toto = Me!ZoneDeText.OldValue
Else
MsgBox "pas modif"
end if
Premierement, je suis desole mais je n'ai pas vu la réponse d'où ma question. Desole, mais je ne suis pas redemandeur de reponses. Merci encore, mais c'est etrange si j'utilise une variable..ca ne marche pas. Je vais reessayer ce soir.
Bonne journée à vous deux :-)..et desole encore
jc
"3stone" a écrit dans le message de news: %23v0t$
Salut,
"Jean-Claude" | N'ayant pas eu de reponse, je me permets de reposer la question: | . | "Je voudrais stocker une valeur en entrant dans un champ et la comparer en | sortant de ce meme champ. | | J'utilise le systeme champ.value et en sortant old.value | | Je voudrais utiliser une variable et la comparer.
Commence par faire ton test dans l'avant ou l'après mise à jour...
Si mise à jour il y à, c'est qu'il y a eu modification (au moins manipulation) ! Pour tester s'il à réellement une différence:
If Me!ZoneDeTexte.Value <> Me!ZoneDeTexte.OldValue Then MsgBox "modif..." 'variable inutile, mais si tu as besoin de la valeur précédente... toto = Me!ZoneDeText.OldValue Else MsgBox "pas modif" end if
