Visual FoxPro 程序设计上机指导与习题
实验九 SQL语句、查询设计器的使用
【实验目的】
1.熟练的使用查询设计器对单表或多表进行查询。
2.了解SQL语句的用法，并能使用SQL语句实现简单的查询。 【实验内容】分别用SQL语句和查询设计器实现下列查询
1.从表rsgl.dbf中查找包含编号、部门名、姓名、性别，1960年1月1日以后出生的人员。
2.找出实发工资在1000元以上的职工所在的部门。
3.使用表rsgl.dbf和rsgz.dbf建立查询，要求查询结果包含编号、姓名、职务、应发工资、实发工资，并以实发工资排序。
4.查询职工中相同职称职工的平均基本工资，结果按平均基本工资升序排列。 【实验素材】
表rsgl.dbf,rsgz.dbf 【重点难点】
1. 多表查询,表间关系的设定. 2. 查询设计器6个选项卡的使用. 3. 查询输出的设定. 【讲解内容】
1. 多表查询时,表间关系的设定. 2. 查询表达式的设定. 3. 输出去向,图形输出的设定.
26
Visual FoxPro 程序设计上机指导与习题
实验十 数据库、数据词典、视图的建立
【实验目的】
1. 掌握数据库的建立及其对数据库表的添加删除等操作。 2. 掌握永久关系的建立 3. 掌握如何在数据库中建立视图 4. 了解数据词典包括的内容 【实验内容】
1.利用数据词典设置表rsda .dbf中性别字段只允许输入“男”或“女”，如果输入错误，系统将提示“性别只能是男或女”。性别字段默认值为“男”。
2.将rsda .dbf 、rsgz.dbf、 rsgl.dbf、rsbm .dbf四个表加入数据库rsgl.dbc中，并在四个表之间建立相应的永久关系。
3.利用数据库rsgl.dbc建立视图，建立一个本地视图，要求视图中包含rsgl.编号、rsgl.部门名、rsgl.姓名、rsda.职称、rsgz.基本工资字段，视图中只包含基本工资超过650元的记录。 【实验素材】
表rsda .dbf 、rsgz.dbf、 rsgl.dbf、rsbm .dbf,数据库rsgl.dbc 【重点难点】
1. 数据库中表的添加新建删除等操作. 2. 数据库表之间永久关系的操作. 3. 数据库中视图的操作. 【讲解内容】
视图的建立过程
27
Visual FoxPro 程序设计上机指导与习题
实验十一 程序的建立、运行，程序文件中专用命令
【实验目的】
掌握程序的建立、保存、运行的方法。掌握顺序执行语句的编写 【实验内容】
1.打开VFP，新建一个程序文件excercise1.prg，并保存。 2.打开程序文件excercise1.prg，编写代码，要求完成以下功能：
输出字符“中华人民共和国”，同行输出字符“烟台师范学院”，换行输出“现代教育技术教学部”
3.打开程序文件excercise1.prg，添加代码，要求完成以下功能：
(1)利用accept输入命令输入一个字符串，并将输入的字符串存入变量icode中。 (2)利用input输入命令输入一个字符串，并将输入的字符串存入变量icode1中。 (3)利用input输入命令输入一个数值，并将输入的字符串存入变量value1中。 (4)将icode、icode1、value1输出到屏幕上，要求输出到同一行。
4.建立程序文件excercise2.PRG，完成以下功能：
清屏，在屏幕上输出“请输入长方形的长：” “请输入长方形的宽：”，并将用户输入的长、宽输入到变量chang,kuan中。利用长方形的周长、面积公式求出周长、面积。并以“长方形的周长是XXX米”、“长方形的面积是XXX平方米”的形式显示出来。
5.新建程序excercise3.prg。编写代码，要求完成以下功能：
在屏幕上输出：“请输入您的用户名：”，同时可以将用户名输入，并存储于变量username中， 在屏幕上输出：“请输入您的年龄：”，同时可以将用户输入的数字存储于变量userage中。在屏幕上输出：“欢迎您，XXX，您是XXXX年出生的”，其中第一个XXX代表用户输入的用户名，第二个XXXX代表当前年减用户输入的年龄得到的出生年。
6.建立一个程序文件excercise2.prg，完成以下功能：
关闭信息显示开关，关闭安全开关，清屏。打开人事档案表：RSDA.dbf。显示：“请输入您想查找的人的姓名”，并将用户输入的姓名保存于变量username中（利用input命令或accept命令）。在表中查找记录（利用LOCATE命令），并显示记录。暂停操作。打开安全开关，打开信息显示开关。 【重点难点】
1． 重点：
a) 分别用命令和用菜单建立程序的方法 b) 程序的书写格式
c) 程序中的各输入输出命令以及程序专用命令 2． 难点：
28
Visual FoxPro 程序设计上机指导与习题
a) 比较wait、input、accept三条语句的异同。 b) input语句中
【讲解内容】
（1）语句：?|?? <表达式> ；比较?和??的区别 （2）wait、accept、input ；讲解各语句适用的范围
（3）@<行,列> [say <表达式1>] [get <变量名>] [default <表达式2>] ；强调变量的特殊性，要么要具有初值，要么要必须用default子句赋值
29
Visual FoxPro 程序设计上机指导与习题
实验十二 分支、循环结构程序设计
【实验目的】
掌握分支、循环结构程序的设计思路、设计方法 【实验内容】
1.打开VFP，新建一个程序文件excercise4.prg，并保存。 2.打开程序文件excercise4.prg，编写代码，要求完成以下功能：
利用Wait命令输入一个字符到变量yn中，判断yn的值，如果yn=’y’，则输出字符串“感谢您对我们的支持！！！”，否则输出“谢谢合作，再见！！！”
3.建立程序文件excercise5.PRG，完成以下功能：
清屏，在屏幕上输出“请输入第一个数：” “请输入第二个数：”，并将两个数保存到变量a、b中，将a、b按照大小顺序显示出来。
4.新建程序excercise6.prg。编写代码，要求完成以下功能：
给与用户提示：输入三个数，将这三个数按照从达到小的顺序依次列出（同一行）。
5.建立一个程序文件excercise7.prg，完成以下功能：
输入三角形的三个边长Ａ、Ｂ、Ｃ，若Ａ、Ｂ、Ｃ能构成三角形，则计算出三角形面积；否则提示“不能构成三角形！”。若构成的三角形为直角三角形，也给出“构成直角三角形”的提示。
6.建立一个程序文件excercise8.prg，完成以下功能：
编程序由键盘输入一个数，利用IIF( )函数求出该数所对应的函数F(X) 的值。其中：F(X)=X (X<0), F(X)=2*X (0
7.建立一个程序文件excercise9.prg，利用case语句完成以上功能。 8.建立一个程序文件excercise10.prg，完成功能:
某班学生计算机考试成绩已登记到COMPUTER.DBF自由表的成绩(N型)字段中，另有评估(C型)字段。编程序将每个学生的计算机成绩进行评估，评估分为：“优秀”(90－100)、“良好”(80－89)、“中等”(70－79)、“及格”(60－69)、“不及格”(0－59)五个等级，并将评估结果写到评估字段中。
9.建立一个程序文件excercise11.prg，完成功能:
分别利用while循环、for循环求出1至100以内的和，并显示结果。利用input命令输入一个整数，分别利用while循环、for循环求出它的阶乘，并将结果输出。
10.建立一个程序文件excercise12.prg，完成功能:
用试探法求解百鸡问题，“鸡翁一，值钱五；鸡母一，值钱三；鸡雏三，值钱一，百钱百鸡，问鸡翁、母、雏各几何？” 【重点难点】
30