文档介绍：1、登陆界而(1)登陆按钮click事件代码:ifalltrim()二二messagebox(/z请输入用户名!”)returnendififalltrim()==////messagebox("请输入密码!”)returnendifa==luse读者信息locatefor且11trim(证号)二且11trim()iffound()ifalltrim(密码)二alltrim()messageboxC登录成功〃,64,"身份验证通过“)(/z密码输入错误!",16,"错误提示")endifelsemessagebox(/z读者号不存在!",16,"错误提示")endifelseuse管理员locatefor 证号)二alltrim()iffound()ifalltrim(密码)=alltrini(thisforni・)messagebox(/?登录成功!气64,"身份验证通过〃)(/z密码输入错误!",16,"错误提示")endifelsemessagebox(,z用户名不存在!〃,16,〃错误提示〃)endifendif(1)退出按钮click事件代码:answer=messagebox(z/你决定退出系统吗?",4,"提示")docasecaseanswer==7messagebox(,z请输入用户名和密码〃,0,〃提示〃)endcase2、系统主界面表单的int事件代码:do图书馆主界面・MPRwiththis,.=・:+>-=、图书查询界面(1)查询按钮的click事件代码:〃"m=allt()=lselect*=//temp/zcasen二2select*from图书信息wherealltrim(作者)="temp〃casen=3select*from图书信息wherealltrim(书名)like"%"+m+"%""temp"casen=4select*from图书信息wherealltTim(出版社)"temp"case门二5seiect*from图书信息whereal1trim(总编号)===emp"(2)返回按钮的click事件代码:、mandgroup组的click事件代码:(1).enabled=<(2).=2skip-1ifbof()(1).enabled=.(2).(3).enabled