学生管理系统.doc

管理信息系统(MIS—Management Information System)是以众多学科如：统计学、系统理论、计算机科学和管理科学为依托

 Thisform.release
4.3主界面的设计
　　该系统提供的所有功能都放置在一个统一的界面中供用户选择，该界面称之为主界面。本系统的主界面采用了按钮交互方式。在“学籍管理”项目中添加一个新表单，命名为“Main”,并将Caption属性设置为“学籍管理系统-主菜单” 。在该表单中添加一个Image控件，显示背景图片，5个Comand控件，执行系统的5项功能，上述控件的主要属性设置如表4-2所示。
　　表4-2登陆界面控件属性设置
编号
名称
类型
属性名称
属性值
1
Image1
Image
Picture
D：\main-bp。Jpg
2
Command1
Command
caption
日常管理
3
Command2
Command
caption
毕业管理
4
Command3
Command
caption
查询
5
Command4
Command
caption
用户管理
6
Command5
Command
caption
退出系统
　　 
设计完成的界面如图4-2所示

　　
图4-2  主界面设计界面

　　此界面上提供了5项功能，下面分别对其进行代码设置。
　　Command1控件对应系统中的日常操作功能，单击此按钮即可调用日常管理的界面，为此在Command1控件的click中添加如下代码
　　*调用日常管理操作界面
　　DO FORM RCHCZ
　　Command2控件对应系统中的毕业管理功能，同样在该表单的click行为中添加如下代码，用来调用毕业生管理界面。
　　*调用毕业管理模块
　　DO FORM BY
　　同样的设置方法在command3控件中的click行为中添加代码，用来调用查询模块的操作界面。
　　*调用查询操作界面
　　DO FORM CHX
　　Command4控件对应了系统中的用户管理功能，在其click行为中添加如下代码，调用用户管理的操作界面
　　*调用用户管理界面
　　DO FORM YHG
　　以上是系统的4项功能，用鼠标单击某一按钮即可运行对应的模块，最后该界面还提供退出该系统的按钮，在command5控件的click行为中添加如下代码，实现退出系统的功能。
　　*退出系统
　　THISFORM.RELEASE
4.4日常管理模块
　　学籍管理中经常要对学生的信息进行修改，如将新学生的信息添加到学生的信息库中，又如修改或者删除部分学生的信息，所有上述操作都称为日常管理，下面介绍日常管理模块的设计。
1. 设计日常操作功能的选择界面
　　在“学籍管理”项目中添加一个新的表单，命名为“Rchcz”在该表单上放置3个Commandgroup控件来分隔表单显示界面，2个Lable控件用来显示提示信息；一个Text控件接受用户的输入，一个Comamnd控件完成控制功能。上述控件的属性设置如表4-2所示
表4-2。日常操作界面控件属性设置
编号
名称
类型
属性设置
属性值
1
Commandgroup1
Commandgroup
Buttoncount
0
2
Commandgroup2
Commandgroup
Buttoncount
0
3
Commandgroup3
Commandgroup
Buttoncount
4
4
Label1
Label
Caption
日常操作
5
Label2
Label
Caption
学号
6
Text1
Text
Enable
.F.
7
Command1
Command
Caption
Enable
确定
.F.
　　
　　在该表单中应用了Comamndgroup控件，其中Commandgroup4提供了4个控件来执行相应的功能。用鼠标右键来执行相应的功能。用鼠标右键在控件上单击，选择菜单中的“编辑”命令，即可对该控件经行修改，如调整控件的位置，大小等。该控件的4个按钮的属性的设置如表4-3所示。
编号
名称
类型
属性名称
属性值
1
Command1
Command
Caption
添加新学生
2
Command2
Command
Caption
删除
3
Command3
Command
Caption
修改
4
Command4
Command
Caption
返回
　　表4-3Commandgroup4属性设置
　　
　　
　　
　　
　　
　　
　　
　　设计完成的界面如图4-3所示。
　　

图4-3  日常管理的设计界面
　　
　　该界面为使用者提供了一个操作学籍信息库的统一方法，为了能够区分用户的操作目的，在该表单的Init行为中设置了两个全局变量，用来保存用户在此表单中选择的操作功能和输入学生的学号，如选择了“删除”功能，Com-bt的值设置为“Delete-form”，而在Xh变量保存了用户输入的学号，代表了所要删除的学生学号，设计代码如下：
　　*设置全局变量，用来传递数据
　　PUBLIC XH，COM-BT
　　*实现所要实现的按钮
　　COM-BT=“”
　　*输入的学号
　　XH=“”
　　在Commandgroup3控件中提供了4个按钮选项，分别用来完成相应的功能，进入该控件的可编辑状态。在该控件Command1控件中负责完成添加新学生的功能，即将新学生的信息添加到信息库中，为了完成此功能在其Click行为中添加如下代码
　　*将该表单中TEXT1控件设置为空
　　THISFORM.TEXT1.VALUE=""
　　*设置在显示的按钮为增加按钮
　　COM_BT="APPEND_FORM"
　　*调用APPLE表单
　　DO FORM APPE
　　
　　上述代码完成对表单的清理工作后，调用APPLE表单。
　　Commandgroup3中的Command2完成删除指定学号的学籍信息。学生的学号要求用户在该表单中的Cext1控件中输入，单击“确定”按钮后在子信息库中查找该生的信息，然后显示给用户，并显示“删除”功能按钮，为此在Commandgroup3中的Command2的Gotfocus行为中添加如下代码：
　　THISFORM.TEXT1.ENABLED=.T.
　　THISFORM.COMMAND1.ENABLED=.T.
　　MESSAGEBOX("请输入学生的学号！")
　　COM_BT="DELETE_FORM"
　　同Commandgroup3中的Command2的Gotfocus行为中的代码类似，在Commandgroup3中的Command3的Gotfocus行为中添加如下代码，用户对修改功能进行初始化。
　　*设置表单中的Text1和Command1为有效
　　THISFORM.TEXT1.ENABLED=.T.
　　THISFORM.COMMAND1.ENABLED=.T.
　　MESSAGEBOX("请输入学生的学号！")
　　*设置显示的按钮为修改按钮
　　COM_BT="MODIFY_FORM"
　　在Commandgroup3中的Command4中提供了退出该表单的功能，在其Click行为中添加如下代码，完成退出功能。
　　*退出系统
　　THISFORM.RELEASE
2. 记录管理表单的设计
　　在“学籍管理”项目中添加一个新的表单，命名为“Apple”将Caption属性设置为修改窗口，然后添加一系列控件，共有3个Commandgroup控件用来分隔显示区域，12个Lable空间来显示提示信息，7个Text控件接受用户的选择，3个Combo控件提供用户选择项目，1个Edit控件接受用户输入个人简介，一个Line控件及5个Command完成控制功能软件。这些控件的主要属性设置如表4-4所示。
表4-4 Commandgroup4属性设置
编号
名称
类型
属性名称
属性值
1   
Commandgroup1
Commandgroup
Buttoncount
0
2
Commandgroup2
Commandgroup
Buttoncount
0
3
Commandgroup3
Commandgroup
Buttoncount
0
4
Label1
Label
Caption
记录管理窗口
5
Label2
Label
Caption
姓名
6
Label3
Label
Caption	
民族
7
Label4
Label
Caption
出生日期
8
Label5
Label
Caption
班级
9
Label6
Label
Caption
学号
10
Label7
Label
Caption
政治面貌
11
Label8
Label
Caption
家长姓名
12
Label9
Label
Caption
联系电话
13
Label10
Label
Caption
家庭地址
14
Label11
Label
Caption
个人简介
15
Line1
Line
Width
504
16
Text1
Text


17
Text2
Text


18
Text3
Text


19
Text4
Text


20
Text5
Text


21
Text6
Text


22
Text7
Text


23
Combo1
Combo
Rowsourcetype
Rowsource
1- 值
男，女
24
Combo2
Combo
Rowsourcetype
Rowsource
1- 值
汉族，其他
25
Combo3
Combo
Rowsourcetype
Rowsource
1- 值
团员，其他
26
Command1
Command
Caption
添加
27
Command2
Command
Caption
修改
28
Command3
Command
Caption
删除
29
Command4
Command
Caption
确定
30
Command5
Command
Caption
返回
　　
　　
　　设计完成的表单如图4-4所示。

图4-4记录管理窗口的设计

　　该表单根据用户在Rchcz表单中选择的的操作功能显示不同的按钮，完成此项功能的代码设计在该表单的Init行为中，代码设计如下：
　　*如果输入的学籍为空，则表示增加新的学籍
　　IF EMPTY(XH)
　　		*将表单设置成为增加新新记录的表单
　　		THISFORM.TEXT1.VALUE=""
　　		THISFORM.TEXT2.VALUE=""
　　		THISFORM.TEXT3.VALUE=""
　　		THISFORM.TEXT4.VALUE=""
　　		THISFORM.TEXT5.VALUE=""
　　		THISFORM.TEXT6.VALUE=""
　　		THISFORM.COMBO1.VALUE=""
　　		THISFORM.COMBO2.VALUE=""
　　		THISFORM.COMBO3.VALUE=""
　　		THISFORM.EDIT1.VALUE=""
　　	ELSE
　　		*查找输入学号的记录
　　		USE STUDENT.DBF
　　		LOCATE FOR ALLTRIM(学号)==ALLTRIM(XH)
　　		IF FOUND()
　　		*如果找到将信息在表单中显示
　　				THISFORM.TEXT1.VALUE=ALLTRIM(姓名)
　　				THISFORM.TEXT1.ENABLED=.F.
　　				THISFORM.COMBO1.VALUE=ALLTRIM(性别)
　　				THISFORM.COMBO1.ENABLED=.F.
　　				THISFORM.COMBO2.VALUE=ALLTRIM(民族)
　　				THISFORM.COMBO2.ENABLED=.F.
　　				THISFORM.TEXT2.VALUE=出生日期
　　				THISFORM.TEXT2.ENABLED=.F.
　　				THISFORM.TEXT3.VALUE=ALLTRIM(班级)	
　　				THISFORM.TEXT3.ENABLED=.F.
　　				THISFORM.TEXT4.VALUE=ALLTRIM(学号)
　　				THISFORM.TEXT4.ENABLED=.F.
　　				THISFORM.COMBO3.VALUE=ALLTRIM(政治面貌)
　　				THISFORM.COMBO3.ENABLED=.F.
　　				THISFORM.TEXT5.VALUE=ALLTRIM(家长姓名)
　　				THISFORM.TEXT5.ENABLED=.F.
　　				THISFORM.TEXT6.VALUE=ALLTRIM(联系电话)
　　				THISFORM.TEXT6.ENABLED=.F.
　　				THISFORM.TEXT7.VALUE=家庭地址
　　				THISFORM.TEXT7.ENABLED=.F.
　　				THISFORM.EDIT1.VALUE=个人简介
　　				THISFORM.EDIT1.ENABLED=.F.					
　　			ELSE
　　			*没有找到提示没有此人
　　			MESSAGEBOX("没有找到此人！")
　　		ENDIF
　　		THISFORM.COMMAND1.ENABLED=.F.
　　ENDIF
　　*将功能按钮状态设置为不可用
　　THISFORM.COMMAND1.VISIBLE=.F.
　　THISFORM.COMMAND2.VISIBLE=.F.
　　THISFORM.COMMAND3.VISIBLE=.F.
　　THISFORM.COMMAND4.VISIBLE=.F.
　　*根据用户的选择来显示相应的按钮
　　DO CASE
　　	CASE COM_BT="APPEND_FORM"
　　	*增加功能
　　		 THISFORM.COMMAND1.VISIBLE=.T.
　　	CASE COM_BT="DELETE_FORM"
　　	*删除功能
　　		 THISFORM.COMMAND3.VISIBLE=.T.
　　	CASE COM_BT="MODIFY_FORM"
　　	*修改功能
　　		 THISFORM.COMMAND2.VISIBLE=.T.
　　		 THISFORM.COMMAND4.VISIBLE=.T.
　　	
　　ENDCASE
　　当表单执行时首先执行Init中的行为，根据用户的选择来初始化表单。在该表单中放置了5个Command控件，可以独立或者组合完成用户的操作功能，下面介绍其设计的方法。