二系统结构1, 数据库结构数据库:学生信息统计表.dbc表:学生表.dbf 索引:字段名 学号 为 主索引。,表单主表单:欢迎.scx 次表单:查询.scx显示.scx修改.scx添加.scx删除.scx,主程序 Main.prg三部分程序模块化,欢迎代码: do form 查询.scx如此类推。,查询代码:a=trim(thisform.text1.value)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=班级本表查无此信息! endif use ,修改代码:aa=trim(thisform.text1.value)if aa=elseloca for 学号=aab=trim(thisform.text2.value)c=trim(thisform.text3.value)d=trim(thisform.text4.value)repl 姓名 with brepl 性别 with crepl 班级 with dmessagebox(修改数据成功!