Discussion :

[thierry007]

Code :

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

1
2
3
  For Each dtr In DsIsd.SOCIAL ' Rempli la listbox 
                  ListBoxSocial.Items.Add(dtr.Item("NomSocial"))
            Next

Je penses que ceci est juste et pourtant il ne rempli pas la listebox Why?

[Aspic]

il doit y avoir une erreur ici : dtr.Item("NomSocial")

A quoi correspond dtr ?

[thierry007]

Dtr correspond a un datarow delcaré plus haut dans la procédure

[Aspic]

tu peut me donner ton code plus haut car je n'ai jamais utiliser cette classe encore

Edit :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
   Dim table As DataTable
        table = MakeNamesTable()
 
        ' Once a table has been created, use the 
        ' NewRow to create a DataRow.
        Dim row As DataRow
        row = table.NewRow()
 
        ' Then add the new row to the collection.
        row("fName") = "John"
        row("lName") = "Smith"
        table.Rows.Add(row)
 
        ListBox1.Items.Add(row.Item("fName"))

Cela marche très bien, je recupère John

Vérifie ce qu'il y a dans ta table

[thierry007]

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
16
17
18
19
20
21
22
23
24
 Dim i As Integer
            Dim dtr As DataRow
 
 
            MargeGauche = 7
            MargeHaut = 5
 
            'Declaration de la fonction  Preview
            Preview = New PrintPreview5.Preview
 
            ToolTip.SetToolTip(Me.BtnNew, "(F2) - Nouvelle fiche")
            ToolTip.SetToolTip(Me.BtnExit, "(Esc) - Sortie")
            ToolTip.SetToolTip(Me.BtnDelete, "(F3) - Marquer la fiche courante  
               pour suppression")
            ToolTip.SetToolTip(Me.BtnSave, "(F9) - Enregistrement")
 
// DsIsd est mon dataset
 
            Me.SOCIALTableAdapter.Fill(Me.DsIsd.SOCIAL)
 
 
            For Each dtr In DsIsd.SOCIAL ' Rempli la listbox 
                  ListBoxSocial.Items.Add(dtr.Item("NomSocial"))
            Next

[Aspic]

j'ai éditer mon dernier post