[مساعدة]

السلام عليكم

اولا قومي بتعريف ال Button في الكلاس وليس داخل حدث ومنها تستطيعي التحكم به بشكل حامل وهذا مثال

كود :

Dim btn As Button

Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    btn = New Button
    btn.Text = "الزر الأول"
    btn.Location = New Point(10, 10)
    AddHandler btn.Click, AddressOf btn_Click
    Me.Controls.Add(btn)

    btn = New Button
    btn.Text = "الزر الثاني"
    btn.Location = New Point(10, 40)
    AddHandler btn.Click, AddressOf btn_Click
    Me.Controls.Add(btn)

End Sub

Private Sub btn_Click(sender As System.Object, e As System.EventArgs)
    ' حدث النقر
    MsgBox(sender.Text)
End Sub