学生综测管理系统。
一。 需求分析。
一) 数据分析。
1. 原始数据包括4个表:
1) 会计一班综测成绩单。
2) 会计二班综测成绩单。
3) 会计三班综测成绩单。
4) 财务管理班综测成绩单。
2.表内容:
3.表单(封面):
要求:在用户名中输入学号。
密码中输入数字“0”
点击“确认”按钮后进入主菜单。
如果未输入密码时,显示。
如果输入密码错误时,显示。
4.菜单:1)数据浏览:例如点击“浏览”栏中的财管班综测,得:
2)数据编辑:例如点击“编辑”按钮栏中的会计二班得:
3)数据查询:按照学号查询个人综测成绩。
例如查询学号为***的学生的综测得。
如果学好不存在时,显示。
5.退出:点击“退出”按钮时,显示
点击“是”则可以退出系统。
二。 程序设计。
主程序。set talk off
close all
do form fm
modify wind screen titl'地大经管学生综测管理系统'
cleardo
read event
quit菜单部分。
浏览子菜单**:
会计一班综测。
use kj1
brow会计二班综测。
use kj2
brow会计三班综测。
use kj3
brow财管综测。
use cg
brow编辑子菜单**:
编辑会计一班。
use kj1
append
编辑会计二班。
use kj2
append
编辑会计三班。
use kj3
append
编辑财管班。
use cg
append
查询子菜单**:
会计一班。use kj1
do while .t.
accept "请输入要查询的学生学号(输入0结束查询):"to xh
if xh=='0'
exitendif
locate for alltrim(学号)==xh
if found()
disp for alltrim(学号)==xh
elsewait "没有此学号!" window
endifenddo
会计二班。use kj2
do while .t.
accept "请输入要查询的学生学号(输入0结束查询):"to xh
if xh=='0'
exitendif
locate for alltrim(学号)==xh
if found()
disp for alltrim(学号)==xh
elsewait "没有此学号!" window
endifenddo
会计三班。use kj3
do while .t.
accept "请输入要查询的学生学号(输入0结束查询):"to xh
if xh=='0'
exitendif
locate for alltrim(学号)==xh
if found()
disp for alltrim(学号)==xh
elsewait "没有此学号!" window
endifenddo
财管班。use cg
do while .t.
accept "请输入要查询的学生学号(输入0结束查询):"to xh
if xh=='0'
exitendif
locate for alltrim(学号)==xh
if found()
disp for alltrim(学号)==xh
elsewait "没有此学号!" window
endifenddo
汇总查询。use hz
do while .t.
accept "请输入要查询的学生学号(输入0结束查询):"to xh
if xh=='0'
exitendif
locate for alltrim(学号)==xh
if found()
disp for alltrim(学号)==xh
elsewait "没有此学号!" window
endifenddo
退出**:ask=messagebox("确实要退出系统吗",4+32+256,"学生综测管理系统")
if ask=6
close all
quitelse
endif帮助子菜单**:
版本信息。clear
use 版本。
list封面部分**。
数据环境中加入新口令表(存密码和学号)
中写:public errornumber,ps
errornumber=0
退出的click中写:
ask=messagebox("确定要退出系统吗?",4+32+256,"学生综测管理系统")
if ask=6
close all
quitelse
endif确定的click中写:
use xklba=b=
if a=="
n=messagebox("请输入用户名",4+32,"学生管理系统登陆")
do case
case n=6
case n=7
endcase
elseif b=="
n=messagebox("请输入密码",4+32,"学生管理系统登陆")
do case
case n=6
case n=7
endcase
endifendif
locate for alltrim(
if found()
if alltrim(
do else
messagebox("密码错误,请重新输入",64,"学生综测管理系统登陆")
errornumber=errornumber+1
endifelse
messagebox("用户"+a+"不存在!",64,"学生综测管理系统登陆")
errornumber=errornumber+1
endif
VF课程设计学生成绩管理系统
学生综测管理系统。一。需求分析。一 数据分析。1.原始数据包括4个表 1 会计一班综测成绩单。2 会计二班综测成绩单。3 会计三班综测成绩单。4 财务管理班综测成绩单。2.表内容 3.表单 封面 要求 在用户名中输入学号。密码中输入数字 0 点击 确认 按钮后进入主菜单。如果未输入密码时,显示。如果...
课程设计 学生成绩管理系统
应用程序综合设计报告。题目 学生成绩管理系统 学生成绩管理系统是学生管理系统的重要组成部分,对学生的德 智 体全面评估有很大的作用,所以学生成绩管理系统应该能够为用户提供方便的查询平台和数据存储功能。传统是使用人工的方式对学生的信息进行存储,对于个人的学生成绩来说,数据的整理和分析就显得很麻烦,不利...
学生成绩管理系统课程设计
一。选题 2 1.1 学生成绩管理系统分析与设计 2 1.2选择该课题原因 3 1.3课题研究的目的和意义 3 1.4课题主要研究内容 3 二。系统规划 3 2.1 需求分析 3 2.2可行性分析 4 2.3课题要达到的目标 5 三。系统分析 5 3.1 系统现状分析 6 3.2 研究的思路和方法 ...