结构化程序设计.ppt

1.变量不区分大小写
对于一般的变量，建议使用规则：TypeName。
建议的变量命名约定
结构化程序设计
2.变量不需预先声明
可以直接赋值，根据赋值决定变量类型。 如nAge=25，表明nAge为整型变量，初始值为25。 如Flag=.F.表明lFlag为逻辑型变量，初始值是.F.。
3.命令分行
* 程序名称：E8_1.PRG
* 功能：显示当前日期和时间
*----------------------------------
a=DATE()
&& 求当前日期
b=TIME()
&& 求当前时间
a1=LEN(DTOC(a))
&amamp;& 求当前时间的长度
?"当前日期和时间：",a,b
程序文件
Visual FoxPro系统将命令文件称为程序文件或程序。 命令文件或程序文件的扩展名为.PRG
命令代码包括：
命令 VFP可理解的操作
结构化程序设计
2.程序文件的建立
命令格式：MODIFY COMMAND <文件名> 菜单方式：选择“新建/程序” 功能：打开文本编辑窗口，用来建立或修改程序文件。 说明：
监视窗口：显示表达式及它们的 当前值，并能够在表达式上设置 断点。
调用堆栈窗口：可以显示正在执 行的过程、程序和方法程序。
调试输出窗口：用来显示活动程 序、过程或方法程序代码的输出 结果。
局部窗口：用于显示给定的程序、 过程或方法程序中的所有变量、 数组、对象以及对象成员。
8.1.3 Visual FoxPro编程特点
使用TO <内存变量>子句将把按下的键以字符形式保存到指定变量中，本命 令只能接一个字符。若按下的是不可打印字符或是单击鼠标，则内存变量 中存储空字符。

Set default to 默认路径 &&设置默认路径
Set talk on|off
&&打开|关闭命令执行时的对话开关
Set century on | off &&是否用四位表示年
Set fields to 字段名表 &&设置字段筛选
Set filter to 条件
&&设置记录筛选
Set sysmenu to default &&恢复系统的默认菜单
2021/5/8
4
二、程序文件的建立
建立、修改程序文件 Modify Command [d:][path]程序文件名 程序文件扩展名为.PRG
运行程序文件 • Do [d:]来自path] 程序文件名 [With 参数表] • 程序文件名（参数表）
程序文件可被修改并重新运行,且可多次运行；一个 程序可调用其他程序（子程序、过程）
IF 条件 命令行序列1
ELSE 命令行序列2
EndIf
2021/5/8
12
举例：闰年问题
输入一个年份，编程判断是否是闰年。 一个年份满足以下条件之一即为闰年： • 能被4整除且不能被100整除 • 能被400整除
Input “请输入年份:” to year IF year%4=0 AND year%100!=0 or year%400=0
Input "请输入成绩:" to 成绩
do case case 成绩>=85 ? "优秀" case 成绩>=75 ? "良好" case 成绩>=60 ? "及格" case 成绩>=0 ? "不及格"

C=60
D=50
PJF=（A*12+B*16+C*6+D*5）/（12+16+6+5） 输出平均成绩PJF
输出平均成绩
结束
结束
13
开始
输入X的值 N Y 输出X 是 输入一个数给X X>0 否
X>0
输出X
结束
14
开始
N=1
N<=10 Y
输入X的值
N 当N<=10
N=1
输入一个数给X
N
是 输出X
X>0
程序的每一行只能书写一条语句，并且一行
最多只能有255个字符（包括空格）。如果一条语 句一行写不完，可以用“；”续行，每一个语句 用回车键结束。
7
三、 Visual FoxPro程序的构成
* 程序名： AREA.PRG * 功能： 求圆的面积 程序的前 * 设计人 张大民 文 *设计日期 1998年3月 SET TALK OFF 程序的设 SET COLOR TO GR+/B+ 置部份 CLEAR INPUT“圆半径R=”TO R S=3.1415926*R*R 程序的主体部份 ?“圆面积S=”，S CLEAR ALL 程序的关闭部份 SET TALK ON RETURN 程序的退出部份
27
◆例 3
已知 S1=1，S2=1+2，S3=1+2+3，…， Sn= 1+2+3，…+n,编写一程序求
S1+ S2+ …+S100的和。
MODI COMM EX738．PRG
28
SET TALK OFF CLEAR N=1 S=0 DO WHILE N<=100 I=1 SUB=0 DO WHILE I<=N SUB=SUB+I

2019年11月2
谢谢你的阅读
29
(2)USE XJK ACCEPT “请输姓名” TO XM IF FOUND( ) DISP 姓名,语文 ELSE ? “查无此人” ENDIF
2019年11月2
谢谢你的阅读
30
(3)如果有多个条件,可用多个IF语句
X X>0
Y= X+1 X<-2
X+3 -2<X<0
3. 命令：MODIFY COMMAND 程序文件名
输入命令语句时，必须一条命令占一行，一行写不下时， 在行尾加续行符（;），换行后接着书写该命令语句。
2019年11月2
谢谢你的阅读
3
命令序列
注释语句
2019年11月2
谢谢你的阅读
4
6.1.3 程序文件的修改
对已建立的程序文件可以重新进入代码编辑窗口修改内容。 1．项目管理器：选中要修改的程序文件，单击“修改”按 钮，重新打开代码编辑窗口。修改后，选择“文件|保存” 命令，保存程序。 2．菜单：选择“文件|打开”命令，将要修改的程序文件调 入代码编辑窗口。
谢谢你的阅读
17
6.3 程序的基本控制结构
应用程序是用户为解决一个特定的
问题而将有关的命令按一定的结构组成 的序列.顺序结构、选择结构、循环结 构是三种基本的控制结构。
在进行程序设计时，为了把解题的
步骤清晰的表达出来，我们常常图形来 描述——流程图。它是用特定的图形符 号和必要的文字来描述解题步骤。
示例：input “请输入数据” to z
2019年11月2
谢谢你的阅读
15
5．格式输入输出命令
格式1：@ 行号,列号 SAY 表达式 功能：在主窗口指定的位置处显示表达式的值