下面的程序在数据库 testdata 中打开表 employee。 alines( ) 用于复制notes备注型字段中的行到名为 amyarray 的数组中, 然后显示数组的内容。
本示例中,alines( ) 返回 1,因为在备注字段中输入雇员信息时,句子后没有按 enter 键。
close databases
clear
set talk off
open database (home(2) + 'data\testdata')
use employee && 打开 employee 表?
alines(amyarray,employee.notes) && 显示 1
? amyarray(1)