Use:
Dim ctlNewControl as Control
Set ctlNewControl = UserControl.Controls.Add("VB.CommandButton", "cmdTest", fraControl)
ctlNewControl.Caption = "New Group"
ctlNewControl.Height = 315
ctlNewControl.Width = UserControl.Width - 50
ctlNewControl.Visible = True
Plamen Ivanov
MCSD .NET Early Achiever and MCAD .NET Charter Member (VB .NET/SQL Server 2000)
MCSD (VB 6.0/SQL Server 2000) br>
VB (.NET) - what other language do you need in the whole Universe?...