Discussion :

[Beralienne]

Bonjour,

est-il possible d'imbriquer plusieurs instructions Type les unes dans les autres? style pour faire une structure imbriquée !!
par exemple :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
Type MACHIN
   x as integer
   y as string
end Type
 
Type BIDULE
   z as date
   u as string
end Type
 
Type TRUC
   MACHIN as (... je ne sais pas quoi)
   BIDULE as (... je ne sais tjs pas quoi)
end Type

quelqu'un a une idée?..... merci de vos réponses

[cafeine]

Hello,

oui on peut imbriquer :

Code :

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

1
2
3
4
5
6
7
8
Type tab
   Item() As String
End Type
 
Type Perso
   Count As Long
   Values As tab
End Type

dans le code

Code :

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

1
2
Dim x as Perso
x.Values.Item(1) = "Test"

[Beralienne]

Je te remercie, en fait je viens de trouver une autre méthode :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
Type PARAM_MACHIN
   x as integer
   y as string
end Type
 
Type PARAM_BIDULE
   z as date
   u as string
end Type
 
Type TRUC
   MACHIN as PARAM_MACHIN
   BIDULE as PARAM_BIDULE
end Type

et plus loin ...

Code :

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

1
2
 
TRUC.MACHIN.x = "test"

@+