文档介绍：vfp实例教程>>库房治理软件·一、建立数据库··二、主程序··三、主菜单······(入库单)·····、建立数据库1、新建数据库kfgl,储存到d:\demo\data目录下。2、在kfgl数据库中新建表systen(.dbf),五个字段:fzr、bgy、jhy、cly、mima,其标题分别为:负责人、保管员、计划员、材料员、密码。(图5-1)可以在其‘输入掩码’文本框内输入其掩码,其作用是:在你浏览此表时只显示掩码,而不显示其内容。例如:你的密码是“wyc”,你输入掩码为“ok”,在你浏览表时,显示密码为“ok”,可以起到一定的保密作用,而在程序中调用表显示其内容时,不显示掩码。3、:ckbhc(10),rqd(8),(16),ggxhc(20),lbc(6),dwc(4),djn(8,2),pzbhc(10),rksln(8,2),rkjen(10,2),cksln(8,2),ckjen(10,2),(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、: ckbhc(10),rqd(8),(16),ggxhc(20),lbc(6),dwc(4),djn(8,2),cksln(8,2),ckjen(10,2),bzc(6),jhyc(6),llrc(6)。其标题分别为:出库编号,日期,器材名称,规格型号,类别,单位,单价,出库数量,出库金额,班组,计划员,领料人。二、主程序settalkoff   &&关闭对话模式setsafeoffsetstatoff  setdeleon    &&不处理已删除的记录setcentonsetdatetoansicloseallRELEASEWINDOW常用  &&关闭常用工具栏ifmod(day(date()),2)=0 &&=rgb(80,180,150) &&窗口背景颜色MODIFYWINDOWSCREENTITLE"           为齐;鲁石化检修公司机泵车间编制                 今天是:"+dtoc(date())+" "+cdow(date())else &&=rgb(80,150,180) &&窗口背景颜色MODIFYWINDOWSCREENTITLE"            ;   软件编制者:王永成                     今天是:"+dtoc(date())+" "+cdow(date())endifZOOMWINDOWSCREENMAX  &&=.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——\-——心灵感应