第5章 Visual FoxPro程序设计

Input “请输入一个数：” to x
If int(x/3)=x/3 or int(x/7)=x/7
?x*x
Endif
第5章 Visual FoxProΒιβλιοθήκη 程序设计5.2.2 选择结构
2、双分支选择结构 格式： 假 条件 IF＜条件表达式＞ 真 ＜语句序列1＞ 语句序 语句序 ELSE 列1 列2 ＜语句序列2＞ ENDIF 功能：表达式为真，则执行“语句序列1”，再执行 EDNIF的后续语句；为假，则执行“语句序列2”，再 执行EDNIF的后续语句。
第5章 Visual FoxPro 程序设计
5.2.2 选择结构
注意：
(1) IF和ENDIF必须成对使用，而ELSE可选。
(2) IF、ELSE、ENDIF必须各占一行。
(3) <条件>可以为关系表达式、逻辑表达式。
(4)在＜语句序列1＞和＜语句序列2＞中可以嵌套IF语句。
第5章 Visual FoxPro 程序设计
第5章 Visual FoxPro 程序设计
4．画图命令
【格式】 @<行1，列1>TO<行2，列2>[DOUBLE][PATTERN<填充图案>] [PEN<线宽 代号]][STYLE<角曲度>][颜色对] 【功能】画一个矩形，并通过矩形的四个角的曲度，使矩形变成椭圆或圆。 【说明】 DOUBLE表示双线的矩形
"请输入一个数x："
"请输入另一个数y："
TO
TO
X
Y
第5章 Visual FoxPro 程序设计
1．键盘输入语句
(3)
WAIT命令
[Windows[Nowait]] [TIMEOUT<数值表达式>]
【格式】WAIT [<提示符表达式>] [T0 <内存变量>] 【功能】等待用户从键盘上输入一个字符存入指定变量中。 注意：WAIT命令响应速度快，它只接受一个字符，不需用户
第5章 Visual FoxPro 程序设计
7．文本输出命令 【格式】 TEXT 〈文本行〉 ENDTEXT 【功能】把文本输出到屏幕或活动窗口。
8．清屏命令
【格式】CLEAR 【功能】清除屏幕信息语句。
第5章 Visual FoxPro 程序设计
5.2 程序的流程控制
Visual FoxPro系统提供的命令丰富，且功能强大， 把这些命令和程序设计语句有效地组织在一起，就 形成了实现某一特定功能的程序。 Visual FoxPro系统的程序有两个特点：一是程序 控制流模式，由顺序、分支、循环三种基本结构构 成。二是面向对象可视化的结构程序模块，在每个 模块的内部也是由程序控制流组成。常见的控制结 构如下：
第5章 Visual FoxPro 程序设计
5.1.5 简单的输入输出命令
1．键盘输入语句 (1) ACCEPT命令
格式 ：accept [<提示信息>] to <内存变量>
功能：在屏幕上显示提示信息，等待用户输入一个字符串， 赋值给一个内存变量 注意：该命令只能接受字符型常量，输入一个字符串不必 加定界符，否则定界符也作为数据的一部分；按回车键 后，程序继续执行。
第5章 Visual FoxPro 程序设计
2．格式输入语句
例5.4：name=space(8) @5,10 say "请输入学生姓名" get name read
第5章 Visual FoxPro 程序设计
3．格式输出语句 无论是内存变量还是字段变量都可以使用?或??命令输出， 这种输出方式简单，但是不能按照用户指定的位置输出。 格式输出语句能按用户的要求来设计屏幕格式，使之美观、 方便。 【格式】 @ <行号，列号> SAY <表达式> 【功能】 从指定的行、列号开始输出表达式的值。 【说明】 (1) <表达式>可以是常量、字段变量及由它们组成的表达式。 (2) 定位输出时，一次只能输出一个表达式。
例5.8：从键盘输入圆的半径R，通过计算圆面积公式πR2计算 出圆的面积S，最后输出该圆的面积S。
CLEAR INPUT "圆的半径R=" TO R S=3.1416*R*R ? "圆的面积S=",S
RETURN
【例】编写一个求梯形面积的程序。
第5章 Visual FoxPro 程序设计
5.2.2 选择结构
1、 单分支选择结构
格式：
IF＜条件表达式＞ ＜语句序列＞ EDNIF
条件
真 语句序列
假
功能：条件表达式的值为真（.T.）则执行“语句序列”， 否则为假（.F.）则直接执行EDNIF后续语句。
第5章 Visual FoxPro 程序设计
5.2.2 选择结构
例5.9：从键盘输入一个数，若该数能被3或7整除，则输出该 数的平方值。
第5章 Visual FoxPro 程序设计
5.1.5 简单的输入输出命令
1．键盘输入语句 例5.1：要求用户从键盘上输入用户名，然后把输入的用户名 显示出来。
ACCEPT
"请输入用户名：" TO
NAME
?NAME+"你还好吗？"
第5章 Visual FoxPro 程序设计
1．键盘输入语句 (2) INPUT命令 格式：input [<提示信息>] to <内存变量>
Y =
X 2 + 7 10X - 2
X <5 X >= 5
第5章 Visual FoxPro 程序设计
5.2.2 选择结构
例5.11：根据从键盘输入学号在stud表中进行查找，找到则 显示该学生的学号、姓名、入学成绩；找不到，则显示“无 此学号”。 use stud Accept "请输入学号：" to xh locate for 学号=xh if found() ?"学号:"+学号 ?"姓名:"+姓名 ?"入学成绩:",入学成绩 else ?"无此学号！" endif use
C
N
第5章 Visual FoxPro 程序设计
5.2.1 顺序结构
例5.7：变量的初始化和变量的赋值。
SET TALK OFF STORE 0 TO X,Y,Z
A=3
B=A+1 C=A*B
? X, Y, Z
? A, B, C SET TALK ON
第5章 Visual FoxPro 程序设计
5.2.1 顺序结构
第5章 Visual FoxPro 程序设计
程序的3种基本结构
一种计算机语言的程序主体由3种基本结构组成： 顺序结构、选择结构和循环结构。
第5章 Visual FoxPro 程序设计
5.2.1 顺序结构
顺序结构是一种
线形结构，是最基本 的程序结构，它是按 照命令或语句的排列 顺序，依次执行。
A
B
功能：在屏幕指定的坐标位置上显示提示或输入数据。
注意： ① <变量> ：该变量应在其前面定义过、并赋初值； 初值决定了该变量的类型和宽度。 ② READ 一般与GET 联合起来用： 当有READ时， GET <变量> 的内容可以从键盘上修改； 没有READ时，GET 后的变量只能显示内容，不能修改； 一个READ可以修改它前面的多个GET项的内容，但它可以由 CLEARGETS命令隔断。
第5章 Visual FoxPro 程序设计
5．状态设置命令 （1）会话状态设置命令 【格式】 SET TALK ON/OFF 【功能】 FoxPro在执行命令时是否向用户提供返回信息， ON 表示向用户返回信息，OFF表示否。
（2）设置状态栏状态命令
【格式】SET STATUS BAR ON/OFF 【功能】设置FoxPro屏幕底部状态栏是否显示，OFF不显示。
VFP提供一种程序执行方式，这种方式就是预先把需 要执行的多条命令按一定的结构组成一个有机序列以文 件的形式存储在磁盘上，而用于存储这些由命令组成的
文件，即为命令文件，又称为程序文件，这些序列的设
计、编码和调试的过程就是程序设计。
第5章 Visual FoxPro 程序设计
5.1.2
程序的建立及维护
第5章 Visual FoxPro 程序设计
3．格式输出语句 例5.5： @ 8, 18 SAY "**** 数据表操作命令菜单 ****" @ 9, 18 SAY " 1.打开工作数据表 " @ 10, 18 SAY " 2. 增加数据表记录 " @ 11, 18 SAY " 3. 删除数据表记录 " @ 12, 18 SAY " 4. 修改数据表记录 " @ 13, 18 SAY " 5. 打印数据表记录 " @ 14, 18 SAY " 6. 关闭工作数据表 " CHOICE=SPACE(1) @ 16, 28 SAY " 请选择相应代码：" GET CHOICE READ @18, 28 SAY "您选择的是:" + CHOICE
键入回车键。
例5.3：在命令窗口输入下列命令： Wait ‚输入有误，请重新输入……" window timeout 5
第5章 Visual FoxPro 程序设计
2．格式输入语句 格式： @ <行，列> SAY <提示信息> GET <变量> READ [SAVE][CYCLE][TIMEOUT<等待时间>]