1 / 28
文档名称:

汽车零部件设计 汽车零部件查询系统设计.doc

格式:doc   大小:53KB   页数:28页
下载后只包含 1 个 DOC 格式的文档,没有任何的图纸或源代码,查看文件列表

如果您已付费下载过本站文档,您可以点这里二次下载

分享

预览

汽车零部件设计 汽车零部件查询系统设计.doc

上传人:1294838662 2021/4/18 文件大小:53 KB

下载得到文件列表

汽车零部件设计 汽车零部件查询系统设计.doc

文档介绍

文档介绍:汽车零部件设计_汽车零部件查询系统设计
交通与汽车工程学院 课程设计说明书
课 程 名 称: 计算机应用基础课程设计 课 程 代 码: 6011339 题 目: 汽车零部件查询系统设计 年级/专业/班: 学 生 姓 名: 学 号: 开 始 时 间: 2012 年 4 月 1 日 完 成 时 间: 2012 年 4 月 12 日 课程设计成绩:
指导教师签名: 年 月 日
目 录
摘要 …………………………………………………………………………………2 1 引言 …………………………………………………………………………………3 2 本程序主要功能 …………………………………………………………………3 3 本程序结构设计 …………………………………………………………………4 4 程序设计界面 …………………………………………………………………4 5 程序代码 ……………………………………………………………………10 结论………………………………………………………………………………………30 致谢………………………………………………………………………………………31 参考文献…………………………………………………………………………………32
摘 要
随着计算机的普及程序的应用也越来越受到重视,本次课程设计使用 Visual Basic 作为开发工具,进行了汽车零部件查询系统设计的程序设计,本系统主要完成对汽车零部件的管理,包括库存的添加、删除等。系统可以完成对各类的追加、浏览、修改、查询和计算等功能。
汽车零部件查询系统广泛应用于4S 店汽车零部件的库存与销售管理工作中,要求其具有实用性强、使用方便、效率高和安全可靠等特点。本管理系统正是围绕以上几个方面进行开发的,在开发过程中充分考虑到本系统的应用特点,并进行了大量的检验,证明其的确达到了设计的要求,是一个已具备了实际应用能力的软件。
关键词: 汽车零部件 销售 库存 销售
1 引 言
问题的提出
为适合现代企业发展的需要, 汽车零部件管理已经成为困扰销售的一个难题, 由于其费时和繁琐性,企业迫切需要一种专门为零部件管理而服务的工具。为此, 简单的汽车零部件管理系统为此而制造出来。本简单程序是为汽车零部件管理而设计的, 内容简单,使用方便。程序稍加变更可以适合对资源分配方面的杂事加以处理。
作为当代大学生,熟练的操作计算机是一种必备的素质。本次设计会让我们更加熟悉VB 编程,把以前学过的一些东西又重新复****了一遍,并与实际结合起来,对我们能力的提升有了很大的帮助,还能促使我们在以后的实际应用中更好的应用VB 编程来设计一些数据库管理系统。
2 本程序主要功能
汽车零部件管理系统是典型的信息管理系统,其开发主要包括后台数据库的建立和维护以及前端应用程序的开发两个方面。对于前者要求建立起数据一致性和完整性强、数据安全性好的库。而对于后者则要求应用程序功能完备, 易使用等特点.
本系统主要完成对汽车零部件信息的管理,包括数据库中零件的入库和出库等。系统可以完成对各类信息的浏览、修改、查询对零件销售价格进行计算等功能。系统的核心是数据库中零件的余量,每一个零件的修改都将联动的影响其它的各项信息,当完成对数据的操作时系统会自动地完成数据库的修改。查询功能也是系统的核心之一,在系统中即有单条件查询和多条件查
询,也有精确查询和模糊查询,系统不仅有静态的条件查询,也有动态生成的条件查询,其目的都是为了方便用户使用。本系统有完整的报价查询,库存剩余量,零件名称,销售型号,匹配车型查询等等。
3 本程序结构设计
汽车零部件管理系统是典型的信息管理系统,其开发主要包括后台数据
库的建立和维护以及前端应用程序的开发两个方面。对于前者要求建立起数据一致性和完整性强、数据安全性好的库。而对于后者则要求应用程序功能完备, 易使用等特点.
其中利用函数调用,查询功能,库存检索等完成此次设计。
4 程序设计界面 Form1:
Form2:
Form3:
Form4:
Form5:
Form6:
Form7:
Form8:
Form9:
Form10:
Form11:
Form12:
5 程序代码
(1)Form1:

Unload Me
End Sub
Private Sub Form_KeyPress(KeyAscii As Integer)

Unload Me
End Sub
Private Sub Image1_Click()
End Sub
(2)Form2:
Do While Not EOF(1)
Get #1, , pers
If Trim(T