使用ASCAN来查找数组数据

ASCAN参数表达式：

ASCAN(ArrayName, eExpression [, nStartElement [, nElementsSearched 
[, nSearchColumn [, nFlags ]]]])

 返回查找到的表达式的索引，如果反回0则代表数组中没有相应的信息，nStartElement代表从数据的第几个元素开始查起，nElementsSearched代表在数组中查找的次数，nSearchColumn代表当数组大于1维的时候，在哪儿一“列”查找。
Flag的参数：

0	Case Insensitive bit
1	Exactness ON bit (Only effective if bit 2 is set)
2	Override system Exact setting bit
3	Return row number if 2D array

应用范例：
可以将当前打开的数据库名称使用ADATABASES存入数组中，使用ASCAN来查询数组中有没有指定的数据库，返回值不为零代表数据库已经打开。
dimension abc[3]
adatabases(abc)    &&将打开的数据库名称填写到abc数组中
npos = ascan(abc, 'data1')    &&查找data1是否存在于abc数组中，如果npos不等于0表示这个表已经打开