比如：AB%-5-7#88@
通过函数只保留字母和数字，结果为AB5788

A2Z='ABCDEFGHIJKLMNOPQRSTUVWXYZ'
s1='AB%-5-7#88@'
s2='1234567890'+A2Z+LOWER(A2Z)
?CHRTRAN(s1,CHRTRAN(s1,s2,''),'')

"比如"是解决不了问题的，要拿出全部数据出来让大家看看！

就楼主比如而言的问题的解决方法
cStr="AB%-5-7#88@"
?CHRTRAN(cStr,"%-#@","")

您的回答是我想要的结果。

我原本是这样实现的：
t=AB%-5-7#88@
u=""
FOR i=1 TO LEN(t)
    m=SUBSTR(t,i,1)
    IF ATC(m,"ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789")<1
    m=""
    ENDIF
    u=u+m
ENDFOR
t=u
看来可以用您的方法替换了。谢谢。

其它特殊字符不确定会有什么，不管会有什么，只保留其它字母和数字。
二楼是我想要的答案。谢谢您的答复。

如果要保留汉字、字母和数字呢？比如规范门牌号和商品型号。

思路大概是这样：用 chrtranc() 函数，列举可能出现的符号和特殊字符，这个可能比较困难