vf課程結(jié)束大作業(yè)(學(xué)生管理系統(tǒng))

1、“學(xué)生信息管理系統(tǒng)”功能分析。學(xué)生管理系統(tǒng)的主要功能是：可以，查詢，添加，刪除，修改，顯示學(xué)生信息。學(xué)生管理系統(tǒng)代碼:.系統(tǒng)結(jié)構(gòu)1,數(shù)據(jù)庫結(jié)構(gòu)數(shù)據(jù)庫：學(xué)生信息統(tǒng)計(jì)表.dbc表：學(xué)生表.dbf索引：字段名學(xué)號為主索引。2 ,表單主表單：歡迎.scx次表單：查詢.scx顯示.scx修改.scx添加.scx刪除.scx3 ,主程序Main.prg三.部分程序模塊化1,歡迎doform查詢.scx如此類推。代碼：a=trim(thisform.text1.value)use學(xué)生表gotopifa=""messagebox("學(xué)號不能為空！")elselocafo

2、r學(xué)號=aif.not.eof()thisform.text2.value=學(xué)號thisform.text3.value=姓名thisform.text4.value=性另1Jthisform.text5.value=班級elsemessagebox("本表查無此信息！")endifendifuse代碼：use學(xué)生表aa=trim(thisform.text1.value)ifaa=""messagebox("學(xué)號不能為空！")elselocafor學(xué)號=aab=trim(thisform.text2.value)c=trim(thi

3、sform.text3.value)d=trim(thisform.text4.value)repl姓名withbrepl性別withcrepl班級withdmessagebox("修改數(shù)據(jù)成功！")endifuse代碼：use學(xué)生表a=trim（thisform.text1.value）ifa=""messagebox（"學(xué)號不能為空！"）elselocatefor學(xué)號=aIf.not.eof（）delepackmessagebox（"刪除成功！"）Elsemessagebox（"該信息不存在！&quo

4、t;）endifendifuse學(xué)號；1041104021姓名：牛鵬無班級；1口4叫退出融口|代碼：use學(xué)生表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("數(shù)據(jù)不能為空！")elsereplace學(xué)號withareplace姓名withbreplace性另1Jwithcreplace班級withdmessagebox("添加數(shù)據(jù)成功！")endifuse對于清除控件的代碼：thisform.text1.value="thisform.text2.value="thisform.text3.value="thisform.text4.value="%是不數(shù)幫退出I代碼：select學(xué)生LPARAMETERSnRow,nCollist7,主程序dosutup.prgdoform歡迎.scxreadevent