如何去重
我的库中有行数字:1332256,如何变成:12356.
类似的有许多行.
若仅仅是想去掉连续重复的半角字符,则建议用自定义函数
replace all 字段 with dem(字段)
function dem
parameters lcText
if empty(lcText)
return ''
endif
lcNewText=left(lcText,1)
for lnCnt=1 to len(lcText)
lcOneChar=substr(lcText,lnCnt,1)
if right(lcNewText)!=lcOneChar
lcNewText=lcNewText+lcOneChar
endif
endfor
return lcNewText