程序1.prg

来自「超市收款」· PRG 代码 · 共 18 行

set talk off
set echo off
set century on
set date ansi
set safe off
clear
clear all
set sysmenu off
*set sysmenu to
modify window screen  noclose nofloat
modify window screen title "里恩流行品管理系统"
zoom window screen max
do form kl
do men.mpr
*do form huanyu
read event
return