电脑库存管理系统数据库课程设计说明书.doc

PAGE PAGE 1 word完美格式 精心整理 学习帮手 数据库课程设计 说 明 书 ? 学 院、系： 软件学院 专 业： 软件工程 学 生 姓 名： 赵霸 学 号： 0926010210 设 计 题 目： 电脑配件库存管理系统 起 迄 日 期: 2011年5月30日~ 2011年6月17日 指 导 教 师: 李华玲 ? ? ?2012年 6月 17 日 需求分析 （1）软件的功能： 实现对各种电脑配件的添加、修改和删除功能；实现对各种电脑配件的进货、退货和出货的管理。 （2）软件的目的： 为了研究电脑配件库存管理系统软件的软件功能和开发方法，为以后的程序开发者提供可靠的依据。 （3）软件的任务： 完成贫困生管理系统的设计与实现，主要包括以下基本内容： 1）电脑配件资料的添加、修改与删除； 2）电脑配件的进货、退货与出货管理； 3）电脑配件的库存管理与信息统计； 4）各种信息统计分析功能； 5）完成程序的最终调试，必须能正常运行。 （4）软件的成果： 实现了对电脑配件的库存管理与信息统计以及各种信息统计分析功能。 2.总体设计 a．程序所包括的功能：添加功能、删除功能、进货功能、出货功能、退货功能和查询功能等。 b．添加功能包括：添加电脑配件名称、添加各种电脑配件的进货量和出货量。 c．删除功能包括：删除电脑配件名称。 d．进货功能包括：输入各种电脑配件的进货量。 e．出货功能包括：输入各种电脑配件的出货量。 f．退货功能包括：将某种或某些电脑配件的名称以及库存量从表中删除。 g．查询功能包括：查询某种或某些电脑配件的进货量、进货时间、出货量、出货时间。 电脑配件 电脑配件 仓 库 库 配件名称 ID 库存量 进货时间 出货时间 存入 进货量 出货量 E-R图设计 进货表 出货表 3．详细设计 （1）添加功能的核心代码及窗口： Private Sub Command1_Click() Dim str() As String Dim value() As String On Error Resume Next If Text1.Text Then With Form1.Adodc1 .RecordSource = select * from [type] .Refresh .Recordset.AddNew .Recordset.Fields(pname) = Text1.Text .Recordset.Fields(number) = 0 .Recordset.Update End With MsgBox 添加成功 Form3.Enabled = True Form3.resetlv Unload Me Else MsgBox 添加失败 End If End Sub （2）删除功能的核心代码及窗口： Private Sub Command1_Click() Dim h, l As Integer Form1.Adodc1.Refresh Form1.Adodc1.Recordset.MoveFirst While Not Form1.Adodc1.Recordset.EOF If Form1.Adodc1.Recordset(ID) = lv1.SelectedItem.Text Then With Form1.Adodc1 .Recordset.Delete adAffectCurrent .Recordset.Update End With End If Form1.Adodc1.Recordset.MoveNext Wend resetlv End Sub （3）进货功能的核心代码及窗口： Private Sub Command1_Click() Dim total As Integer Dim num As Integer num = CInt(Text1.Text) If Text1.Text = 0 Then Else Form1.Adodc1.RecordSource = select intime,num,typeid from [in] Form1.Adod