main.prg

我的第一个程序～～～只为了下东西～～～～～～～～～～～※％（＃◎……×※￥％◎……×％￥◎（）％×＃（）

clea all
set talk off
set date to short
set sysmenu off
set date long
_screen.caption="学生信息管理系统"
_screen.enabled=.F.
_screen.windowstate=2
p1=sys(5)+sys(2003)+"\back.jpg"
_screen.picture=p1
_screen.closable=.F.
_screen.activate

Public ShowFlg
Public LoginUser
LoginUser=''
ShowFlg=.F.

do form  Forms\loginfrm
read events