[vb6] assegnare comando a commandbutton creato a runtime

[marguppy]

 Set cmdElimina = Controls.Add("VB.CommandButton", "elimina" & n, Picture2)
                cmdElimina.Visible = True
                cmdElimina.Caption = "X"
                cmdElimina.Move 11000, x, 300, 300