local cFormName,oForm as Form
cFormName=sys(2015)
Public &cFormName
&cFormName=CREATEOBJECT("类名","名称",@参数.....)
oForm=Evaluate(cFormName)
oForm.Show()
=====================================关闭表单===============
set library to myfill.fll
=sendmessagebox(oForm.Hwnd,16)
set Library to