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 :
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 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
Partager