main6.prg

来自「一个很优秀的企业人事管理系统。本软件免费」· PRG 代码 · 共 42 行

_screen.windowstate=2
_screen.caption="商品进销存管理系统 2.0版 李春葆软件开发工作室"
_screen.closable=.F.
_screen.maxbutton=.F.
_screen.minbutton=.F.
close all
clear all
clea
set sysmenu off
set sysmenu to
set talk off
set date ansi
set delete on
set exact off
set safety off
set status bar off
do form pass to num
if num 
   do form main
   read event
endif
set sysmenu to default
set sysmenu on
set status bar on
use jh
pack
use jh1
pack
use fk
pack
use fk1
pack
use mcb
pack
use jbrb
pack
use dwb
pack
close all
clear all
return