Discussion :

[mattmax]

bonjour,

j'ai un petit souci avec mon tableau dans mon code :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
 Private vitableauidenfant() As Integer
 
ReDim vitableauidenfant(10)
    For i = 0 To vgAdulte.EnfantsNombre - 1
                enfants.Items.Add(vgAdulte.Enfants(i).nom & " " & vgAdulte.Enfants(i).prenom)
                vitableauidenfant(i) = vgAdulte.Enfants(i).enfantid
            Next i
 
  For i = 0 To vitableauidenfant.Length - 1
                vlr = "Update enfant set regimeid = " & regimeid.SelectedIndex & " where enfantid = " & vitableauidenfant(i)
 next

Mon probleme est que vitableauidenfant.Length - 1 vaut 11 or que je n'ai que 2 enfants associées je pense que c'est a cause du redim mais si je ne le met pas j'obtiens cette erreur :

La référence d'objet n'est pas définie à une instance d'un objet.

Du coup je ne sais pas trop comment faire

Merci d'avance

[-N4w4k-]

Salut

Essaie d'éviter les tableaux, redim etc.. c'est prise de tête..
Tu peux utiliser une List(Of Integer) par exemple (msdn). Ajoute des items grâce à la méthode Add, ça te permet de ne pas fixer la capacité de ton tableau.. et de ne pas avoir cette erreur.

[shayw]

Salut

pourquoi ne pas utiliser un list of
c'est quoi vgAdulte ?

Code :

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

1
2
3
4
5
6
7
8
9
10
Private vitableauidenfant As New List(Of integer)
 
 For i = 0 To vgAdulte.EnfantsNombre - 1
                enfants.Items.Add(vgAdulte.Enfants(i).nom & " " & vgAdulte.Enfants(i).prenom)
                vitableauidenfant.add= vgAdulte.Enfants(i).enfantid
            Next i
 
  For each item in vitableauidenfant
         vlr = "Update enfant set regimeid = " & regimeid.SelectedIndex & "  where enfantid = " & item 
next

[mattmax]

Vgadulte est une variable globale de ma classe adulte qui me sert a faire des recherches , ajouter, modifier supprimer un enregistrement. Je vais essayer avec un list.

Merci de votre aide