Bonjour,
Je ne comprend pas trop pourquoi je ne peux pas faire ça:
Ca me marque:
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
19
20 Public Class DraggablePanel Inherits Windows.Forms.UserControl Public WithEvents DockProperty As DockProperty 'Mouse_Down Public Sub Grip_Down(ByVal sender As Object, ByVal e As Windows.Forms.MouseEventArgs) Handles DockProperty.Grip.MouseDown '<-- Ecriture fausse.. End Sub End Class Public Class DockProperty Public WithEvents Area As Windows.Forms.Panel Public WithEvents Grip As Windows.Forms.Panel Public WithEvents Component As Windows.Forms.Panel End Class
Je ne pense pouvoir mettre plus de 'WithEvents'...Dans les classes, 'Handles' doit spécifier une variable 'WithEvents', ou 'MyBase', 'MyClass' ou 'Me' par un identificateur unique.
Merci de votre aide
Partager