CLOSE DATABASES
 USE ls.DBF
for I=4 To Fcount()   &&我从第4个字段开始
cfield=fields(i)
REPLACE  &cfield. WITH " "for alltr(fields(i))='0'&&&只要是0的用空格替换。
ENDFOR

USE ls
SCAN
    FOR i = 4 TO FCOUNT()
        IF ALLTRIM(EVALUATE(FIELD(i))) == "0"
            REPLACE (FIELD(i)) WITH ""
        ENDIF
    ENDFOR
ENDSCAN

红色部分为什么不用那个cfield变量呢？

行的，我的代码错在哪里？
在命令窗中:例如字段为ZF中把0的替换为""
         replace zf with " " for alltrim(zf)="0"
      是可行的，全部含有0都替换了。
       现只要把字段逐个循环不也是可行吗
                FOR i = 4 TO FCOUNT()
                     cfiel=field(i)
             replace &cfiel with " " for alltrim(field(i))="0"
                endfor
为什么还要SCAN  
           IF
            END
         ENDSCA
  

[ 本帖最后由 sylknb 于 2015-5-21 15:55 编辑 ]

alltrim(zf)返回的是字段的值，如："0"
alltrim(field(i))返回的是字段的名，如："zf"

FOR I=4 TO FCOUNT()
    BLANK ALL FIELDS (FIELD(I)) FOR ALLTRIM(EVALUATE(FIELD(I)))=="0"
ENDFOR

理论与实践相结合，活学活用。
对所用函数没有做到真正熟练掌握的程度。

[ 本帖最后由 sdta 于 2015-5-21 16:12 编辑 ]

对的 用BLANK ALL ... FOR

你知道未知的字段類型都是字符型就敢用alltrim()？還跟字符型"0"做邏輯比較？

alltrim(zf)返回的是字段的值，如："0"
alltrim(field(i))返回的是字段的名，如："zf"
 一直理介为 for alltrim(field(i))='0'中提出字段名zf,它的值等于0 与for alltrim(zf)='0'应是等同的
从ALLTRIM(EVALUATE(FIELD(I)))=="0"中来理介==前半句是计算出字段的值，假如是0，则等号前面的0等于等号后面的0-->0==0
zf=0与field(i))=0是不同的。
上述理介不知对否？