文档介绍：VFP程序设计基础
2
0
2
0
VFP源程序是用VFP命令或程序中专用语句编写的文本文件，其扩展名是PRG。
VFP专用程序编辑器
建立源程序文件
回车键结束；
WAIT命令只能输入单个字符，且不需定界符，输入完毕不需按回车键；
INPUT命令可接受数值型、字符型、逻辑型、日期型和日期时间型数据，数据形式可以是常量、变量、函数和表达式，如果是字符串，需用定界符，输入完毕按回车键结束。
三条输入命令的异同
程序的基本结构
 1．顺序结构
顺序结构是在程序执行时，根据程序中语句的书写顺序依次执行的命令序列。Visual FoxPro系统中的大多数命令都可以作为顺序结构中的语句。
 2．分支结构
分支结构是在程序执行时，根据不同的条件，选择执行不同的程序语句，用来解决有选择、有转移的诸多问题。
3．循环结构
循环结构则能够使某些语句或程序段重复执行若干次。
4．过程结构
在许多应用程序中，有一些程序段需要反复执行多次，这些程序段不在一个固定的位置上，而是分散在程序的许多位置上重复执行，可将其与嵌入它的程序分开，形成独立的程序序列，待使用时再调入程序中，以实现不同位置上的重复操作。
【例】编写程序，在STUDENT数据库的STUD表中查找并显示任意一个学生的情况。
OPEN DATABASE STUDENT
USE STUD
ACCEPT "请输入学生的姓名: " TO XM
LOCA FOR 姓名=XM
?"学生" +XM+"的基本情况如下:"
?"学号:"+学号
?"姓别:"+性别
?"班级名:" +班级名
?"地址:"+地址
?"出生日期:" +DTOC(出生日期)
CLOSE DATABASE
【例】:从键盘输入两个任意整数,计算这两个数的和、差、积、商。
CLEAR
INPUT "请输入第一个数：" TO A
INPUT "请输入第二个数：" TO B
? "这两个数的和为：" , A+B
? "这两个数的差为：" , A-B
? "这两个数的积为：" , A*B
? "这两个数的商为：" , A/B
【例】从键盘输入两个任意正数，编程求以两数为边长的长方形面积。
SET TALK OFF
CLEAR
INPUT "长方形一边的长为： " TO A
INPUT "长方形另一边的长为： " TO B
S=A*B
? "长方形的面积为： ", S
SET TALK ON
RETURN
练****br/>CLEAR
CREATE TABLE 学生成绩 (姓名 C(8),课程号 C(10),成绩 N(3))
INSERT INTO 学生成绩 VALUES ("张三","计算机",90)
INSERT INTO 学生成绩 VALUES ("李四","英语",80)
SELECT * FROM 学生成绩
1．  ，运行程序，观察结果。要求程序完成以下步骤：
(1)用SQL语句中CREATE TABLE创建一个学生成绩表，其中包括如下字段：姓名C（8）、课程名C（10）、成绩N（3）
(2)用SQL语句中INSERT INTO 添加如下数据
张三计算机 90
李四英语 80
(3)用SELECT查询语句查询所有记录。
语句格式：
If <条件> [Then]
<语句序列1>
Endif
开始
语句序列
结束
条件?
Y
N
分支结构后面语句
单分支If语句
其中IF-ENDIF必须配对出现。
选择结构
例：
Input "请输入一个N：" To N
If N<0
N=-N
Endif
? "N的绝对值是：", N
双分支If语句
语句格式：
If <条件> [Then]
<语句序列1>
ELSE
<语句序列2>
Endif
开始
语句序列1
结束
条件?
Y
N
语句序列2
分支结构后面语句
例，求两个数中较小值：
Input "X=" To X
Input "Y=" To Y
If X<Y
M=X
Else
M=Y
Endif
? " X与Y中的较小者是：", M
语句的嵌套
在If分支结构的语句序列中可以