[Basil Abdallah]

السلام عليكم
ما هو الكود المناسب 
ارغب ببرمجة زر يقوم بانشاء ازرار و تلقائيا مع كل كود ينتجه ينتج حدث خاص به يعني
عند الضغط ع ١Button يقوم بانشاء New Button و عند النقر ع نفس الزر Button1 ايضا يقوم بانشاء ازرار الى ما لا نهاية ما دام المستخدم ينقر على الزر
و ايضا مع انشاء الازرار  زر حدثه الخاص
جربت هذا للكود
DIM bun as New Button

Me.Controls.add (bun)
Add Handels bun.click (),..
لكن مشكلته انه بصنع زر واحد فقط لا غير

[HASAN6.0]

PHP كود :

Dim x As Integer = 0
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim bun As New Button
        bun.Left = x
        bun.Text = "New btn" + Now.Millisecond.ToString
        Me.Controls.Add(bun)
        AddHandler bun.Click, AddressOf NewButton_Click
        x += bun.Width

    End Sub
    Private Sub NewButton_Click(sender As Object, e As EventArgs)
        MsgBox("I'm new Button My Text is : " + sender.text)
    End Sub