ajoute a partir de la base de donnees dans une combobox

bonjour je travaille en vb.net
j'ai une combobox de recherche qui contient en premier lieu l'item "Tous"

mais le probleme est que lorsque je fais ce code la

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
Public Sub remplirdirection()
        Dim req As String = ""
        Dim dl As DataTable = Nothing
 
        req = " select * from Direction order by CodeDirection"
 
        UtilitaireBD.ouvrirRequete(req, dl)
 
        Cmbdirection.DataSource = dl
 
        Cmbdirection.ValueMember = "CodeDirection"
        Cmbdirection.DisplayMember = "NomDirection"
 
    End Sub

le combobox sera rempli mais l'item "TOUS" sera effacer
aider moi svp

Ajoute la ligne "Tous" à la DataTable :

Code:

1
2
3
4
5
 
Dim row As DataRow = dl.NewRow()
row("CodeDirection") = -1
row("NomDirection") = "Tous"
dl.Rows.InsertAt(0, row)

un grand merci cher ami
c'est fonctionnelle