同一个表单，多次实例化

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