main.prg

来自「用VFP编的超市进销存管理系统」· PRG 代码 · 共 18 行

*——设置系统环境
CLEAR
CLEAR ALL
SET CENTURY ON			&&显示4位年代
SET DATE YMD			&&日期显示方式为“年月日”
SET HOUR TO 24			&&24小时格式显示日期
SET ESCAPE OFF			&&禁止运行的程序在按ESC键被中断
SET TALK OFF			&&关闭命令显示
SET SAFETY OFF          &&覆盖时不要确认
*——声明全局变量
PUBLIC cCurUser	&&  声明全局变量，用来保存系统中的登录用户
*——调用Splash表单
DO FORM Splash
*——进行事件循环
READ EVENTS
*——结束事件循环后退出Visual FoxPro
QUIT