《vf课程结束大作业(学生管理系统).pdf》由会员分享，可在线阅读，更多相关《vf课程结束大作业(学生管理系统).pdf（6页珍藏版）》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、用心、精心、决心、匠心呕心沥血整理word1一“学生信息管理系统”功能分析。学生管理系统的主要功能是：可以，查询，添加，删除，修改，显示学生信息。二系统结构1，数据库结构数据库：学生信息统计表.dbc表：学生表.dbf索引：字段名学号 为 主索引。，表单主表单：欢迎.scx次表单：查询.scx显示.scx修改.scx添加.scx删除.scx，主程序学生管理系统学生表查询表单修改表单删除表单添加表单显示表单用心、精心、决心、匠心呕心沥血整理word2 Main.prg三部分程序模块化，欢迎代码：do form 查询.scx 如此类推。，查询代码：a=trim(thisform.text1.val
2、ue)use 学生表 go top if a=messagebox(学号不能为空！)else loca for 学号=a if.not.eof()thisform.text2.value=学号 thisform.text3.value=姓名 thisform.text4.value=性别 thisform.text5.value=班级 else messagebox(本表查无此信息！)endif用心、精心、决心、匠心呕心沥血整理word3 endif use，修改代码：use 学生表aa=trim(thisform.text1.value)if aa=messagebox(学号不能为空！)el
3、seloca for 学号=aab=trim(thisform.text2.value)c=trim(thisform.text3.value)d=trim(thisform.text4.value)repl 姓名 with brepl 性别 with crepl 班级 with dmessagebox(修改数据成功！)endifuse，删除代码：use 学生表用心、精心、决心、匠心呕心沥血整理word4a=trim(thisform.text1.value)if a=messagebox(学号不能为空！)elselocate for 学号=a If.not.eof()dele pack me
4、ssagebox(删除成功！)Else messagebox(该信息不存在！)endifendifuse，添加代码：use 学生表append blanka=trim(thisform.text1.value)b=trim(thisform.text2.value)c=trim(thisform.text3.value)d=trim(thisform.text4.value)用心、精心、决心、匠心呕心沥血整理word5if a=.or.b=.or.c=.or.d=messagebox(数据不能为空！)else replace 学号 with a replace 姓名 with b replac
5、e 性别 with c replace 班级 with d messagebox(添加数据成功！)endifuse对于 清除控件的代码：thisform.text1.value=thisform.text2.value=thisform.text3.value=thisform.text4.value=，显示代码：select 学生LPARAMETERS nRow,nCollist，主程序do sutup.prg用心、精心、决心、匠心呕心沥血整理word6do form 欢迎.scxread eventsset talk offset safety offset default to d:set century onclear windowsclear all主程序.prg