thisform.PageFrame1.Page1.AddObject("Check1","CheckBox") thisform.PageFrame1.Page1.AddObject("Text1","TextBox") WITH thisform.PageFrame1.Page1.Check1 .Top = 1 .Left = 1 .Caption = "Added CheckBox" .AutoSize = .t. .Value = .f. && or zero if you want .Visible = .t. && Most important. All programaticly added controls are unvisible by deafult ENDWITH WITH thisform.PageFrame1.Page1.Text1 .Top = 15 .Left = 1 .Caption = "Added TextBox" .AutoSize = .t. .Value = "Bla Bla" .Visible = .t. && Same as previous ENDWITH