kl.prg

不错的用电管理系统,用VFP6.0做的.大家可以下来看看哦

set status bar off
public qbz
qbz=1
do form kl name kl
close database
if qbz=0
	do jm with 'password',1
	on shutdown quit
	_screen.visible=.f.
	quit
endif
set status bar on