Bonjour,
voici mon problème
Je créé des Label en fonction de mon nombre de machine
Ce code marche parfaitement mais maintenant je veux pouvoir supprimer ces Label en double cliquant dessus.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 Public Class... Dim mesMachines(0) As Label ... Private Sub Creer_Table(sender As Object, e As EventArgs) Handles BT_TABLEAU.Click ... ReDim Preserve mesMachines(NbTables) mesMachines(NbTables) = New Label Me.Panel4.Controls.Add(mesMachines(NbTables)) ... End Sub
Pour cela j'ai essayé de faire comme pour un Label classique mais j'ai ce message "Handles clause requires a WithEvents variable defined in the containing type or one of its base type.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2 Private Sub Suppr_Machines(sender As Object, e As EventArgs) Handles mesMachines(Nbtables).DoubleClick End Sub
Merci pour votre aide
Partager