>o=Createobject("myform") >o.Show > >Read Event > >Wait Window "This wait won't run" > >Return > > > >Define Class myform As Form > WindowType=1 > Add Object btn As mycommand >Enddefine > >Define Class mycommand As CommandButton > Height=30 > Width=100 > Caption="Click Me" > Procedure Click > Thisform.Release > Clear Events > Endproc >Enddefine >With Modal,