程序设计基础(专升本)
相关主题
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
顺序结构：按语句ቤተ መጻሕፍቲ ባይዱ列顺序执行 分支结构：根据条件执行不同的
程序分支 循环结构：重复执行一段代码
1、顺序结构
按语句排列顺序执行，是三种结构中最基本、 最简单的结构。
例1：用姓名查询学生信息！
语句1 语句2 语句3
open database D:\学生管理\学生管理 use 学生 accept "请输入学生姓名:" to name locate for 姓名=name display use
INPUT TO X INPUT TO Y INPUT TO Z IF X>=Y
IF X>=Z MAX=X
ELSE MAX=Z
ENDIF ELSE
IF Y>=Z MAX=Y
ELSE MAX=Z
ENDIF ENDIF ? MAX
四、结构分支语句
语句格式：
DO CASE CASE <逻辑表达式1> <语句序列1> CASE <逻辑表达式2> <语句序列2> …… CASE <逻辑表达式N> <语句序列N> [OTHERWISE <语句序列N+1>]
VFP程序设计基础
2009年专升本辅导
一、结构化程序设计方法
数据输入 数据处理 数据输出
1、程序由3种 基本结构组成：顺
序结构、选择结构 和循环结构。
2、程序只有一 个入口，只有一个
出口，结构中无死 循环。
二、VFP交互式的输入语句
1．INPUT命令
格式: INPUT [<提示信息>] TO <内存变量>
功能: 显示提示信息, 暂停程序运行, 等待用户从键盘 输入除备注型、屏幕型以外的任何类型数据, 以回车 键结束输入。
字符型数据必须用定界符括起来; 逻辑型数据必 须用圆点定界符括起来; 日期型数据按 CTOD(<MM/DD/YY>)格式或{^YYYY-MM-DD}格 式; 数值型数据不需要任何定界符。
程序执行时，屏幕上显示提示信息“请输入数据表文件名:”，当用户 输入表文件名如：学生，程序继续执行并打开“学生”表，并以列表的形 式显示表文件的全部记录及字段内容。
3．WAIT命令
格式: WAIT [<提示信息>] [TO <内存变量>] [WINDOW [AT<行>，<列>]] [NOWAIT] [CLEAR/NOCLEAR] [TIMEOUT<数字表达式>]
2、分支结构
根据条件执行不同的程序分支，计算机进行逻辑判断的基本 结构。
计算机具有逻辑判断的 能力，能根据给定的条件成 立与否而决定程序转向不同 的方向，这些不同的转向就 构成了分支结构。
分支结构中总包含有逻 辑表达式，分支结构体现的 是计算机的逻辑判断能力。
常用的分支结构有简单 分支、选择分支和结构分支 等。
在分支语句中 IF 必须和 ENDIF 配对。系统在执行分支语 句时, 由 IF 语句的最内层开始, 逐 层将 IF 和 ENDIF 配对。所以在 多层分支嵌套时尤应注意配对关系, 以免配对错误引起逻辑错误。
例4: 求 X、Y、Z 三个数中的最大值 INPUT TO X INPUT TO Y INPUT TO Z ?Max(x,y,z)
1．INPUT命令
例： INPUT命令使用示例 INPUT "请输入姓名: " TO aa 请输入姓名: “夏天” 或 ’夏天’ 或 [夏天]
INPUT "请输入出生日期: " TO bb 请输入出生日期: CTOD("09/12/85")
或：{^1985/09/12}
INPUT "请输入成绩: " TO cc 请输入成绩: 92.5
例：用选择分支语句, 重新编写上例程序。
ACCEPT “学号: ” TO XH USE 成绩 LOCATE FOR 学号=XH IF 成绩>=60
? "成绩 60 分以上" ELSE
? "成绩低于 60 分" ENDIF USE
三、分支语句嵌套
在解决许多复杂问题时, 需要将 多个分支语句相互结合起来使用, 形成了分支语句的嵌套形式。
CJ="成绩 60 分以上" ENDIF
? CJ USE
二、选择分支语句(IF…ELSE…ENDIF)
语句格式： IF <逻辑表达式> <语句序列1> ELSE <语句序列2> ENDIF
if的前一条语句 .F.
逻辑表达式的值 .T. 语句序列1 语句序列2
Endif的后一条语句
二、选择分支语句(IF…ELSE…ENDIF)
功能: 使正在运行的程序暂停, 直到用户从键盘输入任 意字符或单击鼠标时，继续程序的执行。
例 6.2 WAIT命令使用示例 WAIT "请选择 0～6: " TO K WINDOW TIMEOUT 10 请选择 0～6:
当用户按键选择或等待时间超过10秒，提示窗口关闭，继续往 下执行程序
三、程序三种基本的控制结构
ENDCASE
是 逻辑表达式1
否 是
逻辑表达式2
语句序列1
否 …….
是 语句序列2
否
…
逻辑表达式N 是 …
否
语句序列N
语句序列N+1
四、结构分支语句
结构分支语句根据 N 个条件表达式的逻辑值, 选择执行 N+1 个语句行序列中的一个。
执行 DO CASE--ENDCASE 语句时, 首先逐个检查每个 CASE 项中的条件表达式, 当某个条件表达式的值为“真”时, 就 执 行 这 一 CASE 项 下 的 语 句 行 序 列 , 然 后 结 束 整 个 DO CASE--ENDCASE 语句, 去执行 ENDCASE 后面的语句。若 所 有 的 CASE 项 下 的 条 件 表 达 式 都 为 “ 假 ” 时 , 则 执 行 OTHERWISE 项下的语句行序列, 然后去执行 ENDCASE后 面的语句。
是
否
条件成立？
语句块1
语句块2
一、简单分支语句 (IF…ENDIF)
语句格式： IF <逻辑表达式>
<语句序列> ENDIF
if的前一条语句
.F.
逻辑表达式的值
.T. 语句 序列
Endif的后一条语句
例: 查询某一学生成绩是否在60分以上。
ACCEPT "学号: " TO XH USE 成绩 LOCATE FOR 学号=XH CJ="成绩低于 60 分" IF 成绩>=60
INPUT "是否代培: " TO dd 是否代培: .F.
2．ACCEPT命令
格式: ACCEPT [<提示信息>] TO <内存变量> 功能: 显示提示信息, 暂停程序运行, 等待用户从键盘 输入字符串给<内存变量>。
例6.3 键盘输入表文件名。 ACCEPT "请输入数据表文件名: " TO FILEN USE &FILEN LIST 运行后：请输入数据表文件名: 学生
程序分支 循环结构：重复执行一段代码
1、顺序结构
按语句排列顺序执行，是三种结构中最基本、 最简单的结构。
例1：用姓名查询学生信息！
语句1 语句2 语句3
open database D:\学生管理\学生管理 use 学生 accept "请输入学生姓名:" to name locate for 姓名=name display use
INPUT TO X INPUT TO Y INPUT TO Z IF X>=Y
IF X>=Z MAX=X
ELSE MAX=Z
ENDIF ELSE
IF Y>=Z MAX=Y
ELSE MAX=Z
ENDIF ENDIF ? MAX
四、结构分支语句
语句格式：
DO CASE CASE <逻辑表达式1> <语句序列1> CASE <逻辑表达式2> <语句序列2> …… CASE <逻辑表达式N> <语句序列N> [OTHERWISE <语句序列N+1>]
VFP程序设计基础
2009年专升本辅导
一、结构化程序设计方法
数据输入 数据处理 数据输出
1、程序由3种 基本结构组成：顺
序结构、选择结构 和循环结构。
2、程序只有一 个入口，只有一个
出口，结构中无死 循环。
二、VFP交互式的输入语句
1．INPUT命令
格式: INPUT [<提示信息>] TO <内存变量>
功能: 显示提示信息, 暂停程序运行, 等待用户从键盘 输入除备注型、屏幕型以外的任何类型数据, 以回车 键结束输入。
字符型数据必须用定界符括起来; 逻辑型数据必 须用圆点定界符括起来; 日期型数据按 CTOD(<MM/DD/YY>)格式或{^YYYY-MM-DD}格 式; 数值型数据不需要任何定界符。
程序执行时，屏幕上显示提示信息“请输入数据表文件名:”，当用户 输入表文件名如：学生，程序继续执行并打开“学生”表，并以列表的形 式显示表文件的全部记录及字段内容。
3．WAIT命令
格式: WAIT [<提示信息>] [TO <内存变量>] [WINDOW [AT<行>，<列>]] [NOWAIT] [CLEAR/NOCLEAR] [TIMEOUT<数字表达式>]
2、分支结构
根据条件执行不同的程序分支，计算机进行逻辑判断的基本 结构。
计算机具有逻辑判断的 能力，能根据给定的条件成 立与否而决定程序转向不同 的方向，这些不同的转向就 构成了分支结构。
分支结构中总包含有逻 辑表达式，分支结构体现的 是计算机的逻辑判断能力。
常用的分支结构有简单 分支、选择分支和结构分支 等。
在分支语句中 IF 必须和 ENDIF 配对。系统在执行分支语 句时, 由 IF 语句的最内层开始, 逐 层将 IF 和 ENDIF 配对。所以在 多层分支嵌套时尤应注意配对关系, 以免配对错误引起逻辑错误。
例4: 求 X、Y、Z 三个数中的最大值 INPUT TO X INPUT TO Y INPUT TO Z ?Max(x,y,z)
1．INPUT命令
例： INPUT命令使用示例 INPUT "请输入姓名: " TO aa 请输入姓名: “夏天” 或 ’夏天’ 或 [夏天]
INPUT "请输入出生日期: " TO bb 请输入出生日期: CTOD("09/12/85")
或：{^1985/09/12}
INPUT "请输入成绩: " TO cc 请输入成绩: 92.5
例：用选择分支语句, 重新编写上例程序。
ACCEPT “学号: ” TO XH USE 成绩 LOCATE FOR 学号=XH IF 成绩>=60
? "成绩 60 分以上" ELSE
? "成绩低于 60 分" ENDIF USE
三、分支语句嵌套
在解决许多复杂问题时, 需要将 多个分支语句相互结合起来使用, 形成了分支语句的嵌套形式。
CJ="成绩 60 分以上" ENDIF
? CJ USE
二、选择分支语句(IF…ELSE…ENDIF)
语句格式： IF <逻辑表达式> <语句序列1> ELSE <语句序列2> ENDIF
if的前一条语句 .F.
逻辑表达式的值 .T. 语句序列1 语句序列2
Endif的后一条语句
二、选择分支语句(IF…ELSE…ENDIF)
功能: 使正在运行的程序暂停, 直到用户从键盘输入任 意字符或单击鼠标时，继续程序的执行。
例 6.2 WAIT命令使用示例 WAIT "请选择 0～6: " TO K WINDOW TIMEOUT 10 请选择 0～6:
当用户按键选择或等待时间超过10秒，提示窗口关闭，继续往 下执行程序
三、程序三种基本的控制结构
ENDCASE
是 逻辑表达式1
否 是
逻辑表达式2
语句序列1
否 …….
是 语句序列2
否
…
逻辑表达式N 是 …
否
语句序列N
语句序列N+1
四、结构分支语句
结构分支语句根据 N 个条件表达式的逻辑值, 选择执行 N+1 个语句行序列中的一个。
执行 DO CASE--ENDCASE 语句时, 首先逐个检查每个 CASE 项中的条件表达式, 当某个条件表达式的值为“真”时, 就 执 行 这 一 CASE 项 下 的 语 句 行 序 列 , 然 后 结 束 整 个 DO CASE--ENDCASE 语句, 去执行 ENDCASE 后面的语句。若 所 有 的 CASE 项 下 的 条 件 表 达 式 都 为 “ 假 ” 时 , 则 执 行 OTHERWISE 项下的语句行序列, 然后去执行 ENDCASE后 面的语句。
是
否
条件成立？
语句块1
语句块2
一、简单分支语句 (IF…ENDIF)
语句格式： IF <逻辑表达式>
<语句序列> ENDIF
if的前一条语句
.F.
逻辑表达式的值
.T. 语句 序列
Endif的后一条语句
例: 查询某一学生成绩是否在60分以上。
ACCEPT "学号: " TO XH USE 成绩 LOCATE FOR 学号=XH CJ="成绩低于 60 分" IF 成绩>=60
INPUT "是否代培: " TO dd 是否代培: .F.
2．ACCEPT命令
格式: ACCEPT [<提示信息>] TO <内存变量> 功能: 显示提示信息, 暂停程序运行, 等待用户从键盘 输入字符串给<内存变量>。
例6.3 键盘输入表文件名。 ACCEPT "请输入数据表文件名: " TO FILEN USE &FILEN LIST 运行后：请输入数据表文件名: 学生