VF课程设计学生成绩管理系统

发布 2022-10-04 13:11:28 阅读 7448

学生综测管理系统。

一。 需求分析。

一) 数据分析。

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 研究的思路和方法 ...