|
六、主要功能简介： 1、 用户登录界面: copyright paper51.com 内容来自www.paper51.com 2、 登录后的界面: http://www.paper51.com
内容来自www.paper51.com
3、 班主任名册管理： 内容来自论文无忧网 www.paper51.com
内容来自论文无忧网 www.paper51.com
4、 班主任劳务费和管理： http://www.paper51.com
paper51.com
以上就是本系统的各个界面图。 http://www.paper51.com 还有一些按钮的功能为介绍，在后面的内容中在进行介绍。 paper51.com 5、 图中的：各个按钮的功能是返回上一级、第一个、下一个、上一个、最后一个、添加、修改、删除、打印、统计和退出的功能。 内容来自论文无忧网 www.paper51.com 七、本系统的源代码主要有 http://www.paper51.com
http://www.paper51.com 1、 返回上一级按钮（）的代码是： 内容来自论文无忧网 www.paper51.com do form main copyright paper51.com thisform.release http://www.paper51.com
2、 下一个、上一个这四个按钮（）的代码是： 内容来自论文无忧网 www.paper51.com store recno() to x paper51.com
i=0 内容来自www.paper51.com
locate for alltrim(thisform.text1.value)=班主任编号 内容来自www.paper51.com if found () http://www.paper51.com
i=i+1 内容来自www.paper51.com
continue paper51.com if found () copyright paper51.com i=i+1 内容来自论文无忧网 www.paper51.com
endif copyright paper51.com endif http://www.paper51.com go x 内容来自www.paper51.com do case paper51.com casei>1 paper51.com =messagebox("记录重复了，请更改后重试！",0+64+0,"数据录入错误！") copyright paper51.com
thisform.text1.value="" copyright paper51.com thisform.text1.setfocus paper51.com
caselen(alltrim(thisform.text1.value))=0 http://www.paper51.com =messagebox("漏填了，请补添后重试！",0+64+0,"数据录入错误！") paper51.com thisform.text1.setfocus http://www.paper51.com caselen(alltrim(thisform.text2.value))=0 http://www.paper51.com =messagebox("漏填了，请补添后重试！",0+64+0,"数据录入错误！") copyright paper51.com thisform.text2.setfocus paper51.com
caselen(alltrim(thisform.text5.value))=0 http://www.paper51.com =messagebox("漏填了，请补添后重试！",0+64+0,"数据录入错误！") http://www.paper51.com thisform.text5.setfocus paper51.com caselen(alltrim(thisform.text6.value))=0 copyright paper51.com =messagebox("漏填了，请补添后重试！",0+64+0,"数据录入错误！") paper51.com thisform.text6.setfocus http://www.paper51.com otherwise http://www.paper51.com skip -2 http://www.paper51.com if bof () =.t. 内容来自论文无忧网 www.paper51.com thisform.command1.enabled=.f. paper51.com thisform.command2.enabled=.f. paper51.com
endif 内容来自www.paper51.com go x-1 copyright paper51.com
if eof () =.f. paper51.com thisform.command3.enabled=.t. http://www.paper51.com
thisform.command4.enabled=.t. 内容来自www.paper51.com endif 内容来自论文无忧网 www.paper51.com
thisform.text1.enabled=.f. http://www.paper51.com
thisform.text2.enabled=.f. copyright paper51.com thisform.text3.enabled=.f. copyright paper51.com thisform.text4.enabled=.f. 内容来自论文无忧网 www.paper51.com thisform.text5.enabled=.f. 内容来自www.paper51.com thisform.text6.enabled=.f. 内容来自www.paper51.com endcase paper51.com thisform.refresh copyright paper51.com 3、 添加按扭（）的源代码是： copyright paper51.com do form main http://www.paper51.com thisform.release 内容来自论文无忧网 www.paper51.com
4、 修改按钮的原代码（）是： http://www.paper51.com
yn=messagebox("真的要 修改 吗？请单击 确定 。",1+64+0,"修改") 内容来自论文无忧网 www.paper51.com
if yn=1 paper51.com thisform.text1.enabled=.t. http://www.paper51.com
thisform.text2.enabled=.t. paper51.com thisform.text3.enabled=.t. copyright paper51.com thisform.text4.enabled=.t. 内容来自论文无忧网 www.paper51.com
thisform.text5.enabled=.t. copyright paper51.com thisform.text6.enabled=.t. copyright paper51.com
thisform.text1.setfocus copyright paper51.com replace 班主任编号 with alltrim(thisform.text1.value) http://www.paper51.com replace 姓名 with alltrim(thisform.text2.value) paper51.com
replace 电话 with alltrim(thisform.text3.value) http://www.paper51.com replace 手机 with alltrim(thisform.text4.value) 内容来自论文无忧网 www.paper51.com
replace 住址 with alltrim(thisform.text5.value) 内容来自www.paper51.com replace 班级 with alltrim(thisform.text6.value) http://www.paper51.com endif http://www.paper51.com thisform.refresh paper51.com |