公司员工工资管理系统毕业论文

摘要公司员工工资管理是公司管理的一项重要内容。随着公司员工数量增加，企业的工资管理工作也变得越来越复杂。工资管理既涉及到企业的人事管理，同时也是企业财务管理的重要组成部分。工资管理需要和人事管理相联系，同时连接工时考勤和医疗保险等等，来生成企业每个职工的基本工资、津贴、医疗保险、保险费、实际发放工资等。资金是企业生存的主要元素，资金的流动影响到企业的整体运作，企业员工的工资是企业资金管理的一个重要的组成部分。早期的工资统计和发放都是使用人工方式处理纸质材料，不仅花费财务人员大量的时间且不易保存和查询，往往由于个人的因素抄写不慎或计算疏忽，出现工资发放错误的现象。基于以上原因，公司员工工资管理系统使用电脑安全保存、快速计算、全面统计，实现工资管理的系统化、规范化、自动化。公司员工工资管理系统是典型的信息管理系统（MIS），前台程序开发工具采用微软的VB6，后台数据库采用ACCESS数据库。VB6是一种面向对象的开发工具，具有组件丰富、语言简单、功能强大的优点。ACCESS数据库具有与VB6无缝连接、操作简单、易于使用的优点。运行结果证明，本公司员工工资管理系统可以极大地提高工作效率，节省了人力和物力，最终满足企业财务管理、员工工资发放的需要，同时也成为现代化企业管理的标志。关键词工资管理信息管理数据查询数据库目录摘要I第1章绪论111数据库管理系统112公司员工工资管理系统1第2章企业工资管理系统设计分析2第3章开发环境及实现技术331开发环境3311本系统开发需求的软件环境3312本系统开发需求的硬件环境332开发工具4321开发工具简介4322VISUALBASIC特点5323VISUALBASIC系统在程序应用中的常用名词8323数据库介绍9第4章系统设计1241系统设计分析12411业务流程图12412数据流程图13413功能结构图1442系统数据库设计1543系统的设计与实现22431用户登录窗体22432添加用户窗体27433删除用户窗体31434系统的主界面的设计与实现34435员工基本信息窗体37436报表打印窗体49437工资发放信息查询窗体51437其它窗体55结论56参考文献57致谢58第1章绪论11数据库管理系统数据库管理系统（DBMS）是指数据库系统中管理数据的软件系统。DBMS是数据库系统的核心组成部分。对数据库的一切操作，包括定义、更新及各种控制,都是通过DBMS进行的。DBMS总是基于某种数据模型，可以把DBMS看成是某种数据模型在计算机系统上的具体实现。根据数据模型的不同，DBMS可以分成层次型、网状型、关系型、面向对象型等。MSACCESS2000就是一种关系型数据库管理系统。关系模型主要是用二维表格结构表达实体集，用外键表示实体间联系。关系模型是由若干个关系模式组成的集合。关系模式相当于前面提到的记录类型，每个关系实际上是一张二维表格。关系模型和层次、网状模型的最大判别是用关键码而不是用指针导航数据，表格简单用户易懂，编程时并不涉及存储结构，访问技术等细节，已得到了比较广泛的应用。12公司员工工资管理系统公司工资管理是一项琐碎、复杂而又十分细致的工作，一般不允许发生差错。最初的工资统计和发放都是使用人工方式处理，工作量大的时候，出现错误的机率也随之升高，不仅花费财务人员大量的时间，而且往往由于抄写不慎，或者由于计算的疏忽，出现工资发放错误的现象。同时工资的发放具有较强的时间限制，必须严格按照单位规定的时间完成计算和发放工作。正是企业工资管理的这种重复性、规律性、时间性，使得企业工资管理计算机化成为可能。企业工资管理系统就是使用电脑代替大量的人工统计和计算，完成众多企业工资信息的处理，同时使用电脑还可以安全地、完整地保存大量的企业工资记录。第2章企业工资管理系统设计分析需求分析的过程可以说是一个对具体问题的反复理解和抽象的过程。理解就是对现实问题的理解，要弄清楚究竟需要解决什么问题。抽象就是除去问题的表面，提取问题的本质，建立问题的逻辑模型，以便于以后阶段的系统的设计实现。需求分析阶段是软件产品生存命期中的一个重要阶段，其根本任务是确定用户对软件系统的需求。所谓需求是指用户对软件的功能和性能的要求，就是用户希望软件能什么事情，完成什么样的功能，达到什么性能。通常需求分为两种类型一种是功能性需求，一种是非功能性需求，这一点也需要有一种清楚的认识。功能性需求是指需要计算机系统解决的问题，也就是对数据的处理要求，这是一类最主要的需求。非功能性需求是指实际使用环境所要求的需求，往往是一些限制要求，例如性能要求，可靠性要求，安全保密要求，等等。软件需求一般包含三个层次业务需求、用户需求和功能需求，还包括非功能需求。业务需求反映了组织机构或客户对系统、产品高层次的目标要求，它们在项目视图与范围文档中予以说明。用户需求描述了用户使用产品必须要完成的任务和具备的功能，这在使用实例文档或方案脚本说明中予以说明。功能需求定义了开发人员必须实现的软件功能，使得用户能完成他们的任务，从而满足其业务需求。第3章开发环境及实现技术31开发环境衡量是否具备使用新系统所需的条件，一般可从软硬件的性能要求、环境条件、技术人员水平和数量等方面去考虑和分析，其中开发人员的技术水平应首先考虑近期内可以培养和发展的技术人员。近些年计算机技术飞速发展，硬件条件可以说是日新月异，其发展速度已令人惊讶的成倍比例发展。软件方面同样进展神速，无论任何系统都难不到如今的计算机。本系统就是由VB与ACCESS数据库相结合而设计出来的。以下为本系统开发需求。311本系统开发需求的软件环境（1）WINDOWS2000操作系统。（2）VB60（3）ACCESS数据库312本系统开发需求的硬件环境CPU为400MHZ以上；硬盘数据量最小配置为20G；计算机内存要求为128M以上；对于公司员工工资管理信息系统应着重分析其经济效益，整合现有资源,提高工作效率。经济上的可行性首先要估算新系统的开发费用和运行、维护费用，再与所估计的将获得的效益进行比较，看是否有利。开发、运行和维护费用主要包括购买和安装设备的费用计算机硬件、系统软件、机房、电源、空调等；软件开发费用若由本单位的技术人员开发，则该项费用可以计入下面的人员费用一项；人员费用系统开发人员、操作人员和维护人员的工资、培训费用等；消耗品费用系统开发所用材料、系统正常运行所用消耗品，例如水、电费，打印纸、可移动磁盘等开支；其它费用系统的效益可以从经济效益和社会效益两方面考虑。本系统是由内部人员开发，开发费用较低。系统维护费用也相对较低。所以本系统在经济上是可行的。32开发工具321开发工具简介现在，市场上可以选购的应用开发产品很多，流行的也有数十种。目前在我国市场上最为流行、使用最多、最为先进的可用作企业级开发工具的产品有MICROSOFT公司的VISUALBASICMICROSOFT公司的VISUALCBORLAND公司的DELPHIPOWERSOFT公司的POWERBULIDERJAVA等等在目前市场上这些众多的程序开发工具中，有些强调编程语言的弹性与执行效率；有些则偏重于可视化程序开发工具所带来的便利性与效率的得高，各有各的优点和特色，也满足了不同用户的需求。然而，语言的弹性和工具的便利性是密不可分的，只有便利的工具，却没有弹性的语言作支持，许多特殊化的处理动作必需要耗费数倍的工夫来处理，使得原来所标榜的效率提高的优点失去了作用；相反，如果只强调程语言的弹性，却没有便利的工具作配合，会使一些即使非常简单的界面处理动作，也会严重地浪费程序设计师的宝贵时间。作为数据库系统的开发，VISUALBASIC是一个非常理想选择。数据库是MIS中的重要支持技术，在MIS开发过程中，如何选择数据库管理是一个重要的问题，目前，数据库产品较多，每种产品都具有各自的特点和适用范围，因此，在选择数据库时，应考虑数据库应用的特点及适用范围，本系统选用的数据库语言VISUALBASIC语言，该开发工具具有很多长处VISUALBASIC是一种可视化的、面对对象和条用事件驱动方式的结构化高级程序设计，可用于开发WINDOWS环境下的种类应用程序。它简单易学、效率高，且功能强大，可以与WINDOWS的专业开发工具SDK相媲美，而且程序开发人员不必具有C/C编程基础。在VISUALBASIC环境下，利用事件驱动的编程机制、新颖易用的可视化设计工具，使用WINDOWS内部的应用程序接口API函数，以及动态链接库DLL、动态数据交换DDE、对象的链接与嵌入OLE、开放式数据访问ODBC等技术，可以高效、快速地开发出WINDOWS环境下功能强大、图形界面丰富的应用软件系统。322VISUALBASIC特点1、可视化编程用传统程序设计语言设计程序时，都是通过编写程序代码来设计用户界面，在设计过程中看不到界面的实际显示效果，必须编译后运行程序才能观察。如果对界面的效果不满意，还要回到程序中修改。有时候，这种编程编译修改的操作可能要反复多次，大大影响了软件开发效率。VISUALBASIC提供了可视化设计工具，把WINDOWS界面设计的复杂性“封装”起来，开发人员不必为界面设计而编写大量程序代码。只需要按设计要求的屏幕布局，用系统提供的工具，在屏幕上画出各种“部件”，即图形对象，并设置这些图形对象的属性。VISUALBASIC自动产生界面设计代码，程序设计人员只需要编写实现程序功能的那部分代码，从而可以大大提高程序设计的效率。2、面向对象的程序设计40版以后的VISUALBASIC支持面向对象的程序设计，但它与一般的面向对象的程序设计语言C不完全相同。在一般的面向对象程序设计语言中，对象由程序代码和数据组成，是抽象的概念；而VISUALBASIC则是应用面向对象的程序设计方法OOP，把程序和数据封装起来作为一个对象，并为每个对象赋予应有的属性，使对象成为实在的东西。在设计对象时，不必编写建立和描述每个对象的程序代码，而是用工具画在界面上，VISUALBASIC自动生成对象的程序代码并封装起来。每个对象以图形方式显示在界面上，都是可视的。3、结构化程序设计语言VISUALBASIC是在BASIC语言的基础上发展起来的，具有高级程序设计语言的语句结构，接近于自然语言和人类的逻辑思维方式。VISUALBASIC语句简单易懂，其编辑器支持彩色代码，可自动进行语法错误检查，同时具有功能强大且使用灵活的调试器和编译器。VISUALBASIC是解释型语言，在输入代码的同时，解释系统将高级语言分解翻译成计算机可以识别的机器指令，并判断每个语句的语法错误。在设计VISUALBASIC程序的过程中，随时可以运行程序，而在整个程序设计好之后，可以编译生成可执行文件EXE，脱离VISUALBASIC环境，直接在WINDOWS环境下运行。4、事件驱动编程机制VISUALBASIC通过事件来执行对象的操作。一个对象可能会产生多个事件，每个事件都可以通过一段程序来响应。例如，命令按钮是一个对象，当用户单击该按钮时，将产生一个“单击“CLICK事件，而在产生该事件时将执行一段程序，用来实现指定的操作。在用VISUALBASIC设计大型应用软件时，不必建立具有明显开始和结束的程序，而是编写若干个微小的子程序，即过程。这些过程分别面向不同的对象，由用户操作引发某个事件来驱动完成某种特定的功能，或者由事件驱动程序调用通用过程来执行指定的操作，这样可以方便编程人员，提高效率。5、访问数据库VISUALBASIC具有强大的数据库管理功能，利用数据控件和数据库管理窗口，可以直接建立或处理MICROSOFTACCESS格式的数据库，并提供了强大的数据存储和检索功能。同时，VISUALBASIC还能直接编辑和访问其他外部数据库，如DBASE，FOXPRO，PARADOX等，这些数据库格式都可以用VISUALBASIC编辑和处理。VISUALBASIC提供开放式数据连接，即ODBC功能，可通过直接访问或建立连接的方式使用并操作后台大型网络数据库，如SQLSERVER，ORACLE等。在应用程序中，可以使用结构化查询语言SQL数据标准，直接访问服务器上的数据库，并提供了简单的面向对象的库操作指令和多用户数据库访问的加锁机制和网络数据库的SQL的编程技术，为单机上运行的数据库提供了SQL网络接口，以便在分布式环境中快速而有效地实现客户/服务器CLIENT/SERVER方案。6、动态数据交换DDE利用动态数据交换DYNAMICDATAEXCHANGE技术，可以把一种应用程序中的数据动态地链接到另一种应用程序中，使两种完全不同的应用程序建立起一条动态数据链路。当原始数据变化时，可以自动更新链接的数据。VISUALBASIC提供了动态数据交换的编程技术，可以在应用程序中与其他WINDOWS应用程序建立动态数据交换，在不同的应用程序之间进行通信。7、对象的链接与嵌入OLE对象的链接与嵌入OLE将每个应用程序都看做是一个对象OBJECT，将不同的对象链接LINK起来，再嵌入EMBED某个应用程序中，从而可以得到具有声音、影像、图像、动画、文字等各种信息的集合式的文件。OLE技术是MICROSOFT公司对象技术的战略，它把多个应用程序合为一体，将每个应用程序看做是一个对象进行链接和嵌入，是一种应用程序一体化的技术。利用OLE技术，可以方便地建立复合式文档COMPOUNDDOCUMENT，这种文档由来自多个不同应用程序的对象组成，文档中的每个对象都与原来的应用程序相联系，并可执行与原来应用程序完全相同的操作。8、动态链接库DLLVISUALBASIC是一种高级程序设计语言，不具备低级语言的功能，对访问机器硬件的操作不太容易实现。但它可以通过动态链接库技术将C/C或汇编语言编写的程序加入到VISUALBASIC应用程序中，可以像调用内部函数一样调用其他语言编写的函数。此外，通过动态链接库，还可以调用WINDOWS应用程序接口API函数，实现SDK所具有的功能。微软公司的VISUALBASIC60是WINDOWS应用程序开发工具，使目前最为广泛的、易学易用的面向对象的开发工具。VISUALBASIC提供了大量的控件，这些控件可用于设计界面和实现各种功能，减少了编程人员的工作量，也简化了界面设计过程，从而有效的提高了应用程序的运行效率和可靠性。故而，实现本系统VB是一个相对较好的选择。323VISUALBASIC系统在程序应用中的常用名词VISUALBASIC系统除了一般高级语言所具有的一些名词术语外，还有几个系统常用的名词。其基本含义如下1视窗（FORM）视窗是进行人机交互的界面或接口，也叫窗体。VB系统的人机交互界面或接口，无论是在设计时或是在运行时，都是WINDOWS系统的标准视窗。2对象OBJECT对象是VB系统内部提供给设计者可以直接使用的处理输出的控制工具。本程序所应用到的对象类型有标签框LABELBOX，文本框TEXTBOX，命令按扭COMMANDBUTTON，网格DATAGRID，ADO控件ADODC1等。当把这些工具放置到用户界面对应的窗体上时，被称为对象或控件。用户可以通过设置对象的“属性”和“方法”，便于对象适应自己所设计应用程序的输入输出内容，对象的生成过程及结构都被封装起来。正确使用对象可以减少程序和开发时间，提高程序设计者的工作效率。3属性PROPERTIES属性是VB系统提供的有关对象的参数或数据接口。用户通过适当地设置或改变对象的属性来确定对象的外观及性能特征，从而有效地使用系统提供的对象。比如，对象的名称、在屏幕上显示的位置、大小、颜色、接收或容纳的数据内容及数据的表现格式等。4事件EVENTS事件是指用户或操作者对计算机进行的某一操作（如击键、单击或移动鼠标等）的行为或系统状态发生的变化。VB系统常用事件来引导计算机执行一段程序。程序所用的键盘事件有KEYPRESS（按键）事件，KEYDOWN事件和KEYUP事件；鼠标事件有CLICK（单击鼠标）事件，DBDLICD（双击鼠标）。5方法METHOD方法主要是指对一个对象使用某种作用的过程。它是在程序执行的过程中要计算机执行的某种操作。其程序的方法有SHOW（显示）方法，HIDE（隐藏）方法，REFRESH（刷新）方法。6过程PROCEDURE过程是指经过定义或说明的，或基于某一对象对应的事件所引发的程序段。7模块MODULE模块是指一些运算量或过程进行声明或定义的一个集合。系统程序大体可分成四个模块数据输入、根据查询、数据打印和通讯。323数据库介绍关系数据库是目前各类数据库中最重要、最流行的数据库，他应用数学方法来处理数据库数据，是目前使用最广泛的数据库系统。20世纪70年代以后开发的数据库管理系统产品几乎都是基于关系的。在数据库发展的历史上，最重要的成就就是关系模型。关系数据库系统与非关系数据库系统的区别是关系系统只有“表“这一种数据结构；而非关系数据库系统还有其他数据结构，对这些数据结构有其他的操作。结构化查询语言SQL（STRUCTUREDQUERYLANGUAGE）是一种介于关系代数与关系演算之间的语言，其功能包括查询、操纵、定义和控制四个方面，是一个通用的、功能极强的关系数据库语言。目前已成为关系数据库的标准语言MICROSOFTACCESS介绍ACCESS2000就是关系数据库开发工具，数据库能汇集各种信息以供查询、存储和检索。ACCESS的优点在于它能使用数据表示图或自定义窗体收集信息。数据表示图提供了一种类似于EXCEL的电子表格，可以使数据库一目了然。另外，ACCESS允许创建自定义报表用于打印或输出数据库中的信息。ACCESS也提供了数据存储库，可以使用桌面数据库文件把数据库文件置于网络文件服务器，与其他网络用户共享数据库。ACCESS是一种关系数据库工具，关系数据库是已开发的最通用的数据库之一。如上所述，ACCESS作为关系数据库开发具备了许多优点，可以在一个数据包中同时拥有桌面数据库的便利和关系数据库的强大功能。数据库连接方式选择VISUALBASIC60连接数据库的主要方式以下几种方式一是用DATA控件进行数据库链接，二是利用ADODC（ADODATACONTROL进行数据库链接。三是利用DATAENVIRONMENT进行数据库链接四是利用ADOACTIVEXDATAOBJECTS进行编程现在我来大致对这几种技术应用介绍一、用DATA控件进行数据库链接第一步给窗体添加一个DATA控件。第二步用ACCESS建立一个名为PAD的数据库，在库中建立一个表MYSET，给表添加四个字段BACKCOLOR（数据），FORECOLOR文本），FONTNAME文本）,FONTSIZE（文本）。注意请将库文件存入程序所在目录。如果你的机器没安装有ACCESS，可通过VB建库。二、利用ADODC（ADODATACONTROL进行数据库链接使用ADODATA控件访问数据库可以完全不用编写代码,只需要通过简单的设置和操作其属性就可以实现与数据库的连接,通过绑定数据感知控件,就能提供一个访问数据库的界面,用来实现对数据库的浏览,贴加,删除,修改等操作三是利用DATAENVIRONMENT进行数据库链接利用DATAENVIRONMENT可以方便的对数据库进行链接，并为报表的建立做准备。四是利用ADOACTIVEXDATAOBJECTS进行编程ADO是MCROSOFT提出的第三种数据库访问对象，是MICROSOFT数据库访问技术的一个主要发展方向，ADO将OLEDB封装在一个数据对象中，使得VB程序中以方便地实现对数据库的访问。第4章系统设计41系统设计分析411业务流程图人事部门人员变动单报表人员奖励单人员惩罚单工资发放情况单工资发放人员决策部门财务部门412数据流程图人事部门人员变动统计员工财务部门人员奖励统计人员惩罚统计工资发放工资台帐413功能结构图公司员工工资管理系统员工基本信息员工奖励管理信息查询员工惩罚管理报表打印工资发放管理员工基本信息报表员工奖励信息报表员工惩罚信息报表工资发放信息报表添加用户用户管理帮助操作说明关于系统删除用户用户登录42系统数据库设计启动ACCESS2000，创建新的数据库，命名为数据库MDB，保存在要存放这个系统所有工程文件的文件夹中。在使用的时，要把应用程序和这个数据库保存在同一个文件夹中。数据库是信息管理系统的后台，存储着所有的信息，在信息管理系统中有着很重要的地位。数据库设计的好与坏，直接影响到这个系统的运行效率。良好的数据库设计，可以提高数据信息的存储效率，确保数据信息的完整性和一致性。设计数据库系统时首先充分了解用户各个方面的需求，包括现有的及将来可能增加的要求数据库需求分析用户的需求具体体现在各种信息的提供，保存，更新和查询，这就要求数据库结构能充分满足各种信息的输出和输入，收集基本数据，数据结构，以及数据处理的流程，组成一份详尽的数据字典，为后面的具体设计打下基础经过系统功能分析和需求总结及通过对员工工资计算过程的内容分析，考虑到将来功能上的扩展，设计如下面所示的数据库及数据表数据库用户信息表（用户资料）字段名数据类型字段大小可否为空默认值说明ID自动编号长整形索引（无重复）用户名文本8密码文本16员工基本信息表（XX表）字段名数据类型字段大小可否为空默认值说明ID数字长整形是0索引姓名文本16性别自动编号长整形职务文本身份证号文本工资数字部门ID文本员工奖励信息表（奖励表）字段名数据类型字段大小可否为空默认值说明ID数字长整形是0索引（无重复）姓名文本16性别文本职务文本奖励原因文本奖励金额数字奖励日期日期/时间备注文本员工惩罚信息表（惩罚表）字段名数据类型字段大小可否为空默认值说明ID数字长整形是0索引（无重复）姓名文本16性别文本职务文本惩罚原因文本惩罚金额数字惩罚日期日期/时间备注文本数据库的安全性、完整性、并发控制和恢复信息数据是公司的资源，因此保证数据库的安全可靠、正确有效是非常重要的问题。一般的数据库管理系统（DBMS）都有提供了一定的数据保护功能。数据库保护也称为数据控制，主要包括数据的安全性、完整性、并发控制和数据库的恢复等。（1）数据库的安全性数据库的安全性是指保护数据库以防止不合法的使用所造成的数据泄露、更改或破坏。由于数据库系统中存放着大量的数据，且为许多用户所共享，因此安全性问题是必须首先要解决的。一般计算机系统中的安全措施是按照“用户标识和鉴别”、“DBMS存取控制”、“OS级安全控制”、“DB密码存储”来一级一级设置的。在现在流行的数据库系统中一般都提供以下两种控制用户标识和鉴别、数据存取控制。（2）数据完整性为了保证数据库数据的正确性和相容性，数据库管理系统（DBMS）都提供了一种机制来检查数据库中的数据，看它是否满足语义的规定条件，DBMS称这种机制为“数据完整性检查”。一般的DBMS中是通过完整性约束和数据库触发器来实现这一机制的。（3）并发控制在多用户数据库环境中，多个用户程序可并行存取数据库中的数据，为了以正确的方式调度该并发操作，避免造成“丢失修改”、“不能重读”、“读脏数据”等不一致的情况，DBMS引入了“并发控制”这一机制。并发控制的主要方法是采用封锁机制，一般采用两种封锁机制共享机制和排它机制来实现。（4）数据库后备与恢复主要使用转储、日志等方法进行数据库的恢复。用户界面设计用户界面是指软件系统与用户之间交互的接口，通常包括输出，输入，人机对话的界面与方式等。由于本系统的最终用户是那些对计算机技术并不算很精通的管理人员，因此本系统采用了基于菜单选择，填写表格和简单的问答选择等友好的用户界面交互方式。系统安全性验证用户界面设计用户登录窗口界面是用户看到的第一幅画面，也是进入系统之前必须经过的一道“关口”。因此，简洁、实用、友好是设计时应当考虑到的风格。系统主画面屏幕区域设计进行系统的主画面屏幕区域设计时，是将整个屏幕划分为三个区域，如下图所示主菜单区工作区状态信息区在屏幕的最上方是主菜单区，显示本系统的功能主菜单。用户可以有鼠标左键来选择相应的菜单，也可以用快捷键进行操作，然后用同样的方法在相应菜单下拉出该项的二级菜单（如果有的话），如果还有三级菜单，用户可在二级菜单选择相应的功能项，系统会自动弹出三级菜单。43系统的设计与实现431用户登录窗体代码OPTIONEXPLICITDIMMYCNASADODBCONNECTIONDIMMYRSASADODBRECORDSETDIMSUMASINTEGERPRIVATESUBCOMBO1_CLICKCOMBO1SETFOCUSCOMBO1SELSTART0COMBO1SELLENGTHLENCOMBO1TEXTENDSUBPRIVATESUBCOMMAND1_CLICKDIMSTR1ASSTRINGIFSUM3THENUNLOADME设置最多登录次数为3EXITSUBENDIFSETMYCNNEWADODBCONNECTIONSETMYRSNEWADODBRECORDSETMYCNOPEN“PROVIDERMICROSOFTJETOLEDB40DATASOURCE“IFTRIMCOMBO1TEXT“THENMSGBOX“用户名不能为空,请输入您的用户名“,VBOKONLYVBEXCLAMATION,“警告“COMBO1SETFOCUSTEXT2TEXT“MYCNCLOSESUMSUM1EXITSUBENDIFSTR1“SELECTFROM用户资料WHERE用户名“DATASOURCE“PERSISTSECURITYINFOFALSE“MYCNOPENMYRSOPEN“SELECTFROM用户资料ORDERBY用户名“,MYCN,ADOPENKEYSET,ADLOCKPESSIMISTICMYRSMOVEFIRSTDOUNTILMYRSEOFCOMBO1ADDITEMTRIMMYRS“用户名“COMBO1ITEMDATACOMBO1NEWINDEXMYRS“ID“MYRSMOVENEXTLOOPENDSUBPRIVATESUBTEXT1_KEYDOWNKEYCODEASINTEGER,SHIFTASINTEGERIFKEYCODE13THENTEXT2SETFOCUSENDIFENDSUBPRIVATESUBTEXT2_CLICKTEXT2SETFOCUSTEXT2SELSTART0TEXT2SELLENGTHLENTEXT2TEXTENDSUB432添加用户窗体代码DIMMYCNASNEWADODBCONNECTIONDIMMYRSASNEWADODBRECORDSETPRIVATESUBCOMMAND1_CLICKDIMSTRNAME,STRPASS,STRPASSAGAINASSTRINGSTRNAMETRIMTEXT1TEXTSTRPASSTRIMTEXT2TEXTSTRPASSAGAINTRIMTEXT3TEXTIFSTRNAME“ORSTRPASS“ORSTRPASSAGAIN“THENMSGBOX“请填写完整所有资料“,VBOKONLY,“警告“TEXT1SETFOCUSEXITSUBENDIFMYCNOPEN“PROVIDERMICROSOFTJETOLEDB40DATASOURCE数据库MDB“MYRSOPEN“SELECTFROM用户资料WHERE用户名“DATASOURCE“PERSISTSECURITYINFOFALSE“CNOPENRSOPEN“SELECTFROM用户资料ORDERBY用户名“,CN,ADOPENKEYSET,ADLOCKPESSIMISTICRSMOVEFIRSTDOUNTILRSEOFLIST1ADDITEMTRIMRS“用户名“LIST1ITEMDATALIST1NEWINDEXRS“ID“RSMOVENEXTLOOPRSMOVEFIRSTENDSUBPRIVATESUBLIST1_CLICKDIMTEMPIDASLONGTEMPIDLIST1ITEMDATALIST1LISTINDEXRSMOVEFIRSTRSFIND“ID“DATASOURCE“PERSIS