通过编程，自动在DBF表的末尾行增加三行，然后在最末行的相应位置显示最近出现的5个不同的数字。例如：由原始表，通过编程生成（依然在原始表显示）效果表的效果。

难点：零至九这十个字段名都是数值型，零这一列的空白，是否会默认为出现了0?

或者零至九这十个字段名都改为字符型，出现的数字用中文“一、二.......九”显示，是否可以解决问题?   通过编程，自动在DBF表的末尾行增加三行，然后在最末行的相应位置显示最近出现的5个不同的数字（汉字）

不是太明白

字段改为字符型好处理。

* 表名改为 ysb
* 所有字段改为字符型
close database
use ysb
delete for recno()>28
pack
c=""
n=0
for i=reccount() to 1 step -1
    go i
    for ii=1 to fcount()
        if not empty(evaluate(field(ii)))
            if not alltrim(evaluate(field(ii)))$c
                c=c+alltrim(evaluate(field(ii)))
                n=n+1
                exit
            endif
        endif
    endfor
    if n=5
        exit
    endif
endfor
for i=1 to 3
    append blank
endfor
for i=1 to len(c)
    b=substr(c,i,1)
    replace record reccount() (field(val(b)+1)) with b
endfor
browse

[此贴子已经被作者于2018-7-10 00:30编辑过]

谢谢，神明的版主。