ext=dqkk!sdeptype
txtdz(2).Text=dqkk!grade
dcmbdz(2).Text=dqkk!readsf
DTPicker1.Value=dqkk!brith
idcard=dqkk!sfzh
Fori=0To17
txtidcard(i).Text=Mid(idcard,i+1,1)
Next
txtdz(3).Text=dqkk!Password
txtdz(4).Text=dqkk!bzrID
txtdz(5).Text=dqkk!temptel
txtdz(6).Text=dqkk!parmtel
txtdz(7).Text=dqkk!tempadd
txtdz(8).Text=dqkk!parmadd
txtdz(9).Text=dqkk!email
txtdz(10).Text=dqkk!readmemo
txtdz(11).Text=dqkk!kjycs
EndIf
txtdz(0).Enabled=False
dcmbdz(0).Enabled=False
dcmbdz(2).Enabled=False
txtdz(11).Enabled=False
EndSub
【说明】
Dzxs过程的作用是将需修改数据的读者情况依次显示在『读者基本数据-修改』窗口中,并让读者证号、读者状况、读者身份、可借阅总册数可用属性变为否。
(3)删除读者:(Cmd6)
【功能】
选择要删除的读者,点击删除读者按钮,系统提示是否删除,若删除则点确定,这条读者数据就被删除了。若不进行删除,则点取消返回【读者管理】窗口。
【代码】
PrivateSubcmd6_Click()
rt=MsgBox("真的删除读者证号["+TDBGrid1.Columns(0)+"]的记录?",vbYesNo,"警告")
Ifrt=6Then
g_CN.Execute"deletefromreaddzwherereadID='"+TDBGrid1.Columns(0)+"'"
rt=MsgBox("记录已成功删除!",vbOKOnly,"提示")
EndIf
Calldzcx
EndSub
注:由于以下按钮中程序代码与之前的新增、查询、修改比较类似,因此论文中仅以部分主要程序代码为例做功能介绍。以下除打印代码外其他程序不做具体介绍。
(4)换借阅证:
点击按钮后出现界面如图6-14所示。
其中旧读者证号不可修改,输入新读者证号,程序会判断证号是否存在,若存在则提示"读者证号重复,请重新输入!"并置光标到文本框中,等待重新输入。
换证规则:1.本人或他人之旧读者证号,系统一概不予以接收。2.换证后,就读者证号从此作废,不复使用。
最后,点存档按钮即可更换读者证。
(5)挂失借阅证:
点击按钮后出现界面如图6-15所示。
这里读者证号与读者姓名不可修改,呈灰色显示。点存档按钮后,此证件即挂失,证件挂失后,读者将停权到证件发放为止。
(6)重设权限:
点击按钮后出现界面如图6-16所示。
输入该读者要重设的权限,程序会将输入的数据用SOL语句替换原有数据。确定后点存档按钮即可更改权限。
(7)修改读者身份:
点击按钮后出现界面如图6-17所示。
单击更改身份的下来选项选择要更改的身份,其中包括图书馆工作人员、学生读者、教师读者三个选项可供选择。选择合适的身份后,单击存档按钮用当前选中的身份替换以前的身份并退出。
(8)处理离校/离职:
点击按钮后出现界面如图6-18所示。
其中读者证号与读者姓名不可修改,状况描述包括已经毕业、休学、退学三个选项可供选择,选择合适的选项后存档,程序会判断此人是否有书未还,若有书未还则不能办理离校。若符合离校/离职条件则用选择的状况替换原有的状况。
(9)打印读者证:
查询出欲打印读者证的读者,单击打印读者证按钮后出现界面如图6-19所示。
图6-19
【代码】
PrivateSubcmd9_Click()
ActiveReport6.ShowvbModal
EndSub
预览需要打印的读者借阅证
PrivateSubActiveReport_ReportStart()
SetDataControl1.Recordset=dqkk
Field6.Text=Date
EndSub
数据源为记录集变量dqkk,field6为发证时间,取系统时间。
【说明】打印使用外部控件DataDynamicsActiveReports。报表设界面如图6-20所示。
图6-20
其中个控件属性设定如下:
控件名称
Caption属性
DataField属性
DataSource属性
Field1
ReadID
DataControl1
Field2
ReadNA
DataControl1
Field3
Readsf
DataControl1
Field4
Readsex
DataControl1
Field5
sfzh
DataControl1
Lable1
读者证号
Lable2
读者姓名
Lable3
读者身份
Lable4
性别
Lable5
身份证号
Lable6
发证时间
Lable7
读者借阅证
(10)打印数据:
查询出欲打印读者资料,单击打印数据按钮后出现界面如图6-21所示。
图6-21
6.2系统测试
系统测试是管理信息系统开发期间中一个十分重要而漫长的阶段。其重要性体现在它是保证系统质量与可靠性的最后关口。且对整个系统开发过程包括系统分析、系统设计和系统实现的最终审查
6.2.1调试过程
调试过程分为三个阶段:分调、联调、总调。
1.分调也称模块程序调试,是调试工作的基础工作,目标是发现并纠正程序设计阶段产生的错误。具体做法是组织各模块编程人员,对每一个模块进行调试。调试时着重检查了如下几方面:
(1)模块运行是否正常、无死机。包括检查有无语法错误(例如打错语句、语句不配对等)、逻辑错误(例如文件或变量找不到、变量类型错误等)和流程模块错误(例如模块内的功能调度、模块的进入与退出失败等)。
(2)模块的功能是否符合设计要求。包括检查功能有无多余或丢失,功能是否准确无误,算法是否正确,格式是否合理等。
(3)模块的技术性能如何。包括检查对输入的响应,数据检索、统计与输出的速度等。
(4)界面是否友好。包括检查画面是否清晰美观,对话是否适度,操作是否方便。
2.联调是指子系统中各程序模块之间的联合调试,目的是发现并纠正系统设计过程中产生的错误。具体做法是组织编程人员,逐个子系统进行调试。调试时特别检查了如下几方面:
(1)子系统内模块功能的调度是否正确。包括模块间的进退是否自如,功能调度中变量的传递有无问题等。
(2)子系统的功能是否符合设计的要求。包括功能是否齐全无错漏。
(3)子系统内的数据组织是否符合功能的需要。包括基本数据项是否完整,数据文件间的关系是否正确,数据接口设计是否合理等。
3.总调是对整个程序系统以及人工过程与环境的总调试,目标是发现并纠正系统分析阶段产生的错误。具体做法是由系统开发的技术负责人组织系统分析员及设计编程人员参加,对由各个子系统结合而成的程序系统以及配合系统运行而所需的人工过程或操作环境(例如数据采集、预处理、录入操作和设备设置等)进行统一的综合调试。总调已经有了分调和联调的基础。,其重点应检查了如下几方面:
(1)系统的整体调度功能是否正常。包括主程序与各级菜单之间的进入与返回,口令输入,权限控制等是否都能正确执行。
(2)系统的功能是否符合系统分析和总体设计的要求。包括系统的功能和结构有为错漏,功能的分配与模块的分解是否合理等。
(3)系统的数据组织与存储是否符合设计的要求。包括检查数据的总容量,文件或数据库的检索效率几子系统之间的数据联系等。
6.2.2调试方法
调试的关键是发现错误,因为只要发现错误,纠正就不难做到。为了有效地发现错误,我采用了两种调试方法:静态调试法、动态调试法
(1)静态调试法
用人工的方式对文档、程序、数据等资料进行审核,找出其中的错误。这种方法不用运行程序,完全靠调试人员从文字资料的字里行间中进行检查,因而是一种"静态的"调试方法。
(2)动态调试法:
通过程序系统的运行,在程序的"动态"执行中检查和发现错误。我在正确掌握程序的功能与性能要求的情况下,采用测试用例对程序进行数据驱动下的动态测试。
我采用了静态调试和动态调试相结合的方法,经历了分调、联调和总调阶段,运用适当
上一篇:
dekphi贸易公司信息管理系统+论文(论文和程序)
下一篇:
英语论文网([网学网]):英语专业本科生毕业论文写作