Discussion :

[atech]

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 :

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

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 ??

[bernardmichel]

Salut,

J'ai essayé avec ce bout de code:

Code :

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

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"...

[atech]

Salut,

J'ai essayé avec ce bout de code:

Code :

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

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