谢谢各位，偶就是要这个，多谢

多谢哈，这样这样，用TonyDeng版主的提示，我们都应该知道我们的数组第一个元素的类型呀，所以可以用vartype(arrayname)==**来判定该数组是否存在呀。**是数组第一个元素的数据类型。

可用type()函数判断，加上参数“1”。

例如：

X=10
? type('X',1)  && 由于变量 X 不是数组，所以返回“U”

dime X(10)
? type('X',1)  && 变量 X 是数组，这时返回“A”

FUNCTION IsArr(MyArr)  && MyArr 需要加引号作为参数传送
   LOCAL IsType
   IsType='OK'
   TRY         
         IsType=VARTYPE(ALEN(&MyArr,1))
    CATCH TO oErr
        IsType='ERR'
    FINALLY
           DoOther=NULL
    ENDTRY
    RETURN IIF(IsType=='ERR',.F.,.T.)
ENDFUNC