资源预览内容
第1页 / 共7页
第2页 / 共7页
第3页 / 共7页
第4页 / 共7页
第5页 / 共7页
第6页 / 共7页
第7页 / 共7页
亲,该文档总共7页全部预览完了,如果喜欢就下载吧!
资源描述
根据自己所学,设计一个小型的管理系统,运行后界面如下图所示。方法:第一步:打开数据库设计器,一定要有需要的表注意:表中照片的类型一定为通用性添加照片时,先打开数据表, ,再双击照片下的相应位置(gen) ,再复制你自己选择的照片,一定要是.bmp 格式的,要是不是.bmp 格式的就可以用画图等工具将.jpg 的图片转化为.bmp 格式的添加完照片后,变为 Gen第二步:文件新建表单新建文件变成这样第三步:选中表单的 caption,更改表单名,改完一定要按回车键第四步将表中的学号、姓名、性别等分别 拖动 到表单中可以按住 shift,选中每个框,用上下左右键用上线左右键调节位置在右边增加(按一下命令按钮在表单上点击一下即可)命令按钮,并更改名称这个表单大体的样式已经做完,剩下的就是要写每个命令按钮的命令。给大家写几个大家可以最为参考来看首先打开页面的时候是第一条,所以上一条是灰色的,可以找到 enabled(默认为真.T.)双击使它变为假.F.第一条thisform.command4.enabled=.t.go topthisform.refresh()上一条thisform.command4.enabled=.t.skip -1if bof()go topthisform.command1.enabled=.f.elsethisform.command1.enabled=.t.endifthisform.refresh()下一条thisform.command2.enabled=.t.thisform.command1.enabled=.t.skipif eof()go bottomthisform.command4.enabled=.f. endifthisform.refresh()最后一条thisform.command2.enabled=.t.thisform.command1.enabled=.t.go bottomthisform.refresh()添加thisform.command2.enabled=.t.thisform.command4.enabled=.t.append blankthisform.refresh()删除if messagebox(您确认删除吗?,1+32+0,确认删除)=1deletepackthisform.refresh()elserecallendif 退出if messagebox(是否确认退出?,1+32+0, 确认退出)=1thisform.releaseendif 在运行(点小叹号)看一下如果出现可以表单上右击,选代码,写入 use 学生即可,大家可以运行看看,一般就可以做成个成功的表单啦!
收藏 下载该资源
网站客服QQ:2055934822
金锄头文库版权所有
经营许可证:蜀ICP备13022795号 | 川公网安备 51140202000112号