可以自己寫個函數判斷:
dim?t
InArr=true
for?each?t?in?a
if?v=t?then?exit?function
next?t
InArr=false
End?Function