下载文档原格式
Visual Foxpro数据库程序设计教案姓名：李运娣系别：计算机第1章Visual FoxPro 数据库基础本章重点与学习目标：了解数据库系统的相关概念▪数据、数据库、数据库管理系统、数据库系统▪数据库管理系统发展过程▪概念模型以及常用的数据模型—层次模型、网状模型、关系模型 掌握关系数据库▪关系模型的相关属于数据库设计基础▪数据库设计的步骤和过程了解VF系统的发展过程▪数据库管理系统的发展▪VF的发展简史及了解Visual FoxPro系统的特点▪掌握VF系统的启动与退出方法▪熟悉VF系统的用户界面熟悉VF项目管理器▪创建新项目▪项目管理器窗口的各类选项卡教学器材：多媒体教学本章课时：3学时§1.1 数据库基础知识§1.1.1 计算机数据管理的发展1. 数据与数据处理数据是指存储在某一种媒体上能够识别的物理符号；数据处理是指将数据转换成信息的过程。
2. 计算机数据管理数据管理：是指对数据的组织、分类、编码、存储、检索、维护等，它是数据处理的中心问题。
数据管理技术的发展过程：人工管理阶段(40年代中--50年代中)；文件系统阶段(50年代末--60年代中)；数据库系统阶段(60年代末--现在)。
§1.1.2 数据库系统1. 数据库有关概念数据库（DataBase）：指数据库系统中以一定的方式将相关数据组织在一起，存储在外存储设备上形成的、为多个用户共享、与应用程序相互独立的相关数据集合。
数据库管理系统（DBMS）：用于建立、使用和维护数据库的系统软件。
数据库管理系统对数据库进行统一的管理和控制，以保证数据库的安全性和完整性。
数据库应用系统：数据库应用系统简称数据库系统，是指系统开发人员利用数据库系统资源开发出来的，面向某一类实际应用的应用软件系统。
数据库管理员（DBA）：负责全面管理和实施数据库控制和维护的技术人员。
2. 数据库系统的特点数据库系统是指引进数据库技术后的计算机系统，实现有组织地、动态地存储大量相关数据，提供数据处理和信息资源共享的便利手段。
实验四程序设计初步一、目的和要求1. 掌握顺序结构、分支结构、循环结构。
2. 掌握子程序、过程、函数的区别和具体应用。
二、实验原理VFP中包括三种基本控制结构：顺序结构、分支结构与循环结构。
常见的分支和循环结构如下所示。
分支语句格式：IF <逻辑表达式><语句序列1>[ELSE<语句序列2>]ENDIF多分支语句格式：DO CASECASE <逻辑表达式1><语句序列1>CSAE <逻辑表达式2><语句序列2>…CASE <逻辑表达式n><语句序列n>[OTHERWISE<语句序列n+1>]ENDCASEWHILE循环语句格式：DO WHILE <逻辑表达式><语句序列>ENDDOFOR循环语句格式：FOR <内存变量>=<数值表达式1> TO <数值表达式2> [STEP <数值表达式3>] <语句序列>ENDFORSCAN循环语句格式：SCAN [<范围>] [FOR< 逻辑表达式1>] [WHILE< 逻辑表达式2>]<语句序列>ENDSCAN应用程序一般包含多个模块，模块是可以命名的一个程序段，可以指主程序、子程序和自定义函数。
各种调用形式如下所示。
三、实验内容及步骤1.编一个程序，能根据记录号修改某设备的价格和部门。
*e4-1.prgclearuse sb@10,5 say "修改设备的价格"?input "请输入记录号:" to jlhdisplay 价格record jlhinput "请重新输入第"+str(jlh,1)+"个设备的价格:" to jg replace 价格with jgdisplay 价格use2.编一个程序，能打开任意表浏览。
[课题]：顺序结构与分支结构程序设计
[目的要求]：了解顺序结构、分支结构的概念，理解分支语句的格式、作用及流程，掌握顺序结构、分支结构的程序设计，领会分支结构在程序的作用。
[重点]：分支语句的格式、作用与流程；分支结构程序的编写。
[难点]：流程与程序的编写。
[学时]：2学时
[教学过程及内容]：
导入：
面向过程程序设计包括三种基本控制结构：顺序结构、分支结构、循环结构。
今天我们来了解有关顺序结构、分支结构的有关内容
一、顺序结构
概念：程序的执行是按其语句排列的先后顺序进行执行的程序。
例：CLEAR
SET TALK OFF
USE RS
ACCEPT "请输入要修改记录的教师名：" to xm
LOCATE FOR 姓名=xm
REPL 职称 WITH "教授"
USE
SET TALK ON
RETURN
是按其语句的排列先后顺序执行的
二、分支结构
概念：选择分支结构是根据条件的测试结果执行不同的操作。
VFP中有两条命令实现条件分支：二路选择分支结构（IF…ENDIF）和多路选择分支结构（DO CASE …ENDASE）。
<一> IF…ENDIF结构
1、结构：IF < 条件表达式>
< 语句系列1>
[ELSE
< 语句系列 2>]
ENDIF
2、功能：当<条件表达式 >的值为真时，执行< 语句系列1>；否则执行< 语句系列 2>。
如果没有ELSE的子句，则当<条件表达式 >的值为假时，不进行任何操作。
注：IF和ENDIF必须配对使用。
3、流程（板书略）
4、例：从键盘输入一个正整数，判断其是奇数，还是偶数
SET TALK OFF
clear
INPUT "请输入一个正整数:" TO X
IF INT(X/2)=X/2
?X,"为偶数!"
ELSE
?X,"为奇数!"
ENDIF
SET TALK ON
5、练习：从键盘输入一个正整数，若该数能被3或7整除，则输出该数的平方
6、IF 嵌套
解释：一个IF语句中包含另一个IF语名
例：从键盘输入一个成绩，若在85~100之间,则输出“优”，若在70~85之间，则为“良”，若在60~75，则为“及格”，在60以下，则为“不及格”，否则输出“非法成绩”
SET TALK OFF
CLEAR
INPUT “请输入你的成绩” TO N
IF N>100 OR N<0
?”非法成绩!”
RETURN
endif
IF N>=85
?”优”
ELSE
IF N>=70
?”良“
ELSE
IF N>=60
?”及格”
else
?”不及格”
ENDIF
ENDIF
ENDIF
SET TALK ON
RETURN
7、练习：解分段函数
x2+7 x<0
y= x+7 x=0
x2-7 x>0
<二> DO CASE … ENDASE结构
1、结构：见教材P42。
DO CASE
CASE <条件表达式1>
<语句系列1>
[CASE <条件表达式2>
<语句系列2>
……
CASE <条件表达式N>
<语句系列N>]
[OTHERWISE
<语句系列N+1>]
ENDCASE
2、功能：依次判断<条件表达式>的值，当值为真时执行对应的<语句系列>，执行后转到ENDCASE的下一条语句；当所有<条件表达式 >的值都为假时，则执行OTHERWISE下面的<语句系列1>。
注：DO CASE和ENDCASE必须配对使用,case 的条件表达式的值必须为逻辑值。
3、流程：板书略
4、例：同例对成绩作出评语
SET TALK OFF
CLEAR
INPUT “请输入你的成绩：” to n
If n>100 or n<0
?”非法成绩！”
endif
do case
case n>=85
?”优”
case n>=70
?”良”
case n>=60
?”及格”
otherwise
?”不及格”
endcase
set talk on
return
[小结]
1、IF…ENDIF、DO CASE … ENDASE的结构、功能
2、流程
[作业]
1、从键盘输入一半径，然后求圆的周长、面积与球的体积
2、解ax2+bx+c=0的根，a、b、c的值从键盘输入
clear
?"一元二次方程：a*x^2+b*x+c"
input "a=" to a
input "b=" to b
input "c=" to c
d=b*b-4*a*c
do case
case d<0
?"无实根"
case d=0
?"x1=x2=",-b/(2*a)
case d>0
?"x1=",(b+sqrt(d))/(-2*a)
?"x2=",(b-sqrt(d))/(-2*a)
endcase
3、现某商店按顾客购物的多少分别给予不同的优惠如下：250元以下的，没有折扣；250～500之间的，优惠5%；500～1000之间的，优惠7.5%；1000～2000之间的，优惠10%，2000及2000以上的，优惠15%。
请从键盘输入你的购物款，然后输出实际金额。
