Code : Tout sélectionner
z.s = "pe"
calcul.l
calcul = 0
For t = 1 To 2
re.s = Mid(z,t,1)
If (re <> "p") Or (re <> "e")
calcul = calcul + 10
EndIf
Next t
debug calcul
le 1er test: re= p donc calcul = 0
le 2e test: re= e donc calcul = 0
Et la, on a calcul = 20 !
Si j'ajoute le not, apparement ca fonctionne !
CF aide, normalement il faut pas utiliser le Not avec des strings et dans la table OR, on a la meme expression avec des valeurs <> ??
attention fumage de cerveaux ....