Создать новый обект (кнопку, к примеру) можно так:
Private WithEvents new_button As CommandButton
Private Sub Command1_Click()
Command1.Enabled = False
Set new_button = Me.Controls.Add("VB.CommandButton", "cmdNew")
With new_button
.Move Command1.Left, Command1.Top + Command1.Height + 130
.Caption = "Новая кнопка"
.Visible = True
.Height = 590
End With
End Sub
А сохранит можно через реестр или INI... Наверное...
