新华书店进销存管理系统部分程序源代码(doc 31页)

摘要
新华书店进销存管理系统部分程序源代码
1、 主程序MAIN.PRG程序代码
SET DEFAULT TO C:\毕业设计
PUBLIC nkfgl,nxsgl,ncggl,nkcgl,nxtgl
STORE .f. TO nkfgl,nxsgl,ncggl,nkcgl,nxtgl
PUBLIC nname,ndepartment
STORE "" TO nname,ndepartment
Do Form loginf
Read Events
Do Form main
Read Events
Quit
2、 主表单MAIN.SCX代码
2.1 表单Init过程程序代码
do mmenu.mpr with this,.T.
this.label2.caption = nname
this.label4.caption = ndepartment

..............................