Discussion :

[Mouse]

Bonjour,

je voudrais savoir s'il existe un equivalent d'enum pour les variables de type String.
Quelque chose du style :

Code :

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

1
2
3
4
5
Public Enum FormName As String
    CreerObject  = "A00001"
    ChargerDonner = "AX0002"
    LoadGuiByCode = "AW1213"
End Enum

le probleme etant que je ne gere pas les A00001, que je vais en avoir enormement, et que ce n'est absolument pas explicite.

Merci pour votre aide.
Mouse

[Maniak]

Une structure avec des public const string ?

[Mouse]

Excusez moi de répondre si tard...

oui ce serrais une liste de constante, mais que je voudrais grouper

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
Public Enum FormName As String 
    CreerObject  = "A00001" 
    ChargerDonner = "AX0002" 
    LoadGuiByCode = "AW1213" 
End Enum
 
Public Enum MySecondGroup As String 
    Value1 = "thePath1" 
    Value2 = "thePath2" 
    Value3 = "thePath3" 
    Value4 = "thePath4" 
End Enum

et ensuite faire reference de la sorte

Code :

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

1
2
3
4
5
Call OpenTheFile MySecondGroup.Value1 
 
Public Sub OpenTheFile(Mypath as MySecondGroup)
.....
End Sub

[bifidus]

Le meilleur moyen d'emuler ce que tu veux est d'utiliser une hashtable avec ton enum

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Public Enum SecondGrouoEnum
  Value1 = 1
  Value2 = 2
  value3 = 3
End Enum
 
Protected MySecondGroup as new Hashtable
MySecondGroup.Add(SecondGroupEnum.value1, "thePath1")
etc...
 
OpenTheFile(MySecondGroupe(SecondGroupEnum.value1))

Sinon ToString associé à une enum te renvoie le membre de Gauche:

Code :

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

1
2
3
4
5
6
7
Public Enum MySecondGroup
  thePath1 = 1
  thePath2 = 2
  thePath3 = 3
End Enum
 
OpenTheFile MySecondGroup.thePath1.toString

(renvoie "thePath1" et pas "1")

Cette solution est sans doute plus proche de ce que tu cherches, mais les strings sont alors restreind aux caractères acceptés dans les membres de l'enum

[Mouse]

Merci bifidus,

en fait je n'avais pas bien compris le message de Maniak, en utilisant une les object structure, cela fonctionne

Code :

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

1
2
3
4
5
6
7
Public Structure MySecondGroup 
 
    Const Value1 = "thePath1"
    Const Value2 = "thePath2"
    Const Value3 = "thePath3"
 
End Structure