afields( ) 函数示例

下面的示例创建名为 gamyarray 的数组,数组中放置表 customer 的字段信息,然后显示字段名。

close databases
open database (home( ) + 'samples\data\testdata')
use customer && 打开表 customer

gnfieldcount = afields(gamyarray) && 创建一个数组
clear
for ncount = 1 to gnfieldcount 
? gamyarray(ncount,1) && 显示所有的字段名
endfor