输入输出界面设计2步骤一：建立实验文件夹设置路径1建立文件夹在我的电脑选择磁盘分区D，建立实验用文件夹CASE S。
由于在实验中涉及具体的路径和文件夹名，如路径和文件夹名有更改，实验中应作相应更改。
2设置默认路径进入Visual FoxPro（以下简称VFP），依次选择工具→选项→文件路径→默认目设置实验路径。
图1-1 默认路径位置在上图中点击修改，弹出图1-2，在图1-2中勾选使用默认目录。
图1-2 定位默认目录在上图中点击浏览按钮（带…按钮），弹出图1-3，在图1-3中选择CASES,再单击选定按钮。
图1-3 选择目录再在图1-4中依次点确定（A）→设置为默认值（B）→确定（C）。
AB C图1-4 更改默认目录步骤二：建立实验用数据库表1建立员工表employeeemployee表中各个字段名和相关长度如图2-1所示。
address 字符型50图2-1 employee表结构图2输入员工表employee数据图2-2 employee表模拟数据步骤三：设计员工信息注册表单1 设计注册表单利用表单设计器，设计如图3-1所示的注册界面。
设计中注意布局工具栏的灵活使用和控件的复制。
（表单名register ）图3-1员工信息注册界面2 添加数据环境在表单上单击右键→数据环境→添加数据表employee 。
图3-2注册表单数据环境3设置控件属性4设置控件次序选择菜单→显示→Tab键次序，为各个控件设置次序。
图3-3注册表控件次序设置5主要控件代码①Form1对象Init方法的代码程序bo1.enabled=.f.Thisform.optiongroup1.option1.enabled=.f. Thisform.optiongroup1.option2.enabled=.f.②Text1控件Gotfocus 方法的代码程序bo1.enabled=.t.Thisform.optiongroup1.option1.enabled=.t. Thisform.optiongroup1.option2.enabled=.t.③Commandgroup1控件Click方法的代码程序do casecase this.value=1go topcase this.value=2*比较与使用! bof()的区别if recn()>1skip -1elsego bottomendifcase this.value=3*比较与使用! eof()的区别if recn()<recc()skipelsego topendifcase this.value=4go bottomcase this.value=5append blankcase this.value=6browse noappendcase this.value=7use d:\cases\employee.dbf*==与trim()的使用delete for trim(employee.no)==trim(thisform.text1.value) packcase this.value=8*退出时删除空记录use d:\cases\employee.dbfdelete for trim(employee.no)==""packthisform.releaseendcase*退出时刷新各个控件的值thisform.text1.refreshthisform.text2.refreshthisform.text3.refreshthisform.text4.refresh thisform.text5.refresh thisform.text6.refresh bo1.refresh thisform.optiongroup1.refresh步骤四：设计登陆表单1 设计登陆表单利用表单设计器，设计如图4-1所示的登陆界面。
（表单名login ）图4-1系统登陆界面2 添加数据环境在表单上单击右键→数据环境→添加数据表employee。
图4-2登录表单数据环境3设置控件属性4Combo1的属性设置对着Combo1→单击右键→生成器→组合框生成器，如图4-3所示。
在图中选择字段No,Name。
图4-3 Combo1属性设置图在布局选项卡中拖动No,Name之间的标题框使之能清晰显示。
图4-4 Combo1布局设置图在值选项卡中选择返回值列名No。
图4-5 返回值设置图5主要控件代码①Form1控件Init Event程序代码mand1.enabled=.t.public z &&z 用于记录登录次数z=0public un &&z 用于存储登录帐号,在修改密码程序中使用public pw &&z 用于存储登录密码,在修改密码程序中使用②Command1控件click Event程序代码use d:\cases\employee.dbflocate for trim(no)==trim(bo1.value)if found( ) and trim(password)==trim(thisform.text1.value) do mainmenu.mpr*设置菜单窗口标题&&modify windows screen title '好美家销售管理信息系统' pw=trim(thisform.text1.value)un=trim(bo1.value)thisform.releaseelseif not found( )bel4.forecolor=RGB(255,0,0)bel4.caption="该用户不存在！重新输入"bo1.value=" "thisform.text1.value=""bo1.setfocusthisform.refreshz=z+1if z=3bel4.forecolor=RGB(255,0,0)bel4.caption="对不起，你无权使用本系统！！"thisform.text1.enabled=.f.bo1.enabled=.f.mand1.enabled=.f.endifelsebel4.forecolor=RGB(255,0,0)bel4.caption="密码不正确！重新输入"thisform.text1.value=""thisform.text1.setfocusthisform.refreshz=z+1if z=3bel4.forecolor=RGB(255,0,0)bel4.caption="对不起，你无权使用本系统！！"thisform.text1.enabled=.f.bo1.enabled=.f.mand1.enabled=.f.endifendifendif③Command2控件click Event程序代码Thisform.release④Command3控件click Event程序代码Do form registerThisform.release步骤五：修改密码表单设计1设计登陆表单利用表单设计器，设计如图5-1所示的修改密码界面。
（表单名changepassword）图5-1修改密码界面2设置控件属性3主要控件代码①Commandgroup1控件Click event t程序代码do casecase this.value=1if trim(thisform.text1.value)==pwif not(trim(thisform.text2.value)==trim(thisform.text3.value))xz=messagebox('两次密码输入不一致，请重新输入！！',0+48+256,'提示信息')if xz=1thisform.text2.value=""thisform.text3.value=""thisform.text2.setfocusendifelseuse d:\cases\employee.dbflocate for trim(no)==unreplace password with thisform.text2.valuexz=messagebox('密码修改成功，请记住新密码！！',0+48+256,'提示信息')if xz=1thisform.releaseendifendifelsexz=messagebox('原始密码输入错误，请重新输入！！',0+48+256,'提示信息') if xz=1thisform.text1.value=""thisform.text2.value=""thisform.text3.value=""thisform.text1.setfocusendifendifcase this.value=2thisform.text1.value=""thisform.text2.value=""thisform.text3.value=""thisform.text1.setfocus case this.value=3thisform.releaseendcase*退出时刷新各个控件的值thisform.text1.refreshthisform.text2.refreshthisform.text3.refresh步骤六：其它表单设计1软件信息表单设计利用表单设计器设计如图6-1所示的表单。
（表单名aboutus）图6-1软件信息表单确认按钮的Command1控件click事件代码为：Thisform.release2设备信息维护表单依据实验材料提供给你的设备表（sb.dbf和sb.fpt）利用表单生成向导，生成设备信息维护表单。
并对相关属性作简单设置，得到如图6-2所示的表单。
（表单名sb）图6-2设备信息维护表单3商品信息维护表单依据实验材料提供给你的商品表（sp.dbf和sp.fpt）利用表单生成向导，生成商品信息维护表单。
并对相关属性作简单设置，得到如图6-3所示的表单。
（表单名sp）图6-3商品信息维护表单步骤七：报表设计1设备报表设计依据实验材料提供给你的设备表（sb.dbf和sb.fpt）利用报表生成向导，生成设备报表，得到如图7-1所示的带区式报表。