欢迎来到天天文库
浏览记录
ID:47873889
大小:101.75 KB
页数:5页
时间:2019-11-15
《自编小软件上机指导》由会员上传分享,免费在线阅读,更多相关内容在工程资料-天天文库。
1、自编小软件上机指导一、建一个专用文件夹设取名为“lijuda”二、启动VFP,建立一个项目建立项目之前,设置默认目录为“lijuda”建立项目,取名为“projl”三、建立主程序取名为“MAIN”或者其他主程序的内容1、最简单的丄程序settalkoffdoformhybdreadeventsquit以上主程序执行后,控制权转移到表单“hybd”那里。2、较规范的主程序_screen.visible=.f.setdateansisetescapeoffsetdeleonsetsafeoffsettalkoffzoomwindow
2、screenmax_screen.controlbox=.f._screen.caption=总帐处理系统,doform欢迎表单readeventsquit四、编写“欢迎表单”-HYBD新建表单,取名为“HYBD”添加标签、图形等双击标签“点击这里进入”在过程“click”里输入releasethisformdoformdlbd执行该程序后,控制权转移到表单“dlbd”那里。五、编写“登录表单”一dlbd添加标签、文本框、命令按钮等在项目中建立自由表一“用户表”“用戸表”的字段结构如下图可先建立前四个字段,建好表后添加一些记录。
3、在表单的数据环境中添加“用户表”在表单的“Init”过程中输入publicqqqq=osele用户表replaceall标记with.f.gotop在命令按钮“退出”的“Click”过程中输入“clearevents^^在命令按钮“确定”的“click”过程屮输入qq=qq+1sele用户表locaforallt(操作员编码)=allt(thisform.textLvalue)if.not.eof()ifallt(口令)=allt(thisform.text2.value)replace标i己with・t.thisform.re
4、leasedoformzbdelsemessagebox(n口令不对,请重新输入!”)ifqq<4thisform.text2.setfocuselsequitendifendifelsemessagebox(H无此操作员!”)endif当操作员编码和口令都对时,控制权转移到“zbd”处。六、建立主表单新建表单,取名为“zbd”在表单的“Init”过程中输入dozcd.mprwiththisform,.t.将表单中的"showWindow"属性选择为2—"作为顶层表单”,所有表单都可作这选择。七、建立主菜单新建菜单,取名为“ze
5、d”暂时取一些名字,以后可更改设置一“退出”项目,设置为命令,命令内容为Clearevents在“显示”菜单栏中选择“常规选项”,选择“顶层表单”在“菜单”栏屮选择“生成”菜单每一次修改后都要运行“生成”命令八、试运行主程序
此文档下载收益归作者所有