PRIVATE myVarmyVar = 4oForm = CreateObject("MyForm")oForm.Show()DEFINE CLASS MyForm as FormPROC INIT()WAIT WINDOW myVarENDPROCENDDEFINERegardsViv
RegardsViv