旧教材——第7章数据库的建立与操作

1、理论教学课后习题与上机实验本章要点回顾学习提要与目标返回返回土 ffkfmmbv称外部关键字称外部关键字图工具栏提供对数据库各种操作工具栏提供对数据库各种操作OPEN DATABASE 学籍学籍SET DELETE ON &将删除标志设置为有效将删除标志设置为有效SELECT 1USE 学生学生SELECT 2USE 成绩成绩 THIS.SETALL(VALUE,TEXTBOX) &将表单中所有的文本框的值将表单中所有的文本框的值设置为空字符设置为空字符THIS.TEXT2.READONLY=.T. &将显示将显示“姓名姓名”的文本框设置为只读状的文本框设置为只读状态态

2、THIS.COMMAND1.DEFAULT=.T.SELECT成绩成绩&选择成绩表选择成绩表DELETE ALL &将所有记录打上删除标志将所有记录打上删除标志WITH THIS.GRID1 &设置表格多个属性设置表格多个属性.READONLY=.T. &将表格设置为只读状态将表格设置为只读状态.ALLOWADDNEW=.F. &在表格界面中不可添加新记录在表格界面中不可添加新记录.DELETEMARK=.F. &在表格界面中不可删除记录在表格界面中不可删除记录.RECORDSOURCETYPE=1 &将表格的将表格的RecordSour

3、ceType属性设置为属性设置为“1-别名别名”.RECORDSOURCE=“成绩成绩 &将表格的将表格的 RecordSource属性属性设置为设置为“成绩成绩”ENDWITHTHIS.TEXT1.SETFOCUS &将显示将显示“学号学号”的文本框设置为当前焦的文本框设置为当前焦点点SELECT 学籍学籍DELETE ALLSELECT 学生学生SNO=ALLTRIM(THISFORM.TEXT1.VALUE) &处理处理“学号学号”值的首尾空值的首尾空格格LOCATE FOR 学号学号=SNO &在在“学生学生”表中查找与表中查找与“学号学号”的值匹配的的

4、值匹配的记录记录IF FOUND() &如果查找到与如果查找到与“学号学号”的值匹配的记录的值匹配的记录THISFORM.TEXT2.VALUE=姓名姓名 &填写填写“姓名姓名”文本框文本框SELECT 成绩成绩RECALL FOR 学号学号=学生学生.学号学号 &恢复恢复“成绩成绩”表中满足条件记表中满足条件记录录ELSE=MESSAGEBOX(查无此人！查无此人！,0+48,提示窗提示窗) &如果没有找到如果没有找到则显示提示信息则显示提示信息ENDIFTHISFORM.TEXT1.SELECTONENTRY=.T. &将将“学号学号”输入框设置输入框设置为信息全部选定为信息全部选定THISFORM.TEXT1.SETFOCUS &将将“学号学号”输入框设置为当前输入框设置为当前焦点焦点THISFORM.REFRESHSELECT 成绩成绩RECALL ALL &恢复恢复“成绩成绩”表中所有记录表中所有记录SET DELETE