Использование того же обработчика событий для нескольких кнопок

Question

У меня есть 15 кнопок, созданных с помощью дизайна.

Я хочу, чтобы иметь фоновое изображение всякий раз, когда я нажимаю на любой из них, например:

• Если я нажимаю на button11 то его фон будет «Hello.jpg»
• Если нажмите Button12 то его фон станет «Hello.jpg»

Есть ли способ написать код вместо написания кода для отдельной кнопки?

Код должен определить, какую кнопку я щелкнул, а затем изменил его фон.

Private Sub e_11_Click(sender As Object, e As EventArgs) Handles e_11.Click 
e_11.Image = Image.FromFile("E:\battleship\Explode.gif") 
End Sub 

Есть ли способ, который обрабатывает каждую кнопку?

Answer 1

Да, вы можете связать один и тот же метод к нескольким элементам управления:

Private Sub MyButtons_Click(sender As Object, e As EventArgs) _ 
    Handles e_1.Click, e_2.Click, e_3.Click, ... 

    Dim myButton = DirectCast(sender, Button) 
    myButton.Image = Image.FromFile("E:\battleship\Explode.gif") 
End Sub