DEFINE CLASS form1 AS form DoCreate = .T. Caption = "Form1" cproperty1 = "" Name = "Form1" ADD OBJECT text1 AS textbox WITH ; ControlSource = "thisform.cProperty1", ; Height = 23, ; Left = 26, ; Top = 18, ; Width = 100, ; Name = "Text1" ADD OBJECT command1 AS commandbutton WITH ; Top = 24, ; Left = 240, ; Height = 27, ; Width = 84, ; Caption = "Command1", ; Name = "Command1" PROCEDURE reset this.cProperty1 = "initial value" ENDPROC PROCEDURE Load thisform.Reset() ENDPROC PROCEDURE command1.Click wait window "doing Joel's thing" thisform.Reset() thisform.Refresh() ENDPROC ENDDEFINErun the form, type something different in the textbox, and click the button, after you clear the wait window the form will reset.