电脑库存标准管理系统数据库专业课程设计项目说明指导书.docVIP

数据库课程设计 说 明 书 ? 学 院、系： 软件学院 专 业： 软件工程 学 生 姓 名： 赵霸 学 号： 设 计 题 目： 电脑配件库存管理系统 起 迄 日 期: 5月30日~ 6月17日 指 导 教 师: 李华玲 ? ? ? 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.Adodc1.Refresh With Form1.Adodc1.Recordset .AddNew .Fields(intime) = Date .Fields(num) =