毕业论文——学生信息管理系统

（图七）

代码如下：

Private Sub Command1_Click() Dim SQLoriginal As String Dim SQLadd As String Dim SQLorder As String Dim strSql As String

On Error Resume Next

SQLoriginal = \成绩表 \

SQLadd = \学号=学号 AND 姓名=姓名 \SQLorder = \

If Check1.Value = 1 And IsNumeric(Text1) Then SQLadd = SQLadd + \学号='\End If

If Check2.Value = 1 And Not IsNull(Text2) Then SQLadd = SQLadd + \姓名='\End If

If Check3.Value = 1 And Not IsNull(Text3) Then

SQLadd = SQLadd + \考试科目='\End If

If Check4.Value = 1 Then

SQLadd = SQLadd + \科目分数<60\End If

strSql = SQLoriginal + SQLadd + SQLorde If Dat_Main.rsDat_ChengJ.State = 1 Then Dat_Main.rsDat_ChengJ.Close End If

Dat_Main.rsDat_ChengJ.Open strSql Dat_ChengJ.Show vbModal Text1.Text = \Text2.Text = \

毕业论文——学生信息管理系统

Text3.Text = \

End Sub

Private Sub Command2_Click() Unload Me End Sub

Private Sub Form_Load() Text1.Text = \Text2.Text = \Text3.Text = \'Text4.Text = \End Sub

Private Sub Text1_Change()

End Sub

交费统计分析（如：界面如图八）

（图八）

代码如下：

Private Sub Command1_Click() Dim SQLoriginal As String Dim SQLadd As String Dim SQLorder As String Dim strSql As String

SQLoriginal = \学号,姓名,学期,本学期应交费用,实际交费,本次欠费 FROM 交费表 \

SQLadd = \学号=学号 AND 姓名=姓名 \

SQLorder = \

If Check1.Value = 1 And IsNumeric(Text1) Then SQLadd = SQLadd + \学号='\End If

If Check2.Value = 1 And Not IsNull(Text2) Then SQLadd = SQLadd + \姓名='\

毕业论文——学生信息管理系统

End If

If Check3.Value = 1 And IsNumeric(Text3) Then

SQLadd = SQLadd + \实际交费='\End If

If Check4.Value = 1 And IsNumeric(Text4) Then SQLadd = SQLadd + \本次欠费='\End If

strSql = SQLoriginal + SQLadd + SQLorde If Dat_Main.rsDat_JiaoF.State = 1 Then Dat_Main.rsDat_JiaoF.Close End If

Dat_Main.rsDat_JiaoF.Open strSql Dat_JiaoF.Show vbModal Text1.Text = \Text2.Text = \Text3.Text = \Text4.Text = \End Sub

Private Sub Command2_Click() Unload Me End Sub

Private Sub Form_Load() Text1.Text = \Text2.Text = \Text3.Text = \Text4.Text = \End Sub

Private Sub Text1_Change() End Sub

毕业论文——学生信息管理系统

第七章 学生信息系统软件测试

1、集成测试

集成测试将测试每一个部件之间的工作是否正常。在这个阶段，我们假设所有的单元已通过开发人员个人在单元测试阶段测试全部通过，没有任何错误。 集成测试包括以下内容：

连续集成测试

数据库测试 数据整合测试 2、功能测试

功能测试环境

操作系统：windows 98 内存：128M

网络环境：校园网 本功能测试共分为: 系统功能测试

测试是否可以正常添加用户和修改密码，系统正常退出

测试是否可以正常对班级进行管理，学生的单个或成批添加，删除以及新生信息的导入和学生信息备份

测试成绩管理中是否可以进行分数录入，汇总及排名和成绩备份等操作 测试课程信息模块中针对课程管理，老师和课程的关系之间操作是否正常 测试是否可以正常查询学生，老师和成绩

3、 链接测试

这一部分将测试系统各模块之间的超链接跳转是否正确 4、 文档测试 本章主要内容为：

测试文档是否包括全部内容

测试软件功能描述与其他功能有没有冲突