Set Cmd = Controls.Add("vb.commandbutton", "Cmd")
Cmd.Width = 2000
Cmd.Top = me.Height / 2 - Cmd.Height / 2 - 100
Cmd.Left = me.Width / 2 - Cmd.Width / 2 - 100
Cmd.Caption = "Buton Üretildi"
Cmd.Visible = true
gibi bir kod kullanmış birisi.