Select Case variable string et accent

Bonjour,

Dans un formulaire, j'ai une liste "list_region" alimentée par une table.

Quand je clique sur la liste, je lance une procédure (variable "bassin" défini comme string dans un module) :

Code:

---

1 2 3 4 5 6 7 8 9 10 11

bassin = list_region.ItemData(list_region.ListIndex)   Select Case bassin . . . Case "Sèvre Niortaise" Call OuvreDoc("etat_region_sevre_niortaise_17_79_86") Case "Dive du Nord" . .

---

Quand je double-clique dans ma liste sur "Sèvre Niortaise" = ma variable "bassin", le select case ne marche pas (vérifié en mode débogage pas à pas). L'accent semble faire bugger le Case ??

Salut,

J'ai essayé avec ce bout de code:

Code:

---

1 2 3 4 5 6 7 8

Dim bassin As String   bassin = "Sèvre Niortaise"   Select Case bassin Case "Sèvre Niortaise" MsgBox "Hello world" End Select

---

Le "Sèvre Niortaise" est bien pris en compte. As-tu bien vérifié que ta variable "bassin" prend bien la valeur "Sèvre Niortaise" ?

D'autre-part, dans ton message, avant l'exemple de code, tu parles de "Clic" et après le code tu parles de "Double-clic"...

Citation:

---

Envoyé par bernardmichel

Salut,

J'ai essayé avec ce bout de code:

Code:

---

1 2 3 4 5 6 7 8

Dim bassin As String   bassin = "Sèvre Niortaise"   Select Case bassin Case "Sèvre Niortaise" MsgBox "Hello world" End Select

---

Le "Sèvre Niortaise" est bien pris en compte. As-tu bien vérifié que ta variable "bassin" prend bien la valeur "Sèvre Niortaise" ?

D'autre-part, dans ton message, avant l'exemple de code, tu parles de "Clic" et après le code tu parles de "Double-clic"...

---

Merci pour la proposition.
En fait, je viens de voir qu'il y avait un espace double dans ma table :oops: