《基于VF实现的学生综测管理系统毕业设计论文word格式》Word文件下载.docx
《《基于VF实现的学生综测管理系统毕业设计论文word格式》Word文件下载.docx》由会员分享,可在线阅读,更多相关《《基于VF实现的学生综测管理系统毕业设计论文word格式》Word文件下载.docx(10页珍藏版)》请在冰豆网上搜索。
排 序
Nulls
1
学年学期
C
6
升序
否
2
姓名
3
班号
4
学号
11
5
德育分
N
智育分
7
8
总分
9
名次
3.表单(封面):
要求:
在用户名中输入学号
密码中输入数字“0”
点击“确认”按钮后进入主菜单
如果未输入密码时,显示
如果输入密码错误时,显示
4.菜单:
(1)数据浏览:
例如点击“浏览”栏中的财管班综测,得:
(2)数据编辑:
例如点击“编辑”按钮栏中的会计二班得:
(3)数据查询:
按照学号查询个人综测成绩
例如查询学号为20101000001的学生的综测得
如果学好不存在时,显示
5.退出:
点击“退出”按钮时,显示
点击“是”则可以退出系统。
二.程序设计
主程序
settalkoff
closeall
doformfm
modifywindscreentitl'
地大经管学生综测管理系统'
clear
docxcd.mpr
readevent
quit
菜单部分
浏览子菜单代码:
会计一班综测
usekj1
brow
会计二班综测
usekj2
会计三班综测
usekj3
财管综测
usecg
编辑子菜单代码:
编辑会计一班
append
编辑会计二班
编辑会计三班
编辑财管班
查询子菜单代码:
会计一班
dowhile.T.
accept"
请输入要查询的学生学号(输入0结束查询):
"
toxh
ifxh=='
0'
exit
endif
locateforalltrim(学号)==xh
iffound()
dispforalltrim(学号)==xh
else
wait"
没有此学号!
window
enddo
会计二班
会计三班
财管班
Enddo
汇总查询
usehz
退出代码:
ask=messagebox("
确实要退出系统吗"
4+32+256,"
学生综测管理系统"
)
ifask=6
endif
帮助子菜单代码:
版本信息
clear
use版本
list
封面部分代码
数据环境中加入新口令表(xklb.dbf,存密码和学号)
Form1.intn中写:
Publicerrornumber,Ps
Errornumber=0
退出的click中写:
确定要退出系统吗?
ifask=6
closeall
quit
else
确定的click中写:
usexklb
a=Thisform.text1.value
b=Thisform.text2.value
ifa=="
n=messagebox("
请输入用户名"
4+32,"
学生管理系统登陆"
docase
casen=6
thisform.text1.value="
thisform.text1.setfocus
casen=7
thisform.release
endcase
ifb=="
请输入密码"
thisform.text2.value="
thisform.text2.setfocus
locateforalltrim(xklb.Id)==alltrim(a)
ifalltrim(xklb.Ps)==alltrim(b)
thisform.release
else
messagebox("
密码错误,请重新输入"
64,"
学生综测管理系统登陆"
errornumber=errornumber+1
用户"
+a+"
不存在!