VFP6常用命令2

本资料所用到的表及其结构如下：

图 1 学生表.dbf 结构

图 2 成绩表.dbf 结构

图 3 课程表.dbf 结构

1、设置工作目录：set default to

命令格式：命令功能：

实例1：练习：set default to <目录名>

设置vfp 系统默认的工作目录(文件夹)，以后存取文件均以该文件夹作为

默认文件夹。

set defa to d:\data ↙

打开vfp，然后观察此时的默认工作目录；再在Ｄ盘新建一文件夹：test，并设置该文件夹为vfp 的默认工作目录。

2、赋值语句：Store、=

Store 格式：Stroe <表达式> to <内存变量名表>

功能：将表达式的值赋给内存变量名表中的变量。实例1：store 100 to a1, a2 , b, c, num

=格式：<变量名>=<表达式>

功能：

注意：表达式与变量名顺序不能写反了。

3、输出命令：?、??

命令格式1：?<表达式列表>

命令格式2：?？<表达式列表>

4、定义数组命令：dimension、declare

命令格式：命令功能：实例1：

实例2：dimension/declare <数组名1>[<下标上界1>[,<下标上界2]…]

定义一维数组或二维数组，每一维的下标一般从 1 开始。Dimension A(20),B(3,2) ↙

B(1,1)=10 ↙

B(1,2)=20 ↙

B(2,2)=30 ↙

B(6)=40 ↙

? B(1,1), B(1,2), B(2,2), B(3,2)

Dimension sz1(20),sz2(3,2) ↙

Store 10 to sz1

store “警察学院” to sz2(1,1)

sz2(3,2)=.F.

sz(2,1)=3.14159

如果数组元素没有赋值，则默认值为 .F.

历史考题：语句DIME TM(3,5)定义的数组元素的个数是（）（15）

练习：定义一个 4 行5 列的二维数组，数组名为Arr1，给元素赋值（第一个元素值为10，第四个元素值为20，第七个元素值为”hello”，最后一个元素

值为888）。

5、打开/关闭表命令：use、close all

命令格式1：命令功能：use<表文件名>[ exclusive | shared]

以独占或者共享方式打开指定的表(默认方式是exclusive(独占))，如果只

实例１：

实例２：

实例３：

练习：

命令格式2：命令功能：是单独的use 命令，则关闭当前表。

use D:\data\学生表shared ↙

set default to d:\data↙

use 学生表↙

use ↙

以独占的方式打开d:\data 里的教师表.dbf，然后关闭该表。close all

关闭所有的表及释放所有的内存变量。

6、查看记录命令：list/display

命令格式：命令功能：

list/display[范围][fields<字段名>][for<条件表达式>][to printer][to file<文

件名>][off]

在工作区窗口显示当前表中的记录，list 默认范围是all，若一屏显示不下，也不会暂停，直到显示完最后一条记录；display 默认范围是当前记录，如果使用display all，则分屏显示。

注意[范围]参数可以是：

all 表示全部记录

Next 表示从当前记录开始（含当前记录）的Ｎ条记录

Record 表示第n 条记录

Rest 表示从当前记录起到最后一条记录为止的所有记录

实例1：Use 学生表↙

List fields 学号,姓名,入校总分↙

List for 性别=’男’↙

实例2：use 学生表↙

Display ↙

display all ↙

display all for 性别 .and. 入校总分>=500 ↙

display fields 学号,姓名,性别,入校总分for 性别='男'.and.入校总分>=500↙

练习1：练习2：练习3：练习4：分别用list 和display 命令显示所有女生记录（要求显示学号,姓名,性别,入校总分）；

分别用list 和display 命令显示1988 年1 月 1 日前出生的学生记录；

list for 出生日期<{^1988-01-01}

分别用list 和display 命令显示目前年龄大于20 岁的学生记录（要求显示学号, 姓名,性别,入校总分）；

list for (date()-出生日期)/365>20

用Disp 命令显示第四条记录后（含第四条记录）的所有记录

7、浏览记录命令：browse

命令格式：browse [fields<字段名表>] [for<条件>]

命令功能：在浏览窗口中显示满足条件的记录，缺省fields 参数则显示所有的字段。

实例1：练习：use 学生表↙

Browse ↙

Browse fields 学号,姓名,入校总分for 性别='男' ↙浏览侦查专业的所有成都籍女生记录的学号、姓名和入校总分。

比较：list、display 和browse 的区别

8、添加记录命令：append [blank]

命令格式：append [blank]

命令功能：不加参数blank，在已打开的表末尾添加一条空白记录，并显示要求立即输入数据；如果加参数blank，则在表末尾添加一条空白记录。

实例1：实例2：use 学生表↙append ↙

use 学生表↙append blank ↙

练习：在学生表的末尾再添加一条学号为x00101，姓名为李四的记录。

9、插入记录命令：insert

命令格式：insert [blank] [before]

命令功能：在当前表的当前记录后（缺省before 参数）或前（有before 参数）添加一条记录，并要求立即输入该条记录，如果有参数blank，则添加一条空白记录。

实例1：实例2：练习：use 学生表↙

go 4↙

insert ↙

use 学生表↙

go 4↙

insert blank before↙

操作上述两实例。

10、记录定位命令：go（绝对移动指针）、skip（相对当前记录而言移动指针）命令格式1：go top | bottom

命令功能：将当前表的记录指针移到第一条记录或表的最后一条记录

实例1：go bottom ↙

实例2：go top ↙

命令格式2：go <数值表达式>

命令功能：将当前表的记录指针移到记录号为数值表达式值的那条记录上。

实例1：实例2：Go 8 ↙

?Recno() ↙Display ↙x=3 ↙

Y=x**2 ↙Go y ↙Display ↙

命令格式3：skip [n]

命令功能：记录指针相对当前记录移动n 条记录，指向当前记录号加n 的那条记录上，n 若为正，则往前移动，如为负，则往后移；如果缺省参数n，相当于skip 1，

指针只移动一条记录位置。

实例3：go top ↙

Skip 5 ↙