[Aly El-Haddad]

كود :

For X As Short = 1 To 10
            Dim btn As New Button
            btn.Name = "btn" & X
            btn.Text = "btn" & X
            btn.Location = New Point(btn.Location.X, (btn.Height * X) - btn.Height)
            Me.Controls.Add(btn)
        Next