vf课程结束大作业(学生管理系统)VIP专享VIP免费

学生管理系统学生表查询表单修改表单删除表单添加表单显示表单一．“学生信息管理系统”功能分析。学生管理系统的主要功能是：可以，查询，添加，删除，修改，显示学生信息。二．系统结构1，数据库结构数据库：学生信息统计表.dbc表：学生表.dbf索引：字段名学号为主索引。２，表单主表单：欢迎.scx次表单：查询.scx显示.scx修改.scx添加.scx删除.scx３，主程序Main.prg三．部分程序模块化１，欢迎代码：doform查询.scx如此类推。２，查询代码：a=trim(thisform.text1.value)use学生表gotopifa==""messagebox("学号不能为空！")elselocafor学号=aif.not.eof()thisform.text2.value=学号thisform.text3.value=姓名thisform.text4.value=性别thisform.text5.value=班级elsemessagebox("本表查无此信息！")endifendifuse３，修改代码：use学生表aa=trim(thisform.text1.value)ifaa==""messagebox("学号不能为空！")elselocafor学号=aab=trim(thisform.text2.value)c=trim(thisform.text3.value)d=trim(thisform.text4.value)repl姓名withbrepl性别withcrepl班级withdmessagebox("修改数据成功！")endifuse４，删除代码：use学生表a=trim(thisform.text1.value)ifa==""messagebox("学号不能为空！")elselocatefor学号=aIf.not.eof()delepackmessagebox("删除成功！")Elsemessagebox("该信息不存在！")endifendifuse５，添加代码：use学生表appendblanka=trim(thisform.text1.value)b=trim(thisform.text2.value)c=trim(thisform.text3.value)d=trim(thisform.text4.value)ifa==''.or.b==''.or.c==''.or.d==''messagebox("数据不能为空！")elsereplace学号withareplace姓名withbreplace性别withcreplace班级withdmessagebox("添加数据成功！")endifuse对于清除控件的代码：thisform.text1.value=''thisform.text2.value=''thisform.text3.value=''thisform.text4.value=''６，显示代码：select学生LPARAMETERSnRow,nCollist７，主程序dosutup.prgdoform欢迎.scxreadeventssettalkoffsetsafetyoffsetdefaulttod:setcenturyonclearwindowsclearalldoi:\vfp\主程序.prg