2016vfp课程设计报告.docVIP

VFP课程设计 设计人员：康艳，刘露露，刘艳红，杨柳，吴晶晶，邹敏 1.系统设计目标 该系统的具体任务就是设计一个家电行业个体户的管理系统，由计算机代替人工执行一系列诸如仓库管理，名片管理，销售发票的管理等操作。这样就有效解决了个体户管理混乱的问题，使日常销售程序化、有理化、自动化，从而达到提高个体户经营效率的目的。 设计的指导思想是一切为用户着想，界面要美观大方，操作尽量简单方便，而且作为一个实用的应用程序要有很好的容错性，在用户出现错误操作时能尽量及时给出提示，以便用户及时更正。 2.开发和运行环境 开发工具：Visual FoxPro 6.0 运行环境：Windows 2007 、Windows 2000、Windows XP 3.系统功能 系统数据初始化 仓库信息的添加 仓库信息的修改 仓库信息的删除 名片信息的添加 名片信息的修改 名片信息的删除 仓库信息报表浏览 仓库信息报表打印 名片报表浏览 密码修改 4.系统功能模块结构图 系统采用模块化程序设计方法，既便于系统功能的各种组合和修改，又便于未参与开发的技术维护人员补充、修改。在系统功能分析的基础上，考虑Visual FoxPro 6.0程序编制的特点，得到如下所示的系统功能模块结构图。 系统功能模块结构图 6.数据库表设计结构 （1）仓库表如下： 设计过程如下 （2）名片表结构如下 设计过程如下 （3）发票表结构如下 设计过程如下 （4）密码表结构如下 7.主要模块的设计说明和程序代码 主程序代码 set talk off set stat off set dele on set safe off set default to f:\软件\vfp2 do form f:\软件\vfp2\欢迎 欢迎界面 登陆界面 在该表单的数据环境中添加mm表，使其与mm内设置的用户名和密码联系。 “确定”按钮的“click”事件中添加代码如下： public 用户 set exact on x1=allt(thisform.text1.value) x2=allt(thisform.text2.value) locate for allt(密码表.姓名)==x1 if !found() k= messageb(该用户不存在,请重新输入!,1+32+0,友情提示) if k=1 thisform.text1.value= thisform.text1.setfocus endif else yh=allt(thisform.text1.value) if alltr(密码表.密码)==alltr(thisform.text2.value) messageb(登录成功,欢迎使用!) thisform.release do form 主界面.scx else k=messageb(密码有误，请重新输入!,1+32+256,警告) if k=1 thisform.text2.value= thisform.text2.setfocus endif endif endif 退出”按钮的“click”事件中添加代码如下： x=messagebox(确认退出系统吗?,1+32+256,友情提示) if x=1 thisform.release clear events else thisform.text1.value= thisform.text1.setfocus endif 系统主界面 销售单据”按钮的“click”事件代码如下：do form 销售单据.scx 密码设置”按钮的“click”事件代码如下：do form 密码设置.scx 仓库查询记录”按钮的“click”事件代码如下：do form 查询记录.scx 仓库记录添加”按钮的“click”事件代码如下：do form 记录添加.scx 仓库记录修改”按钮的“click”事件代码如下：do form 记录修改.scx 名片记录查询”按钮的“click”事件代码如下do form 记录查询修改.scx 名片记录添加”按钮的“click”事件代码如下do form 记录添加.scx 仓库记