CheckListBox et suppression en base
Bonjour,
Je travaille sur une base MySQL et je souhaite via le module CheckListBox pouvoir supprimer un utilisateur en base.
La connnexion est active et le thread sera coupé à l'issue de la requete.
Aussi, la liste que l'on peut voir dans le module CheckListBox est chargée depuis la base.
J'utilise le code ci-dessous mais l'ID de la base retourné n'est pas correct (CheckedListBox1.Tag(CheckedListBox1.SelectedIndex) )
Cela supprime un seul ID au lieu de deux par exemple, si je sélectionne deux utilisateurs.
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
|
Private Sub Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button8.Click
If CheckedListBox1.CheckedItems.Count <> 0 Then
Dim x As Integer
Dim s As String = ""
For x = 0 To CheckedListBox1.CheckedItems.Count - 1
s = s & "Item coché " & (x + 1).ToString & " et avec l'Id: " & CheckedListBox1.Tag(CheckedListBox1.SelectedIndex) & ControlChars.CrLf
Next x
MessageBox.Show(s)
End If
End Sub |
J'affiche un méssage de test pour vérifier :)
L'erreur pourrait se trouver au niveau du SelectedIndex mais je ne suis pas certain.
Comment faites vous pour une fonctionnalité identique ?
Merci de votre aide.
@+