Met un point d'arret, puis voit sur quel i il plante, vérifie ton init si cette valeur a été renseignée.
Dans mon exemple du post 11 les listBox se remplissent.
Version imprimable
Met un point d'arret, puis voit sur quel i il plante, vérifie ton init si cette valeur a été renseignée.
Dans mon exemple du post 11 les listBox se remplissent.
voila le code complet pour un exemple
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32 Public Const K_ACCES = 4 Public Structure ParamNiv dim acces() as integer End Structure Public mesParamNiv as PramNiv Sub InitParamNiv() Redim mesParamNiv.acces(0 to K_ACCES) Dim i as integer mesParamNiv.acces(0) = "A" mesParamNiv.acces(1) = "B" mesParamNiv.acces(2) = "C" mesParamNiv.acces(3) = "D" end sub Private sub Ajout_Click(...) dim i as integer For i = 0 to K_ACCES ComboBox2.Items.Add(mesParamNiv.acces(i)) next end sub
C'est plus comprehensible comme sa?
mesParamNiv.acces(4) n'est pas renseignée, elle contient donc null, ce qui plante lors de l'ajout dans la ListBox (ce que je disais avant - post 18) ;)
Il y a eu une confusion.
Lorsque je définissais ma constante K_ACCES = 4 cela voulais voulait dire pour moi qu'il y avait 4 élements (0,1,2,3)
J'ai modifier la valeur de la constante :
Ca marche.Merci pour votre aide :oops::ccool::aie:Code:
1
2 Public Const K_ACCCES = 3