VFP连编之后运行出错
想请教一下大家这个问题的原因是什么,怎样解决呢附主程序代码:
CLOSE all
SET TALK off
set sysmenu off
set cent on
_screen.FontSize=24
_screen.windowstate=0
_screen.icon="picture\ico.ico"
_screen.maxbutton=.t.
_screen.minbutton=.t.
_screen.closable=.f.
modify window screen noclose
MODIFY WINDOW SCREEN TITLE " 自行车购买查询系统 "
ZOOM WINDOW SCREEN MAX
mypath=LEFT(SYS(16),RAT("\",SYS(16)))
SET DEFA TO SYS(5)+SYS(2003)
SET PATH TO SYS(5)+SYS(2003);FORMs,DATA,menu,prog,report,libs
do form forms\admin
read events
clear
close all
return