3.3 数组
, M: _' v. a- ]5 T2 _ a% m 一。什么是数组?数组就是是变量名相同而下标不同的一组变量。6 S2 \& l8 S* x) ~$ o8 a$ D
二。数组的定义:
; U8 t; F0 q: f9 V/ ^' T4 H7 ? 格式:dimension 数组名(下标最大值表)! L+ x; \& V, q- U, w+ W K% o' W
说明:! Y5 f6 x$ ^7 \' P, T" b
(1).该命令用于定义一维或二维数组。数组元素的起始下标为1.定义时数组元素的数据类型为逻辑型,并赋以逻辑假(.F.).此后数组元素的类型将取决于所赋值的类型。' V9 \8 F% I# ]' G p, E
(2).二维数组元素,既可用双下标引用,也可用单下标引用。例如,对一个两行三列的数组X,双下标引用方式可表示为:X(1,1),X(1,2),X(1,3),X(2,1),X(2,2),X(2,3),而采用单下标引用方式依次可表示为:X(1),X(2),X(3),X(4),X(5),X(6)
8 E, P; i' h+ e" c8 ? Y- z 例:定义一个一维数组X1(4)和一个二维数组Y1(2,3),并显示定义结果。! j J9 n" x5 D+ M
dimension x1(4),y1(2,3)# }! n: q( p1 B; }! u& U8 D2 e
list memory like ?1 &&显示变量名第二个字符为1的变量,like子句可使用通配符6 v: @7 C( Q+ [2 q5 ]3 b
三。从表向数组传递数据:
6 w; S2 S6 l5 W* B+ e, P) I) s 格式:copy to array 数组名 [fields 字段名表] [范围] [for 条件]
: P, T) `0 z! G7 F' f 功能:该命令用于将当前工作区打开的表当前指针开始的若干条记录的指定字段的内容复制到指定的数组中。
% O. ]7 B+ v" S" r' O! ]& G$ x) ]# n 例:将"职工档案"表的全部记录内容传送给数组asd5 Z( z: n; F0 b# g
use 职工档案
0 k* o" | |& H3 {2 k list
) u2 q* ?$ T! ~$ v& N+ s copy to array asd
2 C. O ]+ F& V7 o& b8 x7 T9 o# o1 B list memory like asd &&列出指定变量的内容,用like指定
' C& G K: E9 R2 `2 S 四。从数组向表传递数据:
* g2 C$ M* o* W: ]0 n; }4 h/ f 格式:append from array 数组名 [fields 字段名表] [for 条件]3 G3 N2 g2 Z, Q+ ~) }
功能:将指定条件的数组数据添加到当前表的尾部。
( ^. w8 J; J U% r& c 例:将数组asd的内容全部添加到"职工档案"表的尾部
: S+ n# U; e7 i% J- O use 职工档案
R* x" }0 H. l& l0 D list8 D8 b( N$ U' y) R1 a
append from array asd1 P, H1 z1 S/ i6 ]5 l0 N
browse |