Table de Hachage VB.net

Fermé
nokia1600 - 14 oct. 2009 à 13:48
nokia1600 Messages postés 4 Date d'inscription mercredi 14 octobre 2009 Statut Membre Dernière intervention 15 octobre 2009 - 15 oct. 2009 à 09:47
Bonjourà tous,
Voila j'ai commencé la création d'une table de hachage pour récuperer l'index_Agent (qui se trouve être une clé primaire d'une table) afin d'alimenter une listebox etd'éviter les homonymes.
Le probème c'est que je n'arrive pas à terminer la table de hachage si quelqu'un pouvait m'aider ce serait super sympa. Voici le code :
Dim NbEnreg
Me.Tbl_AgentsTableAdapter.Fill(Me.GRHDataSet1.Tbl_Agents)
Me.objDATA = New CLdata()
Me.rqSql = "SELECT Index_Agent, Nom, Prenom " & _
"FROM Tbl_Agents "
Me.DS = Me.objDATA.getRows(Me.rqSql, "TBL_CHOIX_AGENT")
NbEnreg = DS.Tables(0).Rows.Count - 1
For I = 0 To NbEnreg
H.Add(DS.Tables(0).Rows(I).Item(0), DS.Tables(0).Rows(I).Item(1))
Me.search.Items.Add(DS.Tables(0).Rows(I).Item(1) & " " & DS.Tables(0).Rows(I).Item(2))
Next
End Sub

Private Sub search_SelectedIndexChanged_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles search.SelectedIndexChanged

Me.search.SelectedIndex
Call Me.searchDATA()
End Sub



J'ai du mal à savoir quoi mettre dans me.search.selectedIndex

search est le nom de la listbox

Voila et merci d'avance

1 réponse

nokia1600 Messages postés 4 Date d'inscription mercredi 14 octobre 2009 Statut Membre Dernière intervention 15 octobre 2009
15 oct. 2009 à 09:47
up
0

Discussions similaires