1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
| Public Class Capacites
Private Sub Capacites_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'TODO: cette ligne de code charge les données dans la table 'MasterDataSet.capacite'. Vous pouvez la déplacer ou la supprimer selon vos besoins.
CapaciteTableAdapter.FillCapacitees(Me.MasterDataSet.capacite)
End Sub
Private Sub Modifier_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Modifier.Click
End Sub
Private Sub Detaille_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Detaille.Click
MsgBox(ListCapacitees.SelectedIndex)
MsgBox(ListCapacitees.TabIndex)
'
' MsgBox(ListCapacitees.Text donne le texte séléctionné
' MsgBox(Me.MasterDataSet.capacite(ListCapacitees.TabIndex).nom.ToString)
End Sub
End Class |
Partager