Hej, Skippa WithEvents och använd AddHandler istället Frågan är postad på två ställe och ett fungerande exempel finns --> Benny,Events Handles till dynamiskt skapade controllers
mitt problem är att skapa controllers dynamiskt med "WithEvents" som jag senare kan fånga eventsen på.
Nedan är ett exempel på hur det kan se ut men här fångar jag ju bara den sista kontrollens event.
<code>
Private WithEvents aPan As Panel
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim i As Integer
For i = 1 To 10
aPan = New Panel()
With aPan
.Top = i * 15
.Height = 13
.Width = Me.Width
.Left = 0
.BackColor = Color.Bisque
.Tag = i.ToString
End With
Me.Controls.Add(aPan)
Next
End Sub
Private Sub aPan_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles aPan.Click
MsgBox(aPan.Tag.ToString)
End Sub
</code>Sv: Events Handles till dynamiskt skapade controllers
<code>
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim i As Integer
For i = 1 To 10
Dim aPan As New Panel()
With aPan
.Top = i * 15
.Height = 13
.Width = Me.Width
.Left = 0
.BackColor = Color.Bisque
.Tag = i.ToString
End With
Me.Controls.Add(aPan)
AddHandler aPan.Click, AddressOf aPan_Click
Next
End Sub
</code>
MSSv: Events Handles till dynamiskt skapade controllers
http://www.pellesoft.se/development/forum/view.asp?msgid=106988&forumid=12&sum=1Sv:Events Handles till dynamiskt skapade controllers
När du skall länka till ett inlägg i pellesofts forum så använd !forum direkt följt (utan mellanslag) av det värde på <b>msgid</b> som står i adessen (i detta fall 106988) så får du en fungerande länk till rätt inlägg.
[Events Handles till dynamiskt skapade controllers]