Discussion :

[Tazzou]

Salut à tous

Dans ma base de données j'utilise ce code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Select case right(MonChamp,1)
Case "²"
MonChamp.BackColor=vbyellow
end select

jusque là tout va bien... mais lorsque je le mets en application, les champ qui contiennent ² et 2 en dernière position de la chaîne de caractères sont colorés en jaune alors que je ne veux que les champs qui contiennent ² (touche en dessous de ECHAP)

Auriez-vous une idée sur comment faire???

Merci beaucoup

[Invité]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Select Case Asc(Right(MonChamp, 1))
Case 178  '²=178 2=50
MonChamp.BackColor = vbYellow
End Select

http://crteknologies.fr/programmatio...rces/ascii.pdf

[Tazzou]

Merci beaucoup ca fonctionne comme je le voulais !!!!