普通高等教育 十二五 规划教材计算机系列规划教材 Visual FoxPro 程序设计实验与实训指导 ( 第二版 ) 刘建平刘广张颖主编吴磊刘世芳蔡洪涛副主编 科学出版社职教技术出版中心 www.aboo 北京
内容简介 本书是 Visual FoxPro 程序设计 ( 第二版 ) 的配套教材, 主要包括两方面的内容 : 上机实验和全国计算机等级考试 ( 二级 Visual FoxPro) 应试练习及参考答案 上机实验部分的实验内容与教材紧密配合, 每一个实验项目都有非常清晰的实验目的 实验要求 实验内容和实验操作步骤, 内容涵盖全部 Visual FoxPro 程序设计课程, 可帮助学生更好地完成教材的学习内容 ; 全国计算机等级考试 ( 二级 Visual FoxPro) 应试练习及参考答案部分可以作为学生课后自测, 也可以作为学生参加计算机等级考试的辅导材料 本书可作为高等院校的本科 高职高专 继续教育学院等开设数据库管理系统程序设计课程的实验指导用书, 也可作为自学参考书和计算机等级考试用书 图书在版编目 (CIP) 数据 Visual FoxPro 程序设计实验与实训指导 / 刘建平, 刘广, 张颖主编. 2 版. 北京 : 科学出版社,2015 ( 普通高等教育 十二五 规划教材 计算机系列规划教材 ) ISBN 978-7-03-045003-6 Ⅰ. 1V Ⅱ. 1 刘 2 刘 3 张 Ⅲ. 1 关系数据库系统 - 程序设计 - 高等学校 - 教学参考资料 Ⅳ. 1TP311.138 中国版本图书馆 CIP 数据核字 (2015) 第 131469 号 责任编辑 : 宋丽王丽丽 / 责任校对 : 王万红责任印制 : 吕春珉 / 封面设计 : 一克米工作室 北京东黄城根北街 16 号邮政编码 :100717 http://www.sciencep.com 出版 北骏杰印刷厂印刷科学出版社发行各地新华书店经销 *0 2012 年 5 月第一 版 2015 年 8 月第二 版 2015 年 8 月第四次印刷 开本 :787 1092 1/16 印张 :10 1/4 字数 :228 000 定价 :20.00 元 ( 如有印装质量问题, 我社负责调换 < 骏杰 >) 销售部电话 010-62134988 编辑部电话 010-62135319-2012 版权所有侵权必究举报电话 :010-64030229;010-64034315;13501151303
Visual FoxPro 程序设计实验与实训指导 ( 第二版 ) 编委会 主编刘建平刘广张颖副主编吴磊刘世芳蔡洪涛编委会 ( 按姓氏笔画排序 ) 王赫楠孙艳秋杨钧陈娜岳慧平谭强 科学出版社职教技术出版中心 www.aboo
第二版前言 在计算机技术迅猛发展 社会信息化进程加快的背景下, 为进一步推动高等学校的计算机基础教学改革和发展, 提高学生的实践操作能力, 从事计算机基础教学工作多年的一线骨干教师编写了 Visual FoxPro 程序设计 ( 第二版 )( 刘建平, 孙艳秋, 刘广主编, 科学出版社 ); 同时针对教材的实际内容, 编写了与之配套的实验指导书 Visual FoxPro 程序设计实验与实训指导 ( 第二版 ) 本书分为两个部分 第一部分为上机实验, 共包括 21 个实验, 每个实验按照实验目的 实验要求 实验内容和实验操作步骤 4 个部分组织编写 实验目的介绍了学生完成本实验需要了解 掌握的知识目标 ; 实验要求介绍了完成本实验需要掌握的主要知识点, 既为顺利完成实验做理论上的知识准备, 也为学生的课堂理论学习进行必要的总结和复习 ; 实验内容详细地介绍了实验需要完成的任务及实验所需要达到的效果 ; 实验操作步骤详细地介绍了完成各个实验内容的操作过程 第二部分为全国计算机等级考试 ( 二级 Visual FoxPro) 应试练习及参考答案, 教师可以通过应试练习考查学生对本门课程理论知识的掌握程度, 也可以将应试练习作为理论考试的参考试卷 学生可以通过分析自己对本门课程各部分理论知识的掌握程度, 查缺补漏 书中的所有实验项目均经过测试, 并对 Visual FoxPro 程序设计 ( 第二版 ) 中的 习题给出了参考答案 本书是在 Visual FoxPro 程序设计实验与实训指导 ( 第一版 ) 的基础上改编而成 编者根据近几年全国计算机等级考试 ( 二级 Visual FoxPro) 大纲的变化, 更新了部分上 机实验内容和应试练习题 因此本版教材的适用性更好 本书由刘建平 刘广 张颖担任主编, 吴磊 刘世芳 蔡洪涛担任副主编, 孙艳秋 岳慧平 谭强 杨钧 王赫楠 陈娜参与了本书的编写工作, 在此向编写过程中曾经帮 助我们的同志们表示衷心的感谢 由于编写时间较短, 加之水平和经验所限, 书中难免有疏漏和不妥之处, 真诚希望 读者批评指正 科学出版社职教技术出版中心 www.aboo 编者 2015 年 3 月
第一版前言 本书是 Visual FoxPro 程序设计 ( 刘建平 吴磊主编, 科学出版社 ) 的配套教材 本书在实验设计中充分考虑到 Visual FoxPro 教学大纲的要求, 结合教学中的重点 难点选择实验项目, 每一个实验项目都有非常清晰的实验目的 实验要求 实验内容 实验操作步骤, 内容涵盖 Visual FoxPro 程序设计的全部知识, 使学生可以理解并掌握每个知识点的实用性 技巧性和完整性 本书还设计了四套全国计算机等级考试 ( 二级 Visual FoxPro) 应试练习供学生使用, 以便学生能更好地理解和掌握程序设计的精髓 在编写本书的过程中考虑到 Visual FoxPro 程序设计 是一门实践性很强的课程, 没有足够的上机实践很难掌握其精髓, 因此为便于学生更好地学习, 编者针对教学中的重点内容安排了 21 个实验项目, 在面向过程的程序设计实验中, 注重培养学生科学严谨的编程思想, 熟练地掌握 Visual FoxPro 的命令 SQL 语句, 提高模块化程序设计的能力 ; 在面向对象的程序设计中, 注重培养学生掌握可视化窗口程序设计的方法, 以及控件 工具 属性 编码的使用技巧, 能够真正提高学生运用数据库管理系统解决实际问题的能力 书中的所有实验项目均经过测试, 同时还给出了 Visual FoxPro 程序设计 中习题 的参考答案 本书可以作为高等院校的本科 高职高专及继续教育学院等开设数据库管理系统程 序设计课程的教材, 也可作为自学参考书和全国计算机等级考试 ( 二级 Visual FoxPro) 参考用书 本书由刘建平 杨钧担任主编, 孙艳秋 张颖 吴磊 刘广 刘世芳 岳慧平 谭 强参加了编写, 在此向编写过程中为编者提供帮助的同志们表示衷心的感谢 指正 由于编写时间仓促, 水平和经验所限, 书中难免有疏漏和错误之处, 恳请读者批评 科学出版社职教技术出版中心 www.aboo 编者 2012 年 2 月
目 录 第一部分上机实验 实验 1 Visual FoxPro 6.0 初步使用 3 实验 2 项目管理器的操作 10 实验 3 数据运算 15 实验 4 建立数据库和表 18 实验 5 表的修改与维护 23 实验 6 数据的排序和索引 26 实验 7 数据表之间的永久关联及数据完整性 31 实验 8 SQL 语句 36 实验 9 查询文件的建立及相关操作 41 实验 10 视图的建立及相关操作 47 实验 11 分支结构程序设计 51 实验 12 循环结构程序设计 56 实验 13 模块结构程序设计 60 实验 14 表单设计 ( 一 ) 63 科学出版社职教技术出版中心 www.aboo 实验 15 表单设计 ( 二 ) 70 实验 16 常用表单控件 ( 一 ) 74 实验 17 常用表单控件 ( 二 ) 76 实验 18 常用表单控件 ( 三 ) 78 实验 19 菜单设计 81 实验 20 报表设计 84
Visual FoxPro 程序设计实验与实训指导 ( 第二版 ) 实验 21 应用系统开发 90 第二部分全国计算机等级考试 ( 二级 Visual FoxPro) 应试练习及参考答案应试练习 ( 一 ) 109 应试练习 ( 一 ) 参考答案 116 应试练习 ( 二 ) 119 应试练习 ( 二 ) 参考答案 126 应试练习 ( 三 ) 129 应试练习 ( 三 ) 参考答案 136 应试练习 ( 四 ) 138 应试练习 ( 四 ) 参考答案 147 附录 Visual FoxPro 程序设计 ( 第二版 ) 习题参考答案 149 vi
第一部分上机实验 科学出版社职教技术出版中心 www.aboo
实验 1 Visual FoxPro 6.0 初步使用 实验目的 1) 了解 Visual FoxPro 6.0 的运行环境 2) 掌握 Visual FoxPro 6.0 的安装方法 3) 学会 Visual FoxPro 6.0 的启动与退出方法 4) 掌握 Visual FoxPro 6.0 的系统环境配置方法 实验要求 1) 熟练掌握 Visual FoxPro 6.0 的安装方法 2) 熟练掌握启动与退出 Visual FoxPro 6.0 的各种方法 3) 掌握 Visual FoxPro 6.0 的系统环境配置方法 实验内容 1) 安装 Visual FoxPro 6.0 2) 用多种方法启动与退出 Visual FoxPro 6.0 3) 用多种方法显示与隐藏命令窗口 4) 使用 选项 对话框配置 Visual FoxPro 6.0 的系统环境, 包括设置日期和时间的显示方式 默认目录和搜索路径, 具体要求如下 1 设置日期格式为年月日形式, 设置时间格式为精确到秒的 12 小时制形式 2 在 D 盘驱动器上创建一个文件夹, 将此文件夹命名为 VFP, 设置此文件夹为默认目录和搜索路径 实验操作步骤 1. 安装 Visual FoxPro 6.0 科学出版社职教技术出版中心 www.aboo 在 Windows 7 操作系统环境下, 可通过 DVD 光盘来安装 Visual FoxPro 6.0, 其主要的操作步骤如下 : 1) 将 Visual FoxPro 6.0 系统的 DVD 光盘放入光盘驱动器中, 安装向导会自动启动, 并打开如图 1.1 所示的安装向导界面 如果没有打开如图 1.1 所示的界面, 则应执行 开始 运行 命令, 在弹出的 运行 对话框中的 打开 文本框中输入 X:\setup.exe
Visual FoxPro 程序设计实验与实训指导 ( 第二版 ) (X 表示光盘驱动器的盘符 ), 然后单击 确定 按钮, 即可打开如图 1.1 所示的界面 2) 单击 下一步 按钮, 打开如图 1.2 所示的界面, 点选 接受协议 单选按钮, 并单击 下一步 按钮, 打开如图 1.3 所示的界面 图 1.1 Visual FoxPro 6.0 安装向导界面 图 1.2 询问是否接受协议 3) 在图 1.3 的 请输入产品的 ID 号 文本框中输入 10 个 1, 姓名 和 公司名称 文本框随意输入, 然后单击 下一步 按钮 4) 继续按照向导进行操作后, 这时会打开如图 1.4 所示的界面, 在该界面中指定 Visual Studio 6.0 应用程序共享文件的存放位置, 单击 浏览 按钮可以对共享文件夹进行更改, 选择好存放位置后, 单击 下一步 按钮 4
第一部分上机实验 图 1.3 输入产品 ID 号 图 1.4 共享文件存放位置 科学出版社职教技术出版中心 www.aboo 5) 此时会出现一个界面来告知用户所安装的 Visual FoxPro 6.0 的产品标识号, 单击 确定 按钮即可打开如图 1.5 所示的界面, 提示用户选择安装的类型, 对于高级用户, 可以选择 自定义安装, 普通用户可以选择 典型安装, 通常 典型安装 已经能够满足用户要求, 并且这样可以简化操作, 另外, 在此界面还需要指定应用程序的安装位置,Visual FoxPro 6.0 系统默认的安装位置为 C:\Program Files\Microsoft Visual Studio\Vfp98, 如果需要更改到其他的安装路径, 则可以单击 更改文件夹 按钮来对安装位置进行更改, 此处选择 典型安装 5
Visual FoxPro 程序设计实验与实训指导 ( 第二版 ) 6) 安装程序开始将文件复制到硬盘中, 如果用户要终止安装过程, 只要单击 取 消 按钮即可 复制完所有的文件之后, 打开如图 1.6 所示的界面, 单击 确定 按钮 图 1.5 选择安装类型 图 1.6 完成安装 7) 打开如图 1.7 所示的界面, 询问用户是否安装 MSDN, 单击 退出 按钮, 完 成整个安装过程 图 1.7 安装 MSDN 2. 启动与退出 Visual FoxPro 6.0 (1) 启动 Visual FoxPro 6.0 启动 Visual FoxPro 6.0 有多种方法, 通常采用以下 3 种方法 : 6
第一部分上机实验 1) 从 开始 菜单中启动 执行 开始 程序 Microsoft Visual FoxPro 6.0 命令, 启动 Visual FoxPro 6.0 2) 从 Windows 资源管理器窗口中启动 执行 开始 程序 附件 Windows 资源 管理器 命令, 打开 Windows 资源管理器窗口 ; 在资源管理器中找到 C:\Program Files\Microsoft Visual Studio\Vfp98 目录, 再从此目录下找到 VFP6 图标, 双击 VFP6 图标, 完成 Visual FoxPro 6.0 的启动 3) 从 运行 对话框中启动 执行 开始 运行 命令, 弹出 运行 对话框 ; 在 打开 文本框中输入 \VFP6.EXE, 单击 确定 按钮, 完成 Visual FoxPro 6.0 的 启动 (2) 退出 Visual FoxPro 6.0 退出 Visual FoxPro 6.0 可以使用以下 5 种方法 : 1) 在 Visual FoxPro 6.0 主菜单中, 执行 文件 退出 命令 2) 按 Alt+F4 组合键 3) 按 Ctrl+Alt+Delete 组合键, 打开 Windows 任务管理器 窗口, 选择 应用程 序 选项卡中的 Microsoft Visual FoxPro 任务, 单击 结束任务 按钮 4) 在 Visual FoxPro 6.0 环境窗口中单击 退出 按钮 5) 在命令窗口中, 输入 QUIT 命令, 并按 Enter 键执行 3. 显示与隐藏命令窗口 命令窗口的显示与隐藏可以通过以下 3 种方法实现 : 1) 可以通过 窗口 菜单项控制, 执行 窗口 隐藏 命令, 可以关闭命令窗口 ; 执行 窗口 命令窗口 命令, 可以显示命令窗口 2) 执行 常用 命令窗口 命令, 显示或隐藏命令窗口 3) 可以通过按 Ctrl+F2 组合键来显示命令窗口, 按 Ctrl+F4 组合键来隐藏命令窗口 4. 使用 选项 对话框配置 Visual FoxPro 6.0 的系统环境 科学出版社职教技术出版中心 www.aboo (1) 设置日期和时间的显示方式执行 工具 选项 命令, 即可弹出如图 1.8 所示的 选项 对话框, 选择 区域 选项卡, 可以设置日期和时间的显示方式 在 日期格式 下拉列表框中选择 汉语, 则日期就自动变成年月日的格式, 并设置时间格式为精确到秒的 12 小时制形式 (2) 设置默认目录和搜索路径首先, 在 C 盘驱动器下新建一个文件夹, 将此文件夹命名为 vfp 然后, 执行 工具 选项 命令, 即可打开如图 1.9 所示的 选项 对话框, 选择 文件位置 选项卡, 设置用户自己的默认目录和搜索路径, 具体设置步骤如下 : 7
Visual FoxPro 程序设计实验与实训指导 ( 第二版 ) 图 1.8 选项 对话框 图 1.9 选项 对话框中的 文件位置 选项卡 1) 在 文件类型 下拉列表框中选择 默认目录, 然后单击 修改 按钮, 将弹出如图 1.10 所示的 更改文件位置 对话框 2) 在 更改文件位置 对话框中勾选 使用默认目录 复选框, 然后在 定位默认目录 文本框中输入 c:\vfp 作为默认磁盘目录, 或者单击该文本框右侧的 8
第一部分上机实验 按钮, 在弹出的 选择目录 对话框中选择 c:\vfp 作为默认磁盘目录, 然后单击 选定 按钮关闭 选择目录 对话框 3) 单击 确定 按钮, 关闭 更改文件位置 对话框 4) 在 文件类型 下拉列表框中选中 搜索路径, 然后单击 修改 按钮, 将弹出与图 1.10 类似的 更改文件位置 对话框 5) 在 更改文件位置 对话框的 定位搜索路径 文本框中输入 c:\vfp 作为搜索路径, 或者单击该文本框右侧的 按钮, 在弹出的 选择 对话框中选择 c:\vfp 作为搜索路径, 然后单击 选定 按钮, 关闭 选择 对话框 6) 单击 确定 按钮, 关闭 选项 对话框, 则用户所做的设置仅在本次 Visual FoxPro 6.0 运行期间有效 值得注意的是, 若要永久保存用户所做的设置, 则应在单击 确定 按钮关闭 选项 对话框之前, 单击对话框右下角的 设置为默认值 按钮 图 1.10 更改文件位置 对话框 科学出版社职教技术出版中心 www.aboo 9
Visual FoxPro 程序设计实验与实训指导 ( 第二版 ) 实验 2 项目管理器的操作 实验目的 1) 掌握新建和打开项目文件的方法 2) 掌握使用项目管理器组织文件的方法 3) 学会定制项目管理器 实验要求 1) 熟练掌握新建项目及打开已有项目两种情况下的项目管理器的启动方法 2) 熟练掌握项目管理器的操作方法及使用项目管理器组织文件的方法 3) 掌握定制项目管理器的方法 实验内容 1) 在实验 1 所创建的文件夹下, 建立一个项目文件, 项目文件名为 用户项目 2) 在关闭所创建的 用户项目 文件的前提下, 打开 用户项目 文件 3) 使用项目管理器组织文件 4) 使用多种方法定制项目管理器 实验操作步骤 1. 建立项目文件 1) 执行 文件 新建 命令, 或者单击常用工具栏的 新建 按钮, 弹出 新建 对话框, 如图 2.1 所示 2) 点选 项目 单选按钮, 然后单击 新建文件 按钮, 弹出 创建 对话框, 如图 2.2 所示, 在 保存在 下拉列表框中选择在实验 1 中所创建的文件夹名, 在 项目文件 文本框中输入 用户项目, 作为新建项目文件的项目名 3) 单击 保存 按钮, 即创建了一个名为 用户项目 的新项目文件, 并打开如图 2.3 所示的项目管理器窗口 10
第一部分上机实验 图 2.1 新建 对话框 图 2.2 创建 对话框 2. 打开项目文件 图 2.3 项目管理器 1) 执行 文件 打开 命令, 或者单击常用工具栏的 打开 按钮, 弹出 打开 对话框, 如图 2.4 所示 2) 在 文件类型 下拉列表框中选择 项目 (*.pjx;*.fpc;*.cat) 选项 3) 双击 用户项目 选项, 即可打开指定的项目, 打开如图 2.3 所示的项目管理器窗口 3. 使用项目管理器组织文件 科学出版社职教技术出版中心 www.aboo (1) 在项目管理器中新建一个文件在打开的 用户项目 项目管理器中, 选择想要建立的文件类型, 单击 新建 按钮, 即可在打开的设计器中建立文件 11
Visual FoxPro 程序设计实验与实训指导 ( 第二版 ) 图 2.4 打开 对话框 (2) 在项目管理器中修改一个文件在打开的 用户项目 项目管理器中, 选择想要修改的文件, 单击 修改 按钮, 按照所出现的设计器类型修改文件 (3) 向项目管理器中添加一个文件在打开的 用户项目 项目管理器中, 选择想要添加的文件类型, 单击 添加 按钮, 在 打开 对话框中, 选择所要添加文件的存放位置及名称, 单击 确定 按钮即可完成添加操作 (4) 从项目管理器中移去或删除一个文件在打开的 用户项目 项目管理器中, 选择想要移去的文件类型, 单击 移去 按钮, 在弹出的对话框中, 选择所要移去文件的存放位置及名称, 单击 确定 按钮, 弹出如图 2.5 所示的对话框 在此对话框中, 如果单击 移去 按钮, 则可以将所选文件移出项目管理器 ; 如果单击 删除 按钮, 则可以将所选文件从计算机中删除 图 2.5 从项目管理器中移去或删除一个文件 12
第一部分上机实验 4. 定制项目管理器 (1) 移动位置和改变窗口大小打开 用户项目 项目管理器, 将鼠标指针放在标题栏上, 然后拖动标题栏, 即可移动项目管理器的位置 如果将鼠标指针放在项目管理器窗口边线或对角线上, 拖动窗口边线或对角线, 则可调整项目管理器窗口大小 (2) 展开和折叠项目管理器打开 用户项目 项目管理器, 单击项目管理器右上角的向上箭头, 可以将项目管理器折叠起来, 这时的箭头变为向下, 如图 2.6 所示, 再单击向下箭头又可以将项目管理器展开 图 2.6 折叠项目管理器 项目管理器折叠后, 可以将选项卡从项目管理器中拖出, 使其成为一个独立的浮动的选项卡, 图 2.7 所示是将 数据 和 文档 两个选项卡拖出后的示例, 此时, 项目管理器中的 数据 选项卡和 文档 选项卡变为无效的灰色 如果要还原选项卡, 可以单击选项卡上的关闭按钮, 或将选项卡拖回项目管理器中 图 2.7 拖出 数据 和 文档 选项卡 科学出版社职教技术出版中心 www.aboo (3) 船坞化项目管理器打开 用户项目 项目管理器, 双击项目管理器标题栏, 即可将项目管理器船坞化, 如图 2.8 所示, 它将成为 Visual FoxPro 6.0 主界面工具栏的一部分 如果要取消项目管理器船坞化, 可以在项目管理器任一选项卡上右击, 选择 拖走 命令, 即可恢复为初始状态 13
Visual FoxPro 程序设计实验与实训指导 ( 第二版 ) 图 2.8 船坞化项目管理器 14
第一部分上机实验 实验 3 数据运算 实验目的 1) 掌握基本输出命令和赋值语句的使用方法 2) 掌握常量和变量的分类及其使用方法 3) 掌握表达式中各类运算符的含义及其使用方法, 并能熟练书写各类表达式 4) 掌握常用函数及其应用 实验要求 1) 熟练掌握基本输出命令的使用方法 2) 熟练掌握赋值语句的使用方法 3) 熟练掌握数据的 4 种类型的使用方法 实验内容 1) 常量的输出 2) 变量的输出 3) 表达式的输出 4) 常用函数的输出 实验操作步骤 1. 常量的输出 常量的输出语句如下 :?64,-724.3,3.14159265?1.5E4,-2.68E-3?" 程序设计 ","12.3", Visual FoxPro?[computer],[" 计算机 "],"He s a student."?$0.45,$-23.6789?.t.,.f.?{^2015-09-10},{^2015-09-10,08:30:00 a} 上面各输出语句的执行结果如下所示 : 科学出版社职教技术出版中心 www.aboo 15
Visual FoxPro 程序设计实验与实训指导 ( 第二版 ) 64-724.3 3.14159265 15000-0.00268 程序设计 12.3 Visual FoxPro computer " 计算机 " He s a student. 0.4500-23.6789.T..F. 09/10/15 09/10/15 08:30:00 AM 2. 变量的输出 变量的输出语句如下 : X=18.6?"X=",X STORE 3*4+6 TO Y,Z X=Y+Z?"X=",X,"Y=",Y,"Z=",Z Y=" 计算机 "??Y DIMENSION X(2,3) X(1,1)="001"?X(1,1) X(2)=" 张三 " STORE " 男 " TO X(1,3)?X(2),X(3) X(2,1)=X?X(4) X=X(6)?X(4) 上面各输出语句的执行结果如下所示 : X= 18.6 X= 36 Y= 18 Z= 18 计算机 001 张三男 001.F. 3. 表达式的输出 表达式的输出语句如下 : STORE "327" TO X STORE "213" TO Y 16
第一部分上机实验 STORE X+Y+"209" TO Z?Z?[ 辽宁 ]+" 中医 "?"X">"Y","x">"y","2">"1"?(10+3)>15 AND "ab"$"abcde"??(2+2^(2+2))/(2+2)? 0<1 AND "0"<"1" 上面各输出语句的执行结果如下所示 : 327213209 辽宁中医.F..F..T..F. 4.50.T. 4. 函数的输出 函数的输出语句如下 :?STR(134.26,6,1)?AT(" 教授 "," 副教授 ") X="A"+LTRIM("123")+"B"?X,LEN(X)?"X"=UPPER("x")?[ 中国 ]+SPACE(5)+" 辽宁 "?MOD(23,2)>MIN(20.4,12)?321+VAL("32A1")?LEFT("123456789",LEN(" 计算机 "))?YEAR(CTOD("^2015-09-10"))+1?TYPE("09/10/15"),TYPE("{^2015-09-10}") 上面各输出语句的执行结果如下所示 : 134.3 3 A123B 5.T. 中国辽宁.F. 353.00 123456 2016 N D 科学出版社职教技术出版中心 www.aboo 17
Visual FoxPro 程序设计实验与实训指导 ( 第二版 ) 实验 4 建立数据库和表 实验目的 1) 掌握数据库的建立和维护方法 2) 掌握创建表的方法 3) 掌握数据表与自由表转化的方法 实验要求 1) 熟练掌握数据库的创建和维护方法, 学会使用数据库设计器 2) 熟练掌握创建表文件的方法及表设计器的使用方法 3) 掌握表的修改方法 实验内容 1) 在实验 2 所创建的项目 用户项目 中创建数据库 教工 2) 在教工数据库中创建数据表 profile, 如表 4.1 所示 3) 在教工数据库中创建数据表 salary, 如表 4.2 所示 4) 在教工数据库中创建数据表 course, 如表 4.3 所示 表 4.1 profile 表 编号 (C,4) 姓名 (C,6) 性别 (C,2) 出生日期 (D,8) 职称 (C,6) 工龄 (N,2,0) 婚否 (L,1) 简历 (Memo) 照片 (Gen) 1001 张志国 男 09/24/87 助教 2.F. Memo Gen 1002 王静 女 10/11/84 讲师 4.F. Memo Gen 2001 李宁 男 06/25/80 副教授 10.T. Memo Gen 3001 赵媛媛 女 04/08/82 讲师 5.T. Memo Gen 2002 王佳丽 女 05/06/65 教授 23.T. Memo Gen 1003 李娜 女 10/13/87 助教 2.F. Memo Gen 3002 陈龙 男 02/06/74 副教授 15.T. Memo Gen 2003 蒋冠军 男 09/17/83 讲师 8.T. Memo Gen 18
第一部分上机实验 表 4.2 salary 表 编号 (C,4) 姓名 (C,6) 基本工资 (N,7,2) 奖金 (N,7,2) 津贴 (N,7,2) 扣款 (N,6,2) 实发工资 (N,7,2) 1001 张志国 1500.00 300.00 280.00 50.00 0.00 1002 王静 1800.00 500.00 320.00 100.00 0.00 2001 李宁 2300.00 800.00 550.00 120.00 0.00 3001 赵媛媛 1800.00 500.00 320.00 120.00 0.00 2002 王佳丽 3500.00 1200.00 860.00 320.00 0.00 1003 李娜 1500.00 300.00 280.00 80.00 0.00 3002 陈龙 2500.00 800.00 550.00 120.00 0.00 2003 蒋冠军 1900.00 500.00 320.00 100.00 0.00 编号 (C,4) 课程号 (C,2) 表 4.3 course 表 课程名 (C,16) 学时 (N,2,0) 考试方式 (C,4) 1001 01 计算机基础与应用 90 考试 1001 05 心理健康 36 考查 1002 01 计算机基础与应用 90 考试 1002 02 中医学基础 72 考试 1002 04 高等数学 72 考试 2001 05 中药学 36 考查 3001 01 计算机基础与应用 90 考试 3001 03 中药学 36 考查 2002 05 心理健康 36 考查 1003 02 中医学基础 72 考试 3002 04 高等数学 72 考试 3002 07 生物化学 72 考试 实验操作步骤 1. 建立数据库 (1) 在项目管理器中建立数据库 1) 打开项目管理器, 在 数据 选项卡中选择 数据库, 如图 4.1 所示 2) 单击 新建 按钮, 弹出 新建 对话框, 单击 新建文件 按钮, 在弹出的 创建 对话框中输入数据库名, 如 教工, 单击 保存 按钮, 打开 数据库设计器 窗口 科学出版社职教技术出版中心 www.aboo 19
Visual FoxPro 程序设计实验与实训指导 ( 第二版 ) (2) 用菜单方式建立数据库 1) 执行 文件 新建 命令或单击常用工具栏上的 新建 按钮, 弹出 新建 对话框, 如图 4.2 所示 2) 在 文件类型 选项卡中点选 数据库 单选按钮, 然后单击 新建文件 按钮 其他步骤与在项目管理器中创建数据库相同 (3) 用命令方式建立数据库用命令方式建立数据库的语句为 CREATE DATABASE 教工 图 4.1 项目管理器中的 数据 选项卡 图 4.2 新建 对话框 20
第一部分上机实验 2. 在教工数据库中创建表 (1) 在项目管理器中创建数据表 profile 1) 在项目管理器的 数据 选项卡中展开数据库 教工 的分支, 选择 表, 然后单击 新建 按钮, 弹出 新建表 对话框, 单击 新建表 按钮, 弹出 创建 对话框, 如图 4.3 所示 2) 输入表名 profile, 单击 保存 按钮, 弹出 表设计器 对话框, 如图 4.4 所示 图 4.3 创建 对话框 图 4.4 表设计器 对话框 科学出版社职教技术出版中心 www.aboo 3) 在 表设计器 对话框的 字段 选项卡中, 输入各字段的字段名 类型和宽度等信息 输入完成后, 单击 确定 按钮, 完成表结构的创建, 同时出现输入信息提 21
Visual FoxPro 程序设计实验与实训指导 ( 第二版 ) 示框 4) 单击 是 按钮, 打开输入记录窗口, 如图 4.5 所示, 可以立刻输入记录 ; 如果 单击 否 按钮, 则暂时不输入记录 (2) 用菜单方式创建数据表 salary 图 4.5 输入记录 窗口 1) 打开 教工 数据库 2) 执行 文件 新建 命令或单击常用工具栏上的 新建 按钮, 弹出 新建 对话框, 如图 4.2 所示 3) 在 文件类型 选项卡中选择 表, 然后单击 新建文件 按钮 其他步骤与在项目管理器中创建数据表相同 (3) 用命令方式创建数据表 course 用命令方式创建数据表 course 的语句如下 : OPEN DATABASE 教工 CREATE course 其他步骤同上 3. 修改表的结构 表结构的修改在表设计器中完成, 把 salary 表的 实发工资 字段总宽度修改成 8 位, 操作如下 : 1) 在项目管理器中修改数据表 salary 的结构, 只需在项目管理器中单击 salary 表的名字, 然后单击 修改 按钮即可 2) 用命令方式修改表结构的语句如下 : USE salary MODIFY STRUCTURE 22
第一部分上机实验 实验 5 表的修改与维护 实验目的 掌握数据表中记录的浏览 定位 删除和替换等基本操作 实验要求 1) 熟练掌握记录的浏览 显示操作方法 2) 熟练掌握记录指针的定位的两种方法 3) 掌握记录删除的方法 实验内容 1) 表数据的显示 查看和修改可以利用菜单实现, 也可利用 BROWSE CHANGE EDIT 等窗口命令来实现 2) 记录指针的定位 将记录指针指向某个记录, 使之成为当前记录, 定位的方法有两种 : 绝对定位和相对定位 实验操作步骤 1. 打开 profile.dbf 1) 显示第 3 个记录开始的 3 个记录 在命令窗口输入 : USE profile GO 3 DISPLAY NEXT 3 2) 显示职称是讲师的记录 在命令窗口输入 : USE profile DISPLAY FOR 职称 =" 讲师 " 3) 显示 profile 表中性别为女的职工的编号 姓名 性别 职称字段 在命令窗口输入 : USE profile && 打开 profile 表 BROWSE FIELDS 编号, 姓名, 性别, 职称 FOR 性别 =" 女 " 科学出版社职教技术出版中心 www.aboo 23
Visual FoxPro 程序设计实验与实训指导 ( 第二版 ) 4) 修改 profile 表中的记录, 第 7 条记录陈龙的职称有误, 应更正为讲师, 婚否为已婚 在命令窗口中输入 EDIT 7, 按 Enter 键, 会打开如图 5.1 所示的编辑窗口, 可在此窗口中将鼠标指针定位到需要修改的记录的相应字段位置, 然后进行修改 图 5.1 修改记录 修改完毕后, 单击编辑窗口的 关闭 按钮或按 Ctrl+W 组合键完成对记录的修改操作 5) 打开 profile.dbf, 将最后两个记录逻辑删除 操作方法有如下两种 1 打开 profile 表, 在浏览窗口单击第 7 条和第 8 条记录旁的删除区 ( 使其变黑 ), 如图 5.2 所示 2 在命令窗口中输入 : GO BOTTOM 图 5.2 逻辑删除 24
第一部分上机实验 SKIP -1 DELETE NEXT 2 2. 打开 salary.dbf 1) 在 salary 表中, 把每人实发工资增加 200 元 操作步骤如下 在命令窗口中输入 : USE salary BROWSE && 替换显示结果如图 5.3 所示 REPLACE ALL 实发工资 WITH 实发工资 +200 BROWSE && 替换后显示结果如图 5.4 所示 图 5.3 替换前显示结果 图 5.4 替换后显示结果 2)profile 表中的第 4 条记录作为当前记录, 操作方法有如下两种 1 在浏览窗口直接单击第 4 条记录确定 2 在命令窗口中输入 : USE profile GO 4 科学出版社职教技术出版中心 www.aboo 25
Visual FoxPro 程序设计实验与实训指导 ( 第二版 ) 实验 6 数据的排序和索引 实验目的 掌握排序和索引的各种方法, 为以后数据查询 建立参照完整性等做准备 实验要求 1) 熟练掌握排序的方法 2) 熟练掌握利用表设计器建立和用命令完成索引的操作方法 实验内容 1) 练习表的排序 排序是将表中的记录按顺序重新排列, 排序后将产生一个新表 排序的命令是 SORT 2) 练习表的索引 索引是按某个索引关键字来建立记录的逻辑顺序 索引分为主索引 候选索引 唯一索引和普通索引 利用表设计器建立索引较为方便, 也可使用命令建立索引 实验操作步骤 1. 用命令方式排序表中记录 将 salary 表中所有记录按实发工资升序排序, 生成表 工资排序.dbf 在命令窗口中输入 : USE salary BROWSE SORT ON 实发工资 TO 工资排序 USE 工资排序 BROWSE && 显示的排序结果如图 6.1 所示 USE 26
第一部分上机实验 2. 用表设计器建立或修改索引 (1) 为 profile 表姓名建立单项索引 图 6.1 按工资升序排序结果 1) 打开 profile 表后, 执行 显示 表设计器 命令, 或在命令窗口输入 MODIFY STRUCTURE, 均可弹出 表设计器 对话框 2) 在 表设计器 对话框的 字段 选项卡中, 可以直接指定某个字段是否为索 引项 如图 6.2 所示, 选中某个字段后, 单击其 索引 下拉列表框, 可以选择 无 升序 或 降序 如果选择 升序 或 降序, 则将建立一个对应当前字段的普通 索引, 此索引项的标识名与该字段同名, 索引表达式即为该字段变量 图 6.2 在表设计器中建立索引 科学出版社职教技术出版中心 www.aboo 对于已经建立的索引, 如果要改变为其他类型的索引, 可切换到 索引 选项卡, 然后根据需要从 类型 下拉列表框中选择 普通索引 候选索引 或 唯一索引, 如图 6.3 所示 如果当前打开的是数据库表, 则还可以选择 主索引 27
Visual FoxPro 程序设计实验与实训指导 ( 第二版 ) 图 6.3 改变索引类型 (2) 为 profile 表性别和出生日期建立复合字段索引如果索引是基于一个字段的, 那么按以上办法建立索引即可, 另外还可以按照多个字段建立索引 在多个字段上的索引称为复合字段索引, 建立复合字段索引的步骤如下 1) 在图 6.3 所示的 索引 选项卡中单击 插入 按钮, 这时会在界面中出现一新行 2) 在 索引名 文本框中输入索引名 3) 从 类型 下拉列表框选择索引类型, 如图 6.4 所示 图 6.4 选择索引类型界面 28
第一部分上机实验 4) 单击 表达式 文本框右侧的 按钮, 弹出 表达式生成器 对话框, 如 图 6.5 所示 图 6.5 表达式生成器 对话框 5) 在表达式生成器中输入索引表达式, 最后单击 确定 按钮 (3) 用命令为 profile 表建立一个结构复合索引文件 该结构复合索引文件包括一个按姓名索引的标识 xm 和一个按性别与出生日期索 引的标识 xbcsrq 再创建一个名为 jszc 的非结构复合索引文件, 包含一个按职称 索引的标识 zc 在命令窗口中输入 : USE profile INDEX ON 姓名 TAG xm BROWSE && 显示结果按姓名排序 INDEX ON 性别 +DTOC( 出生日期,1) TAG xbcsrq BROWSE && 显示结果如图 6.6 所示 INDEX ON 职称 TAG zc OF jszc BROWSE USE && 显示结果按职称排序 科学出版社职教技术出版中心 www.aboo 29
Visual FoxPro 程序设计实验与实训指导 ( 第二版 ) 图 6.6 按性别与出生日期索引的结果 30
第一部分上机实验 实验 7 数据表之间的永久关联及数据完整性 实验目的 1) 掌握建立数据表之间永久关联的操作方法 2) 掌握建立字段 设定记录级规则和建立参照完整性的方法 实验要求 1) 熟练掌握建立数据表之间的永久关联的操作方法 2) 熟练掌握建立参照完整性的方法 实验内容 1) 建立 教工 数据库中 profile 表和 salary 表间的永久关联 2) 设置表中字段 记录的有效性规则 3) 设置数据库表间的参照完整性 实验操作步骤 1. 为 profile 表和 salary 表建立永久关联 1) 如果需要建立关系的表的索引还没有建立, 则需先用 表设计器 为相应的表建立索引, 并打开 数据库设计器 窗口 2) 在 数据库设计器 窗口中将指针指向 一 表的主索引, 按下左键将该主索引拖放到 多 表的与其对应的普通索引上, 此时在两索引之间建立一条 一对多 的连线, 表示两表之间的索引, 如图 7.1 所示 科学出版社职教技术出版中心 www.aboo 图 7.1 建立关系 31
Visual FoxPro 程序设计实验与实训指导 ( 第二版 ) 3) 在 数据库设计器 窗口中将指针指向 一对多 的连线, 单击使其变粗, 表 示选中, 然后右击, 在弹出的快捷菜单中选择 编辑关系 命令, 如图 7.2 所示 图 7.2 编辑关系 命令 4) 在 编辑关系 对话框中, 输入关系的条件, 如图 7.3 所示 图 7.3 编辑关系 对话框 建立的关系的类型是由子表的索引类型决定的, 当子表为主索引或候选索引时, 建 立的关系为 一对一 关系 ; 当子表的索引为普通索引或唯一索引时, 建立的关系是 一对多 关系 5) 单击 确定 按钮, 完成关系的编辑 2. 字段 记录有效性规则设置 1) 为 profile 表中的性别字段添加有效性规则 1 在 表设计器 中选择要建立规则的字段名, 这里选择 profile 表的性别字段 2 在 规则 文本框中输入表达式或单击 规则 文本框右侧的 按钮, 在弹出的 表达式生成器 对话框中设置有效性表达式 : 性别 =" 男 ".or.= " 女 " 3 在 表达式生成器 对话框中设置规则后, 单击 确定 按钮 4 在 信息 文本框中输入 " 性别为 ' 男 ' 或 ' 女 ' " 注意, 这里添加的文本需要用引号括起来 5 在 默认值 文本框中输入 " 男 ", 结果如图 7.4 所示 注意 : 规则 是逻辑表达式, 信息 是字符串表达式, 默认值 的类型则以字段的类型确定 32
第一部分上机实验 图 7.4 为字段添加有效性规则 2) 为 profile 表添加记录有效性规则, 教工工龄数据必须大于 0, 如果工龄小于 0, 则说明输入的数据是无效的 1 打开 profile 表, 执行 显示 表设计器 命令, 弹出 表设计器 对话框 2 选择 表 选项卡, 在 规则 文本框中输入 工龄 >0 3 在 信息 文本框中输入 " 无效的记录 " 4 输入完毕, 单击 确定 按钮, 如图 7.5 所示 科学出版社职教技术出版中心 www.aboo 图 7.5 为记录添加有效性规则 33
Visual FoxPro 程序设计实验与实训指导 ( 第二版 ) 建立记录有效性规则后, 当向表中输入记录时, 若违背了定义的规则, 则将显示所定义的错误信息 3. 建立参照完整性为 教工 数据库的 profile 表和 salary 表设计参照完整性 1) 在 教工 数据库中建立表之间的联系, 如图 7.6 所示 图 7.6 建立表的联系 2) 执行清理数据库操作, 如图 7.7 所示 图 7.7 清理数据库 3) 将它们的插入规则设定为 限制, 即插入 salary 表记录时检查相关 profile 表是否存在, 如果不存在则禁止插入工资记录 4) 将它们的删除规则设定为 级联, 即删除 profile 表记录时自动删除 salary 表 34
第一部分上机实验 记录 5) 将它们的更新规则设为 级联, 即修改 profile 表的编号时自动修改相关的 salary 表记录 建立参照完整性规则的 教工 数据库如图 7.8 所示, 单击 确定 按钮, 设置完成 图 7.8 设置参照完整性规则 科学出版社职教技术出版中心 www.aboo 35
Visual FoxPro 程序设计实验与实训指导 ( 第二版 ) 实验 8 SQL 语句 实验目的 1) 掌握使用 SQL 语句建立单表查询的方法 2) 掌握使用 SQL 语句建立多表查询的方法 3) 掌握使用 SQL 语句利用特殊运算符进行查询的方法 4) 掌握使用 SQL 语句建立分组查询的方法 5) 掌握使用 SQL 语句进行简单计算查询的方法 6) 掌握嵌套查询的使用 7) 掌握 SQL 语句的其他操作功能 实验要求 1) 掌握使用 SQL 语句建立单表查询的方法 2) 掌握使用 SQL 语句建立多表查询的方法 3) 掌握嵌套查询的方法 实验内容 1) 根据现有的 profile 表, 使用 SQL 语句建立单表的条件查询 2) 使用 SQL 语句建立多表的联接查询 3) 使用 SQL 语句利用特殊运算符进行查询 4) 使用 SQL 语句对查询结果进行排序和分组 5) 使用 SQL 语句进行简单的计算查询 6) 使用 SQL 语句进行嵌套查询 7) 使用 SQL 语句更新数据表的内容 实验操作步骤 1. 单表查询 1) 在 profile 表中, 查询男教师的姓名和职称字段 1 打开命令窗口 启动 Visual FoxPro 6.0 时,Visual FoxPro 6.0 系统开发环境窗口中会自动打开命令窗口, 如果没有, 可执行 窗口 命令窗口 命令, 打开 命令 36
第一部分上机实验 窗口 2 打开 profile 表, 然后在命令窗口中输入 SQL 语句 SELECT 姓名, 职称 FROM profile WHERE 性别 =" 男 ", 然后按 Enter 键, 则会在屏幕中显示查询结果, 如图 8.1 所示 2) 在 profile 表中, 查询工龄小于 5 年的女教师的教师编号 姓名和职称 在命令窗口中输入 : SELECT 编号, 姓名, 职称 FROM profile WHERE 工龄 <5 AND 性别 =" 女 " 然后按 Enter 键, 查询结果如图 8.2 所示 图 8.1 男教师的姓名和职称的查询结果 2. 多表查询 图 8.2 工龄小于 5 年的女教师的查询结果 1) 在 profile 表和 course 表中, 查询出担任中医学基础课程的教师的姓名 职称和课程号信息 在命令窗口中输入 : SELECT profile. 姓名,profile. 职称, 课程号 FROM profile,course; WHERE( 课程名 =" 中医学基础 ")AND(profile. 编号 =course. 编号 ) 然后按 Enter 键, 查询结果如图 8.3 所示 注意 : 由于这里的 姓名 字段不唯一 ( 因为在两个表中都有, 因此必须在 姓名 字段前加上表名 ), 而这里的 课程号 和 职称 字段都是唯一的, 所以可以直接引用 2) 在 profile 表和 course 表中, 查询出职称为讲师的教师所担任的课程的课程号和课程名信息 在命令窗口中输入 : SELECT 课程号, 课程名 FROM profile,course; WHERE ( 职称 =" 讲师 ") AND (profile. 编号 =course. 编号 ) 然后按 Enter 键, 查询结果如图 8.4 所示 科学出版社职教技术出版中心 www.aboo 37
Visual FoxPro 程序设计实验与实训指导 ( 第二版 ) 图 8.3 担任中医学基础课程的教师信息的查询结果 图 8.4 讲师所担任的课程信息的查询结果 3. 利用特殊运算符进行查询 1) 在 profile 表中, 查询讲师 副教授的姓名和职称 在命令窗口中输入 : SELECT 姓名, 职称 WHERE 职称 IN (" 讲师 "," 副教授 ") FROM profile 然后按 Enter 键, 查询结果如图 8.5 所示 2) 在 profile 表中, 查询所有姓王的教师的姓名 性别和职称 在命令窗口中输入 : SELECT 姓名, 性别, 职称 WHERE 姓名 LIKE " 王 %" FROM profile 然后按 Enter 键, 查询结果如图 8.6 所示 图 8.5 讲师 副教授信息的查询结果 图 8.6 查询所有姓王的教师信息的查询结果 4. 排序和分组 1) 在 salary 表中, 按教师的津贴值升序查询出教师的姓名和津贴信息 在命令窗口中输入 : SELECT 姓名, 津贴 FROM salary ORDER BY 津贴然后按 Enter 键, 查询结果如图 8.7 所示 2) 在 profile 表中, 查询出男 女教师的平均工龄 在命令窗口中输入 : SELECT 性别,AVG( 工龄 ) FROM profile GROUP BY 性别 38
第一部分上机实验 然后按 Enter 键, 查询结果如图 8.8 所示 图 8.7 按教师的津贴值升序的查询结果 图 8.8 男 女教师的平均工龄的查询结果 5. 计算查询 1) 在 profile 表中, 查询出女教师的工龄的最小值 在命令窗口中输入 : SELECT MIN( 工龄 ) FROM profile WHERE 性别 =" 女 " 然后按 Enter 键, 查询结果如图 8.9 所示 2) 在 profile 表中, 查询出男教师的工龄的和 在命令窗口中输入 : SELECT SUM( 工龄 ) FROM profile WHERE 性别 =" 男 " 然后按 Enter 键, 查询结果如图 8.10 所示 图 8.9 女教师工龄最小值的查询结果 6. 嵌套查询 图 8.10 男教师工龄和的查询结果 1) 在 salary 表中, 查询出和教师陈龙具有相同基本工资的所有教师 在命令窗口中输入 : SELECT 姓名 FROM salary WHERE 基本工资 =; (SELECT 基本工资 FROM salary WHERE 姓名 =" 陈龙 ") 科学出版社职教技术出版中心 www.aboo 然后按 Enter 键, 查询结果如图 8.11 所示 2) 在 profile 表中查询出比所有男教师工龄都大的女教师的姓名和工龄信息 在命 39
Visual FoxPro 程序设计实验与实训指导 ( 第二版 ) 令窗口中输入 : SELECT 姓名, 工龄 FROM profile WHERE 工龄 > ALL; (SELECT 工龄 FROM profile WHERE 性别 =" 男 ") 然后按 Enter 键, 查询结果如图 8.12 所示 图 8.11 具有相同基本工资的信息的查询结果 图 8.12 比所有男教师工龄都大的女教师 信息的查询结果 7. 数据插入 在 profile 表中, 插入元组 ("2004"," 刘悦 "," 女 ",10/10/82," 讲师 ",.T.,6) 在命令窗口中输入 : INSERT INTO profile( 编号, 姓名, 性别, 出生日期, 职称, 婚否, 工龄 ); VALUES("2004"," 刘悦 "," 女 ",{^1982-10-10}," 讲师 ",.T.,6) 然后按 Enter 键, 使用 SELECT * FROM profile, 结果如图 8.13 所示 图 8.13 插入元组后的结果 40