你可以从 sender
争论:
Private Sub delete1(sender As System.Object, e As System.EventArgs)
Dim curButton As Button = DirectCast(sender, Button) 'Button you clicked
End Sub
请注意,直接添加上述函数的代码(没有 delegate
) 是:
AddHandler MyClass.button1(counter).Click, AddressOf delete1