Visual-FoxPro-6.0实验安排

Visual FoxPro 6.0实验安排序号实验项目名称1VFP环境及项目管理器的使用；常量、变量和表达式2数据类型、运算符、表达式和函数3创建表、对表的交互式操作4使用命令对表进行操作（1）5使用命令对表进行操作（2）6排序与索引7查询8统计、数据库的操作（1）9数据库的操作（2）、为数据库创建本地视图10结构化查询SQL11程序设计(1)：程序初步、程序建立和运行；顺序、分支程序设计12程序设计(2)：循环程序设计13程序设计(3)：程序综合；过程和函数14创建表单、表单基本控件（1）15表单基本控件（2）16表单控件综合应用实验一 一、实验项目名称VFP环境及项目管理器的使用；常量、变量和表达式二、实验目的1.掌握VF系统的启动和退出方法2.熟悉VF的集成环境3.掌握项目的创建,打开,与关闭的方法4.了解常量、变量和表达式三、实验主要仪器设备、器材、药品、软件等微机和相应软件系统(VF)四、实验原理（实验装置）微机和相应软件系统(VF)五、实验内容、步骤1、VF的进入：开始菜单中、桌面上、查找 VFP6.exe文件等 VF的退出: quit , Alt+F42、熟悉界面（主界面、标题栏、菜单栏、工具栏、显示窗口、命令窗口、状态栏）3、熟悉VF窗口的操作。 （1）、大小调整，移动 （2）、工具栏的调整：显示/隐藏工具栏，浮动、静态工具栏 （3）、鼠标右键的使用：工具栏处、命令框中等4、菜单熟悉，看看每个菜单都有哪些内容。 （1）、文件菜单项目 （2）、编辑菜单和显示菜单 （3）、窗口菜单，学习怎么样隐藏、显示COMMAND窗口 （4）、工具菜单-选项 （5）、学习使用帮助5、根据实验教材上的实验一学习项目管理器的使用。六、实验记录（数据、现象、报表、软件、图象等）七、实验数据、现象、报表、软件、图象等处理与分析通过上机验证 , 实验成功 , 达到预期目的.八、问题与心得实验二 一、实验项目名称数据类型、运算符、表达式和函数二、实验目的1.掌握有关VF各种数据量的定义2.了解内存变量文件的建立与使用3.学习和掌握VF数据库中的各种运算符及使用4.了解部分常用函数的使用三、实验主要仪器设备、器材、药品、软件等微机和相应软件系统(VF)四、实验原理（实验装置）微机和相应软件系统(VF)五、实验内容、步骤1.先设定默认路径，比如：F:TOM命令： set defa to f:tom2. 完成实训41实训43 ，将实训44换成以下内容：练习：定义一个4个元素的一维数组，一个（2，3）的二维数组，并为一维数组所有元素赋值为字符串“程序”，二维数组分别赋值为一个字符型数据，一个数值型，一个日期型数据，一个逻辑型数据3. 观察下列命令的作用和显示结果（先思考，再在主窗口观察结果）X1=8*4X2=PQRxy=.t.xyz=1996/12/30list memory like x*store 计算机 TO xy,x3save to f1 all like x? release x1,x2list memory like x? restore from f1list memory like x?4.完成实验书上函数的练习.六、实验记录（数据、现象、报表、软件、图象等）主窗口的结果:第1次显示:X1 Pub N 32 ( 32.00000000)X2 Pub C PQRXYZ Pub D 12/30/96第2次显示:XY Pub C 计算机X3 Pub C 计算机第3次显示:X1 Pub N 32 ( 32.00000000)X2 Pub C PQRXY Pub C 计算机X3 Pub C 计算机七、实验数据、现象、报表、软件、图象等处理与分析通过上机验证 , 实验成功 , 达到预期目的.八、问题与心得实验三 一、实验项目名称创建表、对表的交互式操作二、实验目的1、熟练掌握用“表设计器”创建表和修改表结构的方法。2、掌握在数据表中记录的添加、修改、删除和浏览等操作。3、熟练掌握表设计和操作的方法。4、掌握向数据表中输入备注型、通用型数据。三、实验主要仪器设备、器材、药品、软件等微机和相应软件系统(VF)四、实验原理（实验装置）自由表的创建五、实验内容、步骤1：创建目录、设置默认路径创建目录：md d:/VFP/experiment 使用菜单命令设置默认路径：set default to d:/VFP/experiment VF主窗口-工具-选项-文件位置-默认路径-设置相应的路径注意：设置的默认路径只对当前操作有效，如果关闭VF重新打开，设置的默认路径消失。如果想一直使用相同的默认路径可以在“选项”窗中把默认路径设置为默认值。2：创建表和输入数据1)建表：(三种方式：命令、菜单、项目管理器)create 学生create table 学生 (学号 C(8),姓名 C(8),性别 C(2),入校总分 N(3)文件-新建-表（新建文件）-确定-在d:/VFP/experiment的目录下输入表名zgda.dbf-在打开的标设计器中设计表的结构项目管理器-数据-自由表-新建2)数据的输入：直接输入：命令追加：append blank菜单方式追加：在浏览或编辑状态下-显示-追加方式或在浏览或编辑状态下-表-追加新纪录注意逻辑型、日期型、memo和gen型的输入，输入数据后保存(ctrl+w) 3：表的打开和关闭：打开：use 表名 用菜单方式关闭表： 命令方式use ：关闭当前工作区已打开的表文件close all：关闭所有工作区中的所有类型文件，但不释放内存变量close ：关闭指定的相应类型的文件clear all：关闭所有工作区中的所有类型文件，释放内存变量quit ：关闭所有工作区中的所有表及各种类型的文件、释放内存变量并回到操作系统 菜单方式 文件-退出 单击程序窗口的关闭按钮六、实验记录（数据、现象、报表、软件、图象等）按照实验步骤创建了表: 学生.dbf，课程.dbf，成绩.dbf，系名.dbf七、实验数据、现象、报表、软件、图象等处理与分析通过上机验证 , 实验成功 , 达到预期目的八、问题与心得实验四 一、实验项目名称使用命令对表进行操作（1）二、实验目的1、熟练掌握数据的选择显示。(display、list)2、熟练掌握记录的定位与插入。(go、skip、insert)3、 熟练掌握记录的删除与恢复。(delete、recall、pack、zap)三、实验主要仪器设备、器材、药品、软件等微机和相应软件系统(VF)四、实验原理（实验装置）LIST 命令的功能：GO 命令的功能：SKIP 命令的功能DELETE命令的功能：RECALL命令的功能：五、实验内容、步骤打开表请进行以下的操作： (1)、显示全部记录，查看EOF()和RECNO()的值，并且思考EOF()为什么该是那个值 (2)、显示第6条记录内容(思考可以用哪些命令完成) (3)、显示出姓名中有“小”的同学。 (4)、练习skip命令（并思考记录指针指向哪条记录了） 例如： go 3 skip 4 disp skip -2 disp (5)、增加字段： 外语 N(3) 、计算机N（3）、总分N（3） 再将每条记录的外语和计算机的成绩数据录入，满分为100分 (6)、显示现在的表结构 (7)、在第3条记录前插入一条记录，填写你自己的信息 (8)、修改你的入校总分为749分 (9)、彻底删除你的那条记录（第3条记录） (10)、逻辑删除4-7条记录，并查看删除后的结果。（list查看和用brow浏览）六、实验记录（数据、现象、报表、软件、图象等）(1)list ?eof() .t. ?recno() 11 (2) list record 6 或者 go 6 disp (3) list for 小$姓名 (4) (5)modi stru (6)list stru (7) GO 3 insert before 然后输入你的信息 或者： GO 2 insert 然后输入你的信息 (8) go 3 replace 入校总分 with 749 或者 go 3 edit (9) delete record 3 （逻辑删除） list (观察第3条记录是不是被打上了*标志) pack （物理删除彻底删除） list (10) go 4 delete next 4 list browse七、实验数据、现象、报表、软件、图象等处理与分析通过上机验证 , 实验成功 , 达到预期目的八、问题与心得实验五 一、实验项目名称使用命令对表进行操作（2）二、实验目的1、熟练掌握记录数据的替换。(replace)2、熟练掌握记录与数组间的数据传送。(scatter、gather)3掌握复制数据库文件(copy)三、实验主要仪器设备、器材、药品、软件等微机和相应软件系统(VF)四、实验原理（实验装置）五、实验内容、步骤1、将学生表中入校总分在540到580分的学生信息拷贝到表abc中，再打开 abc表，查看记录。2、将abc表的第2条记录发送到数组HA中，并显示HA数组的值。（数组可先定义，也可不定义，观察两种方法的区别。）3、将HA数组中的第二个元素改为“小新” （注：HA(1)表示HA的第一个元素,HA(2)表示第二个元素,后面以此类推.）4、在abc表尾追加一条空白记录，将HA数组中的元素发送到空白记录中。5、利用scatter和gather命令将表abc的第3条记录的出生年月为01/01/19876、打开学生表，拷贝表结构到tu中 其中只包括字段：学号、姓名、性别、入校总分 7、打开学生表，拷贝所有的三好学生到表good中8、将学生表中所有男同学的数据(学号、姓名、性别、入校总分)拷贝到表one9、将one中所有数据彻底删除(提示：先要打开表one) 10、将学生表中女生的记录追加到one表中。六、实验记录（数据、现象、报表、软件、图象等）1。copy to abc for 入校总分=540 and 入校总分560 use sxm list use 学生 sort on 性别/d,入校总分/d to xbzf use xbzflist索引:1、 use 学生 index on -入校总分 to t1 list2、 index on 姓名 to t23、 index on 姓名 tag xm desc list index on 入校总分 tag rszf list index on 性别 tag xb desc list4、 index on 姓名 tag xm of th list index on 入校总分 tag rszf of th list index on 性别 tag xb desc of th list现在建立了 ： t1.idx t2.idx 学生.cdx(有子索引: namexmrszfxb) th.cdX(有子索引: xmrszfxb)七、实验数据、现象、报表、软件、图象等处理与分析通过上机验证 , 实验成功 , 达到预期目的八、问题与心得实验七 一、实验项目名称查询二、实验目的掌握查询的基本方法三、实验主要仪器设备、器材、药品、软件等微机和相应软件系统(VF)四、实验原理（实验装置）顺序查询的概念：索引查询的概念：五、实验内容、步骤以下内容对“学生”表进行操作：1、用顺序查询的方法查找两个姓张的同学的记录(思考:如果改为索引查询应该怎么做.)2、用顺序查询的方法查找第一个23岁的同学记录3、找出550分以上的女同学。思考：如将以上3个题都改为索引查询应该怎么做。六、实验记录（数据、现象、报表、软件、图象等）一1、locate for left(姓名，2)=张dispCONTINUEDISP索引方法:IDNEX ON 姓名 TAG XMSEEK 张或FIND 张2、LOCATE FOR YEAR(DATE()-YEAR(出生年月)=23索引方法:INDEX ON YEAR(DATE()-YEAR(出生年月) TO NNseek 23或find 233、LOCAT FOR 入校总分550 AND 性别=女索引方法:index on 入校总分550 AND 性别=女 TAG ZFXSEEK .T.DISP七、实验数据、现象、报表、软件、图象等处理与分析通过上机验证 , 实验成功 , 达到预期目的八、问题与心得实验八 一、实验项目名称统计、数据库的操作（1）二、实验目的运用统计命令解决实际问题，掌握数据的创建三、实验主要仪器设备、器材、药品、软件等微机和相应软件系统(VF)四、实验原理（实验装置）统计命令：COUNT，SUM数据库的创建命令五、实验内容、步骤1计算三好生人数。2、计算同学的平均年龄，平均总分成绩3、求出表中女生最大和最小的出生日期，入校总分的和。4建立汇总表，对男女同学的入校总分分别汇总。5建立汇总表，对同年出生的学生的入校总分分别汇总。6创建数据库：学生.dbc六、实验记录（数据、现象、报表、软件、图象等）1.COUNT FOR 三好生 TO A12、AVERAGE YEAR(DATE()-YEAR(出生年月)，入校总分 TO A2，A33、calculate MAX（出生年月），MIN（出生年月），SUM（入校总分） TO B1，B2，B3 for 性别=”女”4 USE 学生INDEX ON 性别 TAG xbTOTAL ON 性别 TO HZ1 FIEL 入校总分Use hz1list5、USE 学生INDEX ON YEAR（出生年月） TAG NYTOTAL ON YEAR（出生年月） TO HZ2 FIEL 入校总分USE HZ2LIST6.用命令创建 create database 学生七、实验数据、现象、报表、软件、图象等处理与分析通过上机验证 , 实验成功 , 达到预期目的八、问题与心得实验九 一、实验项目名称数据库的操作（2）、为数据库创建本地视图二、实验目的掌握数据库的创建以及库中表的建立了解和掌握数据库的数据字典熟悉有关数据库操作的各种命令三、实验主要仪器设备、器材、药品、软件等微机和相应软件系统(VF)四、实验原理（实验装置） 数据库的概念: 视图的概念五、实验内容、步骤1。创建一个名为学生的数据库。2。在数据库中添加下列表： student.dbf, 学生成绩.dbf ，课程.dbf,xsda.dbf3。在数据库中移去表xsda.dbf4。将student.dbf中的性别字段有效性规则设置为：只允许输入“男”或“女”5。在数据库中，为student.dbf, 学生成绩.dbf创建一对多的永久关系 为课程.dbf ，学生成绩.dbf 创建一对多永久关系6。设置参照完整性 步骤： （1）打开数据库设计器 （2）单击数据库主菜单，选择“清理数据库”命令 （3）单击数据库主菜单，选择“编辑参照完整性”命令 （4）观察参照完整性的规则与设置7。创建 视图1 要求：该视图包含学生的学号、姓名、性别、分数、课程名称注意：观察视图1在不在的默认目录里？六、实验记录（数据、现象、报表、软件、图像等）创建好学生数据后，默认目录里有以下文件：学生.DBC 学生.DCT 学生.DCX创建视图的过程:1. 在数据库设计器中, 选取student.dbf, 学生成绩.dbf ，课程.dbf三张表2. 在视图设计器中选择字段学号、姓名、性别、分数、课程名称3. 保存视图,取名为视图1观察: 视图1包含在数据库中，但不以文件的形式单独存在七、实验数据、现象、报表、软件、图象等处理与分析通过上机验证 , 实验成功 , 达到预期目的八、问题与心得实验十 一、实验项目名称结构化查询SQ L二、实验目的了解并掌握用SELECT-SQL命令进行查询的各种使用方法三、实验主要仪器设备、器材、药品、软件等微机和相应软件系统(VF)四、实验原理（实验装置）SELECT-SQL命令的功能: 可以对数据源进行各种组合, 有效地筛选记录, 管理数据, 并对结果进行排序。五、实验内容、步骤1设置好默认路径 ，所用表学生.DBF 选课.DBF 教师.DBF 授课.DBF 课程.DBF2.用SQ L完成以下查询(1) 查询选修了课程C140的学生学号和成绩,并按成绩降序排列 (2) 查询学生学号及其所选课程的门数 (3) 查询选课两门以上的学生学号及其所选课程的门数 (4)查询学生学号,姓名及其所选课程的成绩 (5)查询所有比吴红梅入校总分高的学生姓名和入校总分 (6) 查询和周密职称相同的教师的姓名,性别和职称 (7) 查询学生学号,姓名,性别并将结果输出到数据表DATAFORM中 (8)学生表中插入一条新记录 (9) 修改记录把陈静老师的职称改为副教授,工资改为1800(10) 删除刘伟教师的记录六、实验记录（数据、现象、报表、软件、图象等）(1) SELECT 学号,成绩; FROM 选课; WHERE 课程号=C140; ORDER BY 成绩 DESC(2) SELECT 学号，COUNT(*) AS 选课门数; FROM 选课; GROUP BY 学号(3)SELECT 学号，COUNT(*) AS 选课门数; FROM 选课; GROUP BY 学号; HAVING COUNT(*)2(4) SELECT 学生.学号，姓名,成绩; FROM 学生,选课; WHERE 学生.学号=选课.学号 (5) SELECT X.姓名,X.入校总分; FROM 学生 AS X,学生 AS Y; WHERE X.入校总分Y.入校总分 AND Y.姓名=吴红梅(6) SELECT 姓名,性别,职称; FROM 教师 ; WHERE 职称=(; SELECT 职称; FROM 教师; WHERE 姓名=周密; ); (7) SELECT 学号，姓名,性别; FROM 学生; INTO TABLE DATAFORM (8) INSERT INTO 学生(学号,姓名,性别,出生年月,入校总分,三好生); VALUES(S0301111,许昌,女,CTOD(02/05/84),588,T) (9) UPDATE 教师; SET 职称=副教授,工资=1800; WHERE 姓名=陈静(10) DELETE FROM 教师 WHERE 姓名=刘伟七、实验数据、现象、报表、软件、图象等处理与分析通过上机验证 , 实验成功 , 达到预期目的八、问题与心得实验十一 一、 实验项目名称程序设计(1)：程序初步、程序建立和运行；顺序、分支程序设计二、实验目的熟悉VFP命令文件的建立和执行掌握结构化程序设计的一般方法熟练掌握顺序,分支程序的设计与使用三、实验主要仪器设备、器材、药品、软件等微机和相应软件系统(VF)四、实验原理（实验装置）顺序结构: 完全用顺序语句组成的程序来执行程序条件分支结构: 根据是否满足一定条件来决定下一步的操作.五、实验内容、步骤设置好默认路径,设计程序完成以下任务: 1、根据输入的姓名来查找并修改该同学的记录2、根据输入的学号来删除学生表中指定的记录。3.编写程序p2.prg，功能为对于表学生.dbf，输入学号，如果有此同学就显示出来 如果没有此同学，就显示出： 对不起，没有该同学 注意：在学生表中，学号为字符型数据 4.编写程序完成输入一个整数，判断该整数能否被5整除，如果能被5整除则用格式化输出命令输出“该整数能被5整除”，否则输出“该整数不能被5整除。”5. 任意输入一个成绩,判断其成绩等级:10090为优秀,8980为良,7970为中，6960为及格,60以下的为不及格.六、实验记录（数据、现象、报表、软件、图象等）1. LEARUSE 学生accept 请输入需要修改的学生姓名: to name locate for 姓名=nameif found() 5,20 SAY “学号” GET 学号 5,40 SAY “姓名” GET 姓名 7,20 SAY “性别” GET 性别 7,40 SAY “出生年月” GET 出生年月 READ else ?没有该同学endifLISTCLOSE ALL2. clearaccept 请输入学号： to numloacte for 学号=numif found() dele wait 是否彻底删除(y/n)? to yn if yn=Y or yn=y pack endif returnelse ?没有该学号!endif RETURNRETURN3. clear close all use 学生index on 学号 to XH accept 请输入要查询人的学号： to N seek n if found() disp else ?对不起，没有找到此人 endif close all retur 4、CLEARinput 请输出一个数: to xif mod(x,5)=0 3,4 say 该数能被5整除else 3,4 say该数不能被5整除endifreturn5. CLEARINPUT 请输入成绩: TO mDO CASE CASE M=90 ?优秀 CASE M=80 ?良好 CASE M=70 AND M=69 AND M=580DO WHILE NOT EOF() DISP CONTINUEENDDOCLOSE ALL 用SCAN语句CLEAR use 学生scan FOR 入校总分=580 DISP ENDscanCLOSE ALL (2) use学生4,2 say *男生信息*5,2 say 学号+space(5)+姓名+space(5)+性别loca for性别=男do while not eof() row()+1,2 say学号+space(5)+ 姓名+space(5)+ 性别 contienddoclose allcancel(3)CLEARCLOSE ALLUSE 学生DO WHILE .T. append blank 5,20 SAY 学号 GET 学号 5,40 SAY 姓名 GET 姓名 7,20 SAY 性别 GET 性别 7,30 SAY 出生年月 GET 出生年月 9,20 SAY 入校总分 GET 入校总分 read WAIT 你想继续插入新记录吗?(Y/N) : TO X IF X=N OR X=n exit ENDIF CLEARENDDOCLEARLIS