毕业设计（论文）-VB6.0天诚药业医药商品销售系统的开发.doc

毕业论文（设计）用纸佳木斯大学教务处第1页毕毕业业论论文（设文（设计计）课题名称天诚药业医药商品销售系统学院信息电子技术学院专业计算机科学与技术班级7指导教师学生姓名毕业论文（设计）用纸佳木斯大学教务处第2页佳佳木木斯斯大大学学教教务务处处摘要随着市场经济的蓬勃发展和人们对医药产品需求的迅速增加，单凭手工记帐已经很难适应工作的需要，医药作为一个关系到人们健康的特殊行业，国家对医药行业又有一些不同于其它行业的管理策略，如何尽快完善现代医药企业的信息化管理机制问题，是医药企业发展的关键所在，因此医药信息化其发展的必然趋势，本系统基于VisualBasic6.0，通过对医药日常业务的设计处理，实现了现代化的信息管理模式，其主要功能包括日常业务、库存管理、查询统计、基础信息管理、系统设置五大模块，实现多点操作的信息共享，相互之间信息传递准确、快捷、顺畅；全面自动化管理，可随时掌握药品的库存查询、盘点、价格管理、销售、退货以及供应商等情况；系统界面友好美观，操作简单易行，查询灵活方便，数据存储安全可靠；系统维护安全、方便、可靠，并且能够满足实用性、先进性的要求。形成了一个整体自动化管理模式，从软件工程的角度进行了科学而严谨的阐述。关键词关键词VisualBasic6.0；医药销售；信息管理；数据库；毕业论文（设计）用纸佳木斯大学教务处第3页AbstractWiththerunninguptomedicalproductsdemandofflourishingdevelopmentandpeopleofmarketeconomyonlyaccordingtokeepaccountsalreadyverydifficulttomeettheneedsofworkbyhandmedicineconcernhealthyspecialtradesofpeopleasonethecountrytosomemanagementtacticswhicharedifferentfromothertradesofmedicaltradehowtoperfecttheination-basedquestionsofmechanismofmanagementofmodernmedicalenterprisesassoonaspossiblemedicalkeypointthatenterprisedevelopsomedicalinationizationinexorabletrendofdevelopmentitssystemthisbecauseofVisualBasic6.0throughdealwithtomedicinedailydesignofbusinessrealizethemodernizedinationmanagementmodemainfunctionincludingdailybusinessstockcontrolitsinquireaboutstatisticsbasicinationmanagementsetupfivemajormodulesystematicallyrealizeinationsharingthatoperateabitmoreaccurateswiftsmoothinationtransmissionhaveeachotherOverallautomaticmanagementcangraspthesituationssuchasstocksaleofthemedicinesetc.atanytimeSystematicinterfacefriendshipisbeautifulitiseasytooperateitisflexibleandconvenienttoinquireaboutitissafeandreliableforthedatatostoreThesystemismaintainedsafelyconvenientlyreliablyandcanmeettherequestsofthepracticabilityadvance.onewholeautomaticmanagementmodegoonscienceintermsofsoftprojectandrigorousexposition.KeywordsVisualBasic6.0MedicalmerchandisesalesInationmanageDatabase毕业论文（设计）用纸佳木斯大学教务处第4页1绪论1.1实现目标面对医药行业的高速发展及其发展过程中出现的各种情况，药店门店销售系统在实施后应能够达到以下目标：（1）实现多点操作的信息共享，相互之间信息传递准确、快捷、顺畅。（2）全面自动化管理，可随时掌握药品的库存、销售等情况。（3）能够快速、准确地处理药品进、销、存、退、盘点、变价、折扣多种业务模式。（4）系统界面友好美观，操作简单易行，查询灵活方便，数据存储安全可靠。（5）提供助记码及支持多种结算方式。（6）系统维护安全、方便、可靠，并且能够满足实用性、先进性的要求。1.2开发背景随着我国市场经济的发展和人们对医药产品需求的迅速增加，医药行业正处于一个高速发展的时期。行业的快速发展必然导致竞争的加剧，想要在激烈的市场竞争中谋求发展，客观上要求企业必须加强内部管理，提高运营效率。而我国大部分医药企业是由原来的国有零售药店改造或医药企业职工下海创办的，虽然经营实现了专业化，但是从信息机制上还没有摆脱原有的销售模式，企业内部没有形成完善、有效的激励和约束的信息化管理机制，企业发展的动力不足，从而影响了企业的持续、稳定、快速发展。同时，我们医药经营形式正在向集团化、连锁化发展。在这一发展过程中，旧的企业管理模式已不适应新型的社会主义市场经济的要求，而新的企业管理模式正在被广泛探讨、研究之中。这其中，如何利用现代信息技术使企业拥有快速、高效的市场反映能力和高度的效率，已是医药经营企业，特别是医药连锁经营企业特别关心的问题。再者，由于医药产品种类繁多、销售模式特殊、业务量大，单凭手工记帐已很难适应工作的需求。医药作为一个关系到人们健康的特殊行业，国家对医药行业又有一些不同于其他行业的管理政策，这些都加大了管理的难度。如何尽快建立和完善现代企业的信息化管理机制问题，已成为医药企业发展的关键所在。毕业论文（设计）用纸佳木斯大学教务处第5页2需求分析2.1数据库结构需求分析长春市天诚药业有限公司位于长春市城东，在医药行业具有很大影响，公司在吉林省设有五家销售连锁店。在使用软件前，由于每天销售量大，呆帐、错帐时有发生而且常出现开“空单”现象，管理者常为进销存业务中存在的问题而头痛。为提高企业管理水平，更好地服务于广大拥护，2002年该公司决定采用计算机来管理医药的进销存业务。本系统在实施后，应能集中处理药品的进销存业务及其应收应付帐目。根据医药门店的业务量，本系统采用了小型的Access数据库，数据库名称为yyjxc。数据库yyjxc包含以下8个表：供应商基础信息表gys、库存表kc、客户基础信息表kh、密码表ma、入库表rkd、入库退单表rktd、销售表xsd、销售退单表xstd。2.2功能分析本软件通过对医药门店日常业务的设计处理，实现了现代化的医药门店管理模式。具体功能包括日常业务、库存管理、查询系统、基础信息管理、系统设置五大模块。系统主要的功能模块设计有：日常业务：入库单、销售单、入库退单、销售退单。库存管理：库存盘点、库存查询、价格管理。查询统计：入库查询、销售查询、入库退货查询、销售退货查询。基础信息管理：客户管理、供应商管理。系统设置：初期建帐、密码设置、数据备份、数据恢复。1日常业务模块主要处理日常销售，“入库单”将进入入库单模块。在入库单模块中主要实现如下功能：1）完成药品入库工作。入库采用智能化表单式录入，在商品名称栏内只需输入商品名称或简称的前几个字，系统将自动利用表格显示相关商品信息，使用方向键、选择商品，回车后该商品的信息将自动录入到表格中然后只需输入入库数量（系统自动计算商品金额），回车即可入库下一商品。2）自动生成入库票号，可利用键在列表框中选择供应商信息。系统自毕业论文（设计）用纸佳木斯大学教务处第6页动统计入库商品。选择“库存管理”菜单下的“库存查询”项，将进入库存查询模块。在库存查询模块中主要实现如下功能选择字段查询库存商品信息和删除库存商品信息。2.“库存管理”菜单下的“库存盘点”项，将进入库存盘点模块。在库存盘点模块中主要实现库存查询、库存盘点、价格管理信息。3.查询统计模块主要实现入库查询、销售查询、入库退货查询、销售退货查询的功能查询。程序启动后，选择“查询统计”菜单下的“入库查询”项，将进入入库查询模块。在入库查询模块中主要实现如下功能：1）按任意时间段、任意字段查询入库商品信息。2）删除入库商品信息。4.基础信息管理功能模块主要是实现客户管理、供应商管理，进入基础信息管理菜单下的“供应商管理”项，将进入供应商管理模块。在供应商管理模块中主要实现如下功能：1）完成供应商基本信息的录入、保存、修改、删除。2）选择任意字段、任意条件查询供应商基本信息。3）通过卡片式、列表式两种方式查看供应商基本信息。毕业论文（设计）用纸佳木斯大学教务处第7页3开发工具3.1系统开发环境介绍本系统前台使用VisualBasic6.0开发后台数据库使用Access2000。3.1.1Access2000Access2000是美国微软公司推出的桌面数据库管理系统，有性能好，速度快，工具丰富，界面友好等特点，在同类系统中，它在世界上受欢迎程度已名列榜首。不但功能更加强大使用也很容易。它与国内流行的关系数据库管理系统DBase、FoxBase，FoxPro（通常统称为XBase）等一脉相承，易学易用。众所周知，与XBase相比，Access有很多先进特性。两者区别主要在三个方面，即文件组织、编程语言和编程方法：（1）用XBase建立的系统通常包含很多不同类型的文件，表、程序、报表、查询、索引和菜单等内容都以文件形式存放在磁盘上，可以通过项目对其他类型的文件进行组织与管理。Access对数据库的组织同大型后台数据库系统非常相似，不同数据或程序元素称为对象，所有的对象都存储在一个物理文件中，而这个物理文件被称为数据库。（2）在传统的XBase中，大多采用XBase命令编程，SQL语句引用很少。Access中对表和记录等数据操作主要通过SQL语句实现，程序及事件代码的编写采用VisualBasicForApplication，简单的程序设计用宏。VB是更为通用的编程语言。（3）XBase采用面向过程的程序设计方法，Access采用面向对象的程序设计方法，很少会出现连续的长程序，此外，它具有字段级、记录级和表级数据引用完整性，数据约束功能，事务处理功能和完备的安全机制。Access数据库是一种关系式数据库，它是由一系列表组成，这些表又由一系列行和列组成，每一行是一个记录，每一列是一个字段，每个字段都有一个字段名，并且一个表中的字段不能重复。随着版本的不断升级，过去繁琐的工作现在只需简单的步骤就可以高质量地完成。Access数据库最基本的组成结构就是对象，其包括“表”、“查询”、“窗体”、“报表”、“页”“宏”和“模块”。在数据库中，“表”用来存储数据，“查询”用来查找数据，“窗体”、毕业论文（设计）用纸佳木斯大学教务处第8页“报表”和“页面”用来获取数据，而“宏”和“模块”则用来实现数据的自动操作。Access有两种创建数据库的方法：一种是使用“数据库向导”；另一种是创建一个空数据库，然后再向数据库中添加表、窗体、报表及其他对象。第二种方法最灵活，但缺点是需要分别定义每一个数据库要素。无论用户使用哪一种创建方式，在数据库创建之后都可以随时对其进行修改或扩展。3.1.2VisualBasic6.01、VisualBasic6.0的主要特点:VisualBasic是一种可视化的、面向对象和采用事件驱动方式的结构化高级程序设计语言，可用于开发Windows环境下的各类应用程序。总的来看，VB有以下特点：（1）可视化编程在用传统程序设计语言来设计程序时，都是通过编程计算来设计用户界面，必须编译后运行程序才能观察。有时，这种编程-编译-修改的操作可能要反复多次，大大影响了软件开发效率。VB提供了可视化设计工具，把Windows界面设计的复杂性“封装”起来，开发人员不必为界面设计而编写大量程序代码。从而大大提高了程序设计的效率。（2）面向对象的程序设计4.0以后的VB支持面向对象的程序设计，在一般的面向对象程序设计语言中，对象由程序代码和数据组成，是抽象的概念；而VB则是应用面向对象的程序设计方法（OOP），把程序和数据封装起来作为一个对象，并为每个对象赋予应有的属性，使对象成为实在的东西。在设计对象时，VB自动生成对象的程序代码并封装起来。每个对象以图形方式显示在界面上，都是可视的。（3）结构化程序设计VB是在Basic语言基础上发展起来的，具有高级程序设计语言的语句结构，接近于自然语言和人类的逻辑思维方式，其语句简单易懂。其编辑器支持彩色代码，可自动进行语法错误检查，同时具有功能强大且使用灵活的调试器和编码器。VB是解释型的语言，在设计VisualBasic程序的过程中，随时可以运行程序，而在整个应用程序设计好之后，可以编译生成可执行文件（.），脱离VisualBasic环境，直接在Windows环境下运行。毕业论文（设计）用纸佳木斯大学教务处第9页（3）事件驱动编程机制VsualBasic通过事件来执行对象的操作。一个对象可能会产生多个事件，每个事件都可以通过一段程序来响应。在用VB设计大型应用软件时，不必建立具有明显开始和结束的程序，而是编写若干个微小的子程序，即过程，这些过程分别面向不同的对象，由用户操作引发某个事件来驱动完成某种特定的功能，或者由事件驱动程序调用通用过程来执行指定的操作。这样可以方便编程人员，提高效率。（4）访问数据库VB系统具有很强的数据库管理功能。利用数据控件和数据库管理窗口，可以直接建立或处理MicrosoftAccess格式的数据库，并提供了强大的数据存储和检索功能。同时，VB还能直接编辑和访问其他外部数据库，如：Btrieve、DBase、FoxPro、Paradox等。VB提供开放式数据连接，即ODBC功能，可通过直接访问或建立连接的方式使用并操作后台大型网络数据库，如SQLServer、Oracle等。在应用程序中，可以使用结构化查询语言SQL数据标准，直接访问Server上的数据库。（5）动态数据交换利用动态数据交换技术，可以把一种应用程序中的数据动态的连接到另一种应用程序中，使两种完全不同的应用程序可以交换数据、进行通信，在Windows环境下为多个应用程序之间以ClientServer方式建立起一条动态数据链路。当原始数据变化时，可以自动更新链接的数据。VB提供了动态数据交换的编程技术，可以在应用程序中实现与其他Windows应用程序的动态数据交换，从而实现了不同的应用程序之间的通信。（6）对象的链接与嵌入(OLE)对象的链接与嵌入将每个应用程序都看作是一个对象，将不同的对象链接起来，再嵌入某个应用程序中，从而可以得到具有声音、影象图象、动画、文字等各种信息的集合式的文件。利用OLE技术，可以方便的建立复合式文档，这种文档由来自多个不同应用程序的对象组成，文档中的每个对象都与原来的应用程序相联系，并可执行与原应用程序完全相同的操作。（7）动态链接库(DLL)VB是一种高级程序设计语言，不具备低级程序语言的功能，访问机器硬件的操作不太容易实现。但它可以通过动态链接库技术将CC+或汇编语言编写的程序加入到应用毕业论文（设计）用纸佳木斯大学教务处第10页程序中，可以像调用内部函数一样调用用其他语言编写的函数。此外，通过动态链接库，还可以调用Windows应用程序接口(ASP)函数，实现SDK所具有的功能。2、编译器的新特性（1）ADO这是一项新的数据访问技术，具有较简单的对象模型，较好的集成了其他Microsoft和非Microsoft技术，使本地和远程数据访问、远程连接和断开记录集、用户可访问的数据约束接口以及分层记录集有一个共同的界面。（2）数据环境数据环境设计器提供了一个界面，它是建立ADO对象的设计环境，在窗体或报表中可以作为数据感知对象的数据源使用，或者DataEnvironment对象的方法和属性访问。DataEnvironment设计器支持VisualBasicUserConnectiln设计器的所有功能以及附加功能，包括拖放、分层、分组和集合。（3）ADO数据控件一个新的OledbAware数据源控件，通过它可用最少的代码建立数据库应用程序。（4）增强数据约束在以前的VB版本中，只能把一个窗体上的控件约束在一起。而在VB6.0中，可以把任何ADODB数据源约束到任何ADOOLEDB数据拥护。可以在运行时设置控件的Datasource属性，以便动态的约束数据源。（5）OLEDB支持它是一组COM接口，它提供了对存储在各种数据源中的数据进行统一访问的应用程序。这些接口支持适用于数据源的DBMS功能，可以与数据源共享数据。（6）可视数据库工具集成可视的建立和修改数据库设计和查询，包括建立SQLServer和Oracle数据库表、拖放建立视图以及自动改变列数据类型。（7）Setup向导数据增强Package和Deployment向导都支持ADO，OLEDB，PDO，ODBC和DAO。（8）数据报表允许通过拖放用任何记录集快速建立报表毕业论文（设计）用纸佳木斯大学教务处第11页（9）数据源建立数据源的的用户控件和类，可以约束到其他控件。（10）数据视图窗口可以用数据视图窗口浏览连接的所有数据库，并可查看这些数据库的表、视图、内存过程等。（11）SQL编辑器用它可把新的内存过程加到现有的SQLServer或Oracle数据库，也可用这个编辑器编写触发器。（12）分层Flexgrid控件它的更新版本，除支持Flexgrid控件的所有功能外，也可以显示ADO记录集成的层次。（13）Datarepeater控件把一个Usercontrol插入Datarepeater以建立一个数据库的定制视图。（14）传送ADO记录集可以跨越机器传诵ADO记录集，它为在多个应用程序中的不同层次之间移动数据提供了一种有效的手段。（15）数据窗体向导增强可以建立纯代码窗体，允许使用ADO代码。该向导集成了应用程序、Chart和Flexfrid向导。（16）数据对象向导自动建立约束到DataEnvironment对象或Userrcomtrol的中间层对象。3.1.3功能简介1标题栏用于显示正在开发或调试的工程名和系统的工作状态（设计态、运行态、中止态）。2菜单栏用于显示所使用的VisualBasic命令。3工具栏毕业论文（设计）用纸佳木斯大学教务处第12页在编程环境下用于快速访问常用命令。缺省情况下，启动VB后显示“标准”工具栏，附加的编辑、窗体设计和调试的工具栏可以从“视图”菜单上的“工具栏”命令中移进或移出。4窗体设计器用来设计应用程序的界面。启动VB后，窗体设计器中自动出现一个名为1的空白窗体，可以在该窗体中添加控件、图形和图片等来创建所希望的外观，窗体的外观设计好后，从菜单中选择“文件”“保存窗体”在保存对话框中给出合适的文件名（注意扩展名），并选择所需的保存位置确定。需要再设计另一个窗体时，单击工具栏上的“添加窗体”按钮即可。5控件（工具）箱由一组控件按钮组成，用于设计时在窗体中放置控件。除了缺省的工具箱布局之外，还可以通过从上下文菜单中选定“添加选项卡”并在结果选项卡中添加控件来创建自定义布局。6弹出式（上下文）菜单在要使用的对象上单击鼠标右键即可打开快捷菜单，其上会出现与当前对象相关的经常执行的操作，以加快操作速度。7工程管理器窗口用于浏览工程中所包含的窗体和模块，还可以从中查看代码、查看对象。8属性窗口是VB中一个比较复杂的窗口，其中列出了对选定窗体和控件的属性设置值。VB中正是通过改变属性来改变对象的特征，如大小、标题或颜色。9对象浏览器列出工程中有效的对象，并提供在编码中漫游的快速方法。可以使用“对象浏览器”浏览在VB中的对象和其它应用程序，查看对那些对象有效的方法和属性，并将代码过程粘贴进自己的应用程序。10窗体布局窗口Layoutwindow允许使用表示屏幕的小图象来布置应用程序中各窗体的位置。11立即、本地和监视窗口毕业论文（设计）用纸佳木斯大学教务处第13页这些附加窗口是为调试应用程序提供的，它们只在IDE之中运行应用程序时才有效。3.2开发程序的步骤一个VB程序也称为一个工程，由窗体、标准模块、自定义控件及应用所需的环境设置组成。开发步骤一般如下：1创建程序的用户界面2设置界面上各个对象的属性3编写对象响应事件的程序代码4保存工程5测试应用程序，排除错误6创建可执行程序3.2.1创建窗体1.窗体的属性(1)常用属性简介见表3-1(2)设置属性的方法1）在设计态通过属性窗口设置直接在属性窗口中选择或输入既可。2）在程序代码中改变属性值代码中的格式为：对象名.属性=属性值2.窗体的常用方法（1）Hide方法用以隐藏MDI或对象，但不能使其卸载。语法：object.Hideobject所在处代表一个对象表达式，其值为“应用于”列表中的一个对象。如果省略object，则带有焦点的窗体就认为是该object。毕业论文（设计）用纸佳木斯大学教务处第14页（2）Move方法表3-1常用属性属性名称名称说明说明Name窗体名称系统识别窗体的标识名，一个窗体名必须以一个字母开头，可包含数字和下划线，但不能包含空格和标点符号。Caption窗体标题出现在窗体标题栏中的文本内容Icon窗体图标这个属性是用户经常要使用的一种属性。当用户的应用程序在工具条上最小化或在Windows桌面上变为一个独立应用程序时，该属性决定将采用何种图标，窗体控制框里的图标也由它决定。BackColor窗体背景色可以从属性框里弹出调色板，选择所需要的颜色ForeColor窗体前景色窗体上打印文字的颜色BorderStyle边框风格这个属性决定了窗体边框的样式，共有6种属性值。改变窗体的BordrStyle属性后，窗体在屏幕上没有变化，它只在运行时才变为所要求的样子。Apearance外形这个属性用来决定控件是否采用三维效果ControlBox控件按钮控件按钮用来决定是否采用控件框的属性，仅在程序运行时才有效。Font字体用来改变该窗体上显示信息的字体、字型和字号，它控制着直接在窗体上打印的文本显示。Visible可见性该属性决定窗体是否可见默认情况下是可见的。错误地改变其值是很危险的，窗体会从眼前消失，WindowState窗体状态指定窗体在运行时的三种状态：正常、最小化、最大化。Enabled活动性默认值为True，决定窗体能否被访问。Left、Top、Height、Wid左边距、顶边距、高度、决定窗体在屏幕上的位置及窗体大小。毕业论文（设计）用纸佳木斯大学教务处第15页th宽度用以移动MDI、或控件。语法：object.Movelefttopwidthheight（3）Print方法在Immediate窗口中显示文本。语法：object.Printoutputlist（4）PrintFrom方法用以将对象的图象逐位发送给打印机。语法：object.Print（5）Refresh方法强制全部重绘一个窗体或控件。语法：object.Refresh（6）Show方法用以显示MDI或对象。语法：object.Showstyleowner（7）Cls方法清除运行时或PictureBox所生成的图形和文本。语法：object.Cls3.窗体的常用事件(1)Load事件这个事件发生在窗体被装入内存时，且发生在窗体出现在屏幕之前。窗体出现之前，VisualBasic会看一看Load事件里有没有代码，如果有，那么它先执行这些代码，再让窗体出现在屏幕上。(2)Click事件，Dblclick事件这两个事件在单击或双击窗体时发生。不过单击窗体里的控件时，窗体的Click事件并不会发生，VisualBasic会去看控件的Click事件里有没有代码。(3)Activate(活动事件)与Deactivate（非活动事件）显示多个窗体时，可以从一个窗体切换到另一个窗体。每次激活一个窗体时，发生毕业论文（设计）用纸佳木斯大学教务处第16页Activate事件，而前一个窗体发生Deactivate事件。（4）Resize事件在窗体被改变大小时会触发此事件。4.窗体的控制(1)装入或卸出窗体要装入或卸出窗体，用Load或Unload语句。装入窗体：LoadName卸出窗体：UnLoadNameName变量是要装入或卸出的窗体名。Load语句只是把窗体装入内存，并不显示出来，要显示窗体可以使用窗体的Show方法。(2)显示或隐藏窗体要显示或隐藏窗体，用Show或Hide方法。若尚未装入内存则先装入再显示。显示窗体：Name.showmode隐藏窗体：Name.hideName变量是窗体名可选变元mode为0（缺省值）时窗体为非模态，为1时窗体为模态。模态窗体完全占有应用程序控制权，不允许切换到别的应用程序，除非关闭！而非模态窗体则反之。（3）END语句END语句的功能是终止应用程序的执行，并从内存卸在所有窗体。语法是：END3.2.2控件1.常用控件见表3-23.2.3定制菜单1菜单概述Windows中的菜单一般由菜单条、菜单、菜单项、子菜单、弹出式菜单组成。2普通菜单的设计毕业论文（设计）用纸佳木斯大学教务处第17页（1）给菜单命名菜单标题和菜单命令也有Caption和Name属性，设置了这两个属性就等于创建了菜单。Name是一个抽象名称，Caption是屏幕上可见的，可在Caption里加入“&”来设置热键。表3-2常用控件TextBox文本框Timer计时器HscrollBar水平滚动条ListBox列表框Pointer指针VScrollBar垂直滚动条CheckBox复选框Label标签DirListBox文件夹列表框PictureBox图片框Line线条DriveListBox驱动器列表框ComboBox组合框Shape图形FileListBox文件列表框OptionButton选项按钮Image图象Data数据控件CommandButton命令按钮Frame框架OLE控件（2）增加和删除菜单在MenuEditor中部有三个命令钮分别是下一个、插入、删除。插入可用来增加新的菜单。在这三个键下面的Caption列表框里选中菜单项（这时它的底色就变成深蓝色），单击插入键，VisualBasic将上一个增亮菜单下推并增亮一空行，就可以输入新菜单名和标题了。删除键可用来删掉菜单。选中要删掉的菜单，单击Delete键就可以删掉它了。（3）移动菜单标题有四种情况：向上移动，向下移动，向左缩排，向右缩排，选中某一菜单标题，安上下箭头，则这个菜单将上下移动到你喜欢的位置上，这也决定了它在界面中的位置。如果按左右箭头，情况则有所不同。由于菜单是分级的，所以，如果它没有缩排，则它是一个菜单标题；如果它缩排一次，那么它将变成一个菜单命令；如果缩排两次，那么它将成为一个子菜单命令。VB里可以总共设计四层子菜单。（4）设置分离条分离条是指在菜单中将命令分组的线，VB将分离条也看成一个菜单项，它也需要Caption和Name属性，而且也有其它属性，分离条与菜单项的区别是分离条的Caption属性必须是连字号即减号。也就是，当设置了一个Caption属性为“-”的菜单项时，毕业论文（设计）用纸佳木斯大学教务处第18页实际上就设置了一个分离条，分离条的名字可以是barFile1之类，以表明分离条的位置。（5）菜单的各种简单属性在菜单编辑器里有许多确认框和一些文本框及一个下拉式的列表框，这些决定了菜单的各种属性。（6）为每个菜单项编写事件过程代码3.2.4VB编码规则1.语言元素VB的语言基础是BASIC语言，VB程序的语言元素主要由：关键字（如：Dim、Print、Cls）函数（如：Sin（）、Cos（）Sqr（）表达式（如：Abs(-23.5)+45203）语句（如：X=X+5、IFELSEENDIF）等组成。2.VB代码书写规则（1）程序中不区分字母的大小写，Ab与AB等效；（2）系统对用户程序代码进行自动转换：1）对于VB中的关键字，首字母被转换成大写，其余转换成小写2）若关键字由多个英文单词组成，则将每个单词的首字母转换成大写3）对于用户定义的变量、过程名，以第一次定义的为准，以后输入的自动转换成首次定义的形式3.语句书写规则（1）在同一行上可以书写多行语句，语句间用冒号(：)分隔（2）单行语句可以分多行书写，在本行后加续行符：空格和下划线_（3）一行允许多达255个字符4.程序的注释方式（1）整行注释一般以Rem开头，也可以用撇号；（2）用撇号引导的注释，既可以是整行的，也可以直接放在语句的后面，最方便；毕业论文（设计）用纸佳木斯大学教务处第19页（3）可以利用“编辑”工具栏的“设置注释块”、“解除注释块”来将设置多行注释。5.保留行号和标号VB源程序接受行号与标号，但不是必须的（早期的BASIC语言中必须用行号）。标号是以字母开始以冒号结束的字符串，一般用在GOTO语句（现在很少用）中。毕业论文（设计）用纸佳木斯大学教务处第20页4系统功能总体设计4.1系统设计4.1.1数据库设计根据医药门店的业务量，本系统采用了小型的Access数据库，数据库名称为yyjxc。数据库yyjxc包含以下8个表：供应商基础信息表gys、库存表kc、客户基础信息表kh、密码表ma、入库表rkd、入库退单表rktd、销售表xsd、销售退单表xstd。下面分别介绍以上各表的结构。(1)供应商基础信息表gys供应商基础信息表gys用来保存供应商基础信息，。结构见表4-14-1表gys的结构字段名称数据类型字段大小供应商编号文本10供应商全称文本100简称文本20地址文本100所属地区文本50邮政编码文本50电话文本30传真文本20联系人文本30联系人电话文本30开户银行文本100银行帐号文本50纳税人登记文本50毕业论文（设计）用纸佳木斯大学教务处第21页预付金额文本20实际金额文本20尚余欠款文本20网址邮箱文本20(2)库存表kc库存表kc用来保存库存商品信息，结构见表4-2所示。表4-2表kc的结构字段名称数据类型字段大小商品名称文本255简称文本255批号文本100产地文本255规格文本255包装文本255单位文本255进价数字双精度型库存数字双精度型库存金额数字双精度型(3)客户基础信息表kh客户基础信息表kh用来保存客户基础信息，结构见表4-3所示。表4-3表kh的结构字段名称数据类型字段大小客户编号文本10客户全城文本100简称文本20地址文本100毕业论文（设计）用纸佳木斯大学教务处第22页所属地区文本50邮政编码文本50电话文本30传真文本20联系人文本30联系人电话文本30开户银行文本100银行帐号文本50纳税人登记文本50预付金额文本20实际金额文本20尚余欠款文本20网址邮箱文本20日期日期时间(4)密码表ma密码表ma用来保存操作员及操作员密码，结构见表4-4所示。表4-4表ma的结构字段名称数据类型字段大小操作员文本10密码文本6(5)入库表rkd入库表rkd用来保存商品入库的详细信息，结构见表4-5所示。(6)入库退单表rktd入库退单表rktd用来保存商品入库退货的详细信息，结构见表4-6所示。毕业论文（设计）用纸佳木斯大学教务处第23页表4-5表rkd的结构字段名称数据类型字段大小商品名称文本100简称文本20批号文本20产地文本40规格文本50包装文本50单位文本10数量数字双精度型进价货币金额货币备注文本100供应商文本50日期日期时间经手人文本10票号文本30表4-6表rktd的结构字段名称数据类型字段大小商品名称文本100批号文本20产地文本40规格文本50包装文本50单位文本10数量数字双精度型进价货币毕业论文（设计）用纸佳木斯大学教务处第24页金额货币备注文本100供应商文本50日期日期时间经手人文本10票号文本30(7)销售表xsd销售表用来保存商品销售的详细信息，结构见表4-7所示。表4-7表xsd的结构字段名称数据类型字段大小商品名称文本100批号文本20产地文本40规格文本50包装文本50单位文本10数量数字双精度型单价货币金额货币备注文本100客户文本50日期日期时间经手人文本10票号文本30(8)销售退单表xstd销售退单表xstd用来保存商品销售退货的详细信息，结构见表4-8所示。毕业论文（设计）用纸佳木斯大学教务处第25页表4-8表xstd的结构字段名称数据类型字段大小商品名称文本100批号文本20产地文本40规格文本50包装文本50单位文本10数量数字双精度型单价货币金额货币备注文本100客户文本50日期日期时间经手人文本10票号文本304.2系统功能模块医药销售系统结构如图4-1所示4.3销售流程图医药商品销售系统流程图如图4-2所示毕业论文（设计）用纸佳木斯大学教务处第26页图4-1药销售系统结构图4-2医药商品销售系统流程图供应商管理客户管理库存盘点价格管理库存查询入库查询销售查询入库退货查询销售退货初期建帐密码设置数据备份数据恢复入库单销售单入库退单销售退单医药销售系统库存管理日常业务查询系统基础信息系统设置库存盘点库存信息客户退货销售信息销售作业入库信息供应商入库作业退货返厂销售查询客户入库查询库存查询价格管理毕业论文（设计）用纸佳木斯大学教务处第27页5详细设计5.1程序界面介绍5.1.1主程序界面介绍主程序界面启动后，在登陆界面验证操作员密码后，将进入主程序界面。主程序界面主要实现如下功能：（1）选择主界面的菜单或工具，调用相应程序，进行相应操作。（2）显示开发者信息、系统日期和时间。主程序界面如图5-1所示。图5-1主程序界面5.1.2主程序界面实现过程(1)新建一个标准工程，命名为“医药进销存管理系统”，在此工程中会自动创建一个毕业论文（设计）用纸佳木斯大学教务处第28页新窗体，将该窗体命名为frm_main.(2)单击“工程”菜单下的“部件”选项，在弹出的列表中，选定“MicrosoftWindowsCommonControl6.0”选项，然后单击“确定”按狃，ImageList控件、ToolBar控件和StatusBar控件被添加到工具箱中。(3)在窗体中添加一个Timer控件、一个ImageList控件、一个ToolBar控件、一个StatusBar控件。用鼠标右键单击StatusBar控件，在弹出菜单中选择“属性”。在属性页中，单击“窗格”选项卡，设置3个窗格。设置索引为1的窗格的样式为0-sbrtest并输入文本“佳木斯大学信息电子技术学院孙海伦”；设置索引为2的窗格的式样为6-sbrDate；设置索引为3的式样为5-sbrTime。单击“工具”的“菜单编辑器”，在菜单编辑器中设置程序的菜单。为提高代码的效率，程序中可以使用公用函数来代替一些在多个程序中频繁使用的代码。如下面的entercell、moveright、moveleft、movereturn等函数。在入库、销售等模块中，均使用了MSFlexGrid1控件（以下简称mf1）完成表单式数据录入。但mf1控件为只读，要想向mf1控件输入信息，需要借助其他控件，本例借助Text1控件。下面的代码主要将Text1控件。下面的代码主要将Text1控件移到表格中光标的位置，然后根据光标处单元格的大小设置Text1控件的大小，并将该单元格内容赋值给Text1控件。5.2系统登陆模式设计5.2.1实现目标程序启动后，首先进入系统登陆界面验证操作员密码。系统登陆模块主要实现如下功能：（1）可选择操作员，支持鼠标和键盘操作。（2）操作员和密码验证成功后，进入主界面。（3）操作员错误或密码错误提醒并返回错误点。（4）输入三次错误的密码，系统自动退出。系统登录界面如图5-2所示。毕业论文（设计）用纸佳木斯大学教务处第29页图5-2系统登录界面5.2.2实现过程(1)“医院进销存管理系统”工程中，添加一个新窗体，命名为main_main。(2)单击“工程”菜单下的“部件”选项，在弹出的列表中，选定“MicrosoftDataBoundListControl6.0”选项，然后单击“确定”按钮，DBCombo控件将被添加到工具箱中。(3)在窗体中添加2个Data控件、1个DBComb控件、3个Text控件、2个Command控件。主要控件对象的属性如表5-1所示。表5-1主要控件对象的属性列表对象属性值功能Data1DatabaseName19RecordSourceYyjxc.mdbma提供数据查询Data2DatabaseNameRecordSourceYyjxc.mdbma提供数据绑定DBCombol名称RowsourceListfieldboundcolumnText1Data2操作员操作员提供数据选择Text2MaxLengthPassWordChar6输入密码毕业论文（设计）用纸佳木斯大学教务处第30页5.3日常业务设计5.3.1入库单模块设计(1)实现目标程序启动后，选择“日常业务”菜单下的“入库单”项，将进入入库单模块。在入库单模块中主要实现如下功能：1）完成药品入库工作。入库采用智能化表单式录入，在商品名称栏内只需输入商品名称或简称的前几个字，系统将自动利用表格显示相关商品信息，使用方向键、选择商品，回车后该商品的信息将自动录入到表格中然后只需输入入库数量（系统自动计算商品金额），回车即可入库下一商品。2）自动生成入库票号，可利用键在列表框中选择供应商信息。系统自动统计入库商品(2)实现过程1）在“医药商品销售系统”工程中，添加一个新窗体，命名为main_rcyw_rk。2）单击“工程”菜单下的“部件”选项，在弹出的列表中，选定“MicrosoftLiexGridControl6.0(sp3)”、“MicrosoftDataBoundGridControl”、“MicrosoftDataBoundListControl6.0”选项，然后单击“确定”按钮，MSFlexGrid控件、DBGrid控件、DBList控件将被添加到工具箱中。3）在窗体中添加3个Data控件、1个MSFlexGrid控件、1个DBGrid控件、1个DBList控件、8个Text孔、4个Command控件等。在商品输入表单（mf1）的“商品名称”栏内输入商品名称或简称，将显示相关商品列表信息（grid1），选择入库商品后回车确认，将把该商品信息添加到商品入库表单中。在“商品名称”栏输入商品名称或简称，系统将自动检索相关商品信息。如果检索到商品，将显示商品列表供选择。选择商品后，在“数量”栏输入商品数量，将计算机该商品合计金额，同时统计入库品种数、入库数量、总金额。单击“登记”按钮，将自动生成入库票号。入库票号由系统日期、字母“rkd”、四位数字编码组成。首先查询rkd表中的信息，假如记录大于零，将记录移到最后一条，入库票号等于系统日期、字母“rkd”、四位数字编码加1的组合；否则入库票号等于系统日期、字母“rkd”、“0001”的毕业论文（设计）用纸佳木斯大学教务处第31页组合。单击“保存”按钮，将首先检测是否录入了商品信息，如果录入了商品信息，将利用循环语句将商品信息保存到入库单rkd表中，并更新相应的库存商品信息。保存成功后，清空入库数据，焦点移到“添加”按钮上。图5-3入库单界面主要控制对象的属性如表5-2所示。表5-2主要控件对象的属性列表对象属性值功能Data1DatabaseNameRecordSourceYyjxc.mdbkc提供数据绑定Data2DatabaseNameRecordSourceYyjxc.mdbgys提供数据绑定DBgrid1名称DataSourcegrid1Data1提供数据选择DBList1RowsourceListfieldboundcolumnData2提供商全称提供商全称提供数据选择MSFlexGrid1名称Mf1批量录入数据毕业论文（设计）用纸佳木斯大学教务处第32页3）库数量、入库金额。入库单界面如图5-3所示。5.3.2销售单模块设计(1)实现目标程序启动后，选择“日常业务”菜单下的“销售单”项，将进入销售单模块。在销售单模块中主要实现如下功能：1）完成商品销售的功能。2）自动生成销售票号、销售日期；统计销售品种、销售数量、销售金额。3）在“商品名称”栏输入商品名称或简称或按键，既可智能检索符合条件销售单界面如图5-4所示。图5-4销售单界面(2)实现过程1）在“医药商品销售系统”工程中，添加一个新窗体，命名为main_rcyw_xs。2）在窗体中添加3个Data控件、1个MSFlexGrid控件、1个DBGrid控件、1个DBList控件、8个Text控件、4个Command控件等。在商品输入表单（mf1）的“商品名称”栏内输入商品名称或简称，将显示相关商品的列表信息，选择销售的商品后回车确认，将把该商品信息添加到商品输入表单中。在“商品名称”栏输入毕业论文（设计）用纸佳木斯大学教务处第33页商品名称或简称，系统将自动检索相关商品信息，如果检索到商品，将显示商品列表供用户选择。选择商品后，在“数量”栏输入商品数量，将计算该商品合计金额，同时统计销售品种数、销售数量、总金额。单击“登记”按钮，将自动生成销售票号。销售票号由系统日期、字母“xsd”、四位数字表、编码组成。销售票号等于系统日期、字母“xsd”、四位数字编码加1的组合。单击“保存”按钮，将首先检测是否录入了商品信息，如果录入了商品信息，将利用循环语句将商品信息保存到销售单xsd表中，并更新库存表中的库存数量和库存金额。保存成功后，清空销售数据，焦点移到“添加”按钮上。只要控件对象的属性如表5-3所示。表5-3主要控件对象的属性列表对象属性值功能Data1DatabaseNameRecordSourceYyjxc.mdbkc提供数据绑定Data2DatabaseNameRecordSourceYyjxc.mdbkh提供数据绑定DBgrid1名称DataSourcegrid1Data1提供数据选择DBList1RowsourceListfieldboundcolumnData2客户全称客户全称提供数据选择MSFlexGrid1名称Mf1批量录入数据5.3.3销售退单模块设计(1)实现目标程序启动后，选择“日常业务”菜单下的“销售退单”项，将进入销售退单模块。在销售退单模块中主要实现如下功能：1）完成商品的销售退货功能。2）自动生成销售退单票号、销售退单日期；统计退货品种、退货数量、退货金毕业论文（设计）用纸佳木斯大学教务处第34页额。3）在“商品名称”栏输入商品名称或简称或按键，既可智能检索符合条件的商品信息，已供用户选择。销售退单界面如图5-5所示。图5-5销售退单界面(2)实现过程1）“医药