Public oForm oForm = Createobject('myForm') oForm.Show Define Class myForm As Form Add Object chk As Checkbox With ; Style = 1, ; Picture = Home(4)+'Icons\Misc\Face04.ico', ; DownPicture = Home(4)+'Icons\Misc\Face02.ico', ; PicturePosition = 1, ; AutoSize = .T., ; Caption = "Some caption" EnddefineCetin