AFIELDS( ) 函式

AFIELDS( ) 函式，把當前表的結構信息存放在一個數組中，並且返回表的欄位數。

基本介紹

• 中文名：AFIELDS( ) 函式
• 定義：當前表的結構信息存放在一個數組中，並且返回表的欄位數

函式語法

AFIELDS(ArrayName [, nWorkArea | cTableAlias])

函式參數

ArrayName

指定數組名，將表結構信息存放在這個數組中。如果 AFIELDS( ) 函式指定的數組不存在，Visual FoxPro 將自動創建此數組。如果數組存在，但大小不足以包含 AFIELDS( ) 函式返回的所有信息，Visual FoxPro 將自動增加數組大小，使數組能容納所有信息。

nWorkArea

指定表所在的工作區，在這個工作區中打開的表的結構信息要存放到數組中。

cTableAlias

指定表的別名。此表的結構信息要存放到數組中。

如果省略參數 nWorkArea 和 cTableAlias，將把當前選定工作區中的表結構信息存入數組中。

下表描述了數組中每列的內容和每列信息的數據類型，每行對應表的一個欄位。

列號 欄位信息 數據類型

1 欄位名 字元型

2 欄位類型:

C = 字元型

D = 日期型

L = 邏輯型

M = 備註型

N = 數值型

F = 浮點型

I = 整型

B = 雙精度型

Y = 貨幣型

T = 日期時間型

G = 通用型 字元型

3 欄位寬度 數值型

4 小數位 數值型

5 允許 Null 值 邏輯型

6 不允許代碼頁轉換 邏輯型

7 欄位有效性表達式 字元型

8 欄位有效性文本 字元型

9 欄位默認值 字元型

10 表有效性表達式 字元型

11 表有效性文本 字元型

12 長表名 字元型

13 插入觸發器表達式 字元型

14 更新觸發器表達式 字元型

15 刪除觸發器表達式 字元型

16 表注釋 字元型

函式說明

AFIELDS( ) 函式返回表的欄位數。數組包含 16 列，行數與表中欄位數相同。

使用 COPY STRUCTURE EXTENDED 命令可以將類似的信息複製到一個表而不是一個數組中。

函式示例

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