第1页共34页编号：时间：2021年x月x日书山有路勤为径，学海无涯苦作舟页码：第1页共34页vfp实例教程>>库房管理软件·一、建立数据库·九.浏览修改表单llxg.scx·二、主程序·十.修改总数据库表单xgmain·三、主菜单·十一.个人工具卡表单grgj·四.建立logo表单·十二.创建本地视图ll_gjk·五.表单systen·十三.创建修改个人工具卡表单grgjk·六.表单rkd（入库单）·十四.建立报表·七.出库单ckd·十五.连编·八.器材明细表表单qcmx.scx·十六.制作安装盘一、建立数据库1、新建数据库kfgl，保存到d：\demo\data目录下。2、在kfgl数据库中新建表systen（.dbf），五个字段：fzr、bgy、jhy、cly、mima，其标题分别为：负责人、保管员、计划员、材料员、密码。（图5-1）第2页共34页第1页共34页编号：时间：2021年x月x日书山有路勤为径，学海无涯苦作舟页码：第2页共34页可以在其‘输入掩码’文本框内输入其掩码，其作用是：在你浏览此表时只显示掩码，而不显示其内容。例如：你的密码是“wyc”，你输入掩码为“ok”，在你浏览表时，显示密码为“ok”，可以起到一定的保密作用，而在程序中调用表显示其内容时，不显示掩码。3、新建表main.dbf：ckbhc(10),rqd(8),qcmcc(16),ggxhc(20),lbc(6),dwc(4),djn(8,2),pzbhc(10),rksln(8,2),rkjen(10,2),cksln(8,2),ckjen(10,2),gcmcc(30),bzc(6),clyc(6),bgyc(6),jhyc(6),llrc(6),fzrc(6),lhc(6),ytc(20),quc(2),jiac(2),haoc(2),kuc(2)。其标题分别为：出库编号，日期，器材名称，规格型号，类别，单位，单价，凭证编号，入库数量，入库金额，出库数量，出库金额，工程名称，班组，材料员，保管员，计划员，领料人，负责人，料号，用途，区，架，号，库。说明：c-字符型；d-日期型；n-数值型，括号内为字节长度，逗号后面的数值为几位小数。4、新建表grgjk.dbf:ckbhc(10),rqd(8),qcmcc(16),ggxhc(20),lbc(6),dwc(4),djn(8,2),cksln(8,2),ckjen(10,2),bzc(6),jhyc(6),llrc(6)。其标题分别为：出库编号，日期，器材名称，规格型号，类别，单位，单价，出库数量，出库金额，班组，计划员，领料人。二、主程序settalkoff&&关闭对话模式setsafeoffsetstatoffsetdeleon&&不处理已删除的记录setcentonsetdatetoansicloseallRELEASEWINDOW常用&&关闭常用工具栏ifmod(day(date()),2)=0&&偶数日期_SCREEN.backcolor=rgb(80,180,150)&&窗口背景颜色MODIFYWINDOWSCREENTITLE"库房管理应用软件ver2.1为齐;鲁石化检修公司机泵车间编制今天是："+dtoc(date())+""+cdow(date())else&&奇数日期_SCREEN.backcolor=rgb(80,150,180)&&窗口背景颜色MODIFYWINDOWSCREENTITLE"库房管理应用软件ver2.1;软件编制者：王永成今天第3页共34页第2页共34页编号：时间：2021年x月x日书山有路勤为径，学海无涯苦作舟页码：第3页共34页是："+dtoc(date())+""+cdow(date())endifZOOMWINDOWSCREENMAX&&主窗口最大化_SCREEN.controlbox=.f.&&去掉主窗口控制按钮deactivatewindow"项目管理器"&&关闭项目管理器mypath=left(sys(16),rat("\",sys(16)))&&确定程序所在的位置setdefato(mypath)&&设置当前路径setpathtodata;form;pic&&指明路径opendatabasekfgl&&打开数据库doformlogo&&运行表单logoreadeventsquit三、主菜单操作(\BR>——器材入库命令：doformrkd——器材出库命令：doformckd——\-——退出命令：Cleaevent编辑(\BR>——编辑浏览出入库单命令：doformllxg——浏览个人工具卡命令：doformgrgj——修改个人工具卡命令：doformgrgjk——\-——基本设置命令：doformsysten游戏(\BR>——猜数游戏命令：doformcsyx——身体状态测试命令：doformstcs——\-——心灵感应命令：doformxlgy退出(\BR命令Clea>四、建立工具栏1、在‘项目管理器’中选‘类库’，按‘新建’按钮，出现新建类对话框。2、类名输入‘kuf’，派生于选择‘toolbar’，存储于：‘D:\demo\form\kuf.vcx'，按‘确定’按钮，出现类设计器。3、跟建立表单一样，如图5-2，我们建立8个命令按钮，其‘tooltiptext’分别为：器材入库，器材出库，修改，浏览，查找器材，身体状态测试，...
