[asemshahen5]

مشكور اخي ابراهيم اعجبني تعديل الاخ سعود مع بعض التعديل :

PHP كود :

   Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click, Button5.Click, Button4.Click, Button3.Click
        Clipboard.SetText(sender.Text)
        TextBox1.Paste()
        TextBox1.Focus()
    End Sub 


اي جمع الازرار جميعا و التمييز بينها من الاوبجكت سيندر عن طريق خاصية تكست الموجودة على الزر فهذا يختصر الكثير من الكتابة و التكرار .