例如：姓名1 张三 2张 三  3张   三 4张    三
要求将姓名为两个字都替换为张  三（姓名中加两个空格）

原来都没有加空格的话  可以先用 len（）判断长度为4的 用SUBSTR()分别取 姓名的第一字 和第二个字 中间加上2个空格

用STRTRAN函数替换全部空格，替换后，如长度为4，则中间插入两个空格

如果只有2个字的中间才有空格的话：
repl all xm with left(allt(xm),2)+' '+right(allt(xm),2) for ' '$allt(xm)
repl all xm with left(allt(xm),2)+' '+right(allt(xm),2) for len(allt(xm))=4

谢谢！但替换后姓名中只有一个空格，要求两个空格？

repl all xm with left(allt(xm),2)+'  '+right(allt(xm),2) for ' '$allt(xm)
repl all xm with left(allt(xm),2)+'  '+right(allt(xm),2) for len(allt(xm))=4

多加一个空格就可以

replace all 姓名 with iif(len(chrtran(姓名,' ',''))=4,stuff(chrtran(姓名,' ',''),3,0,'  '),chrtran(姓名))