现将‘093030401470’编程数值型然后加1，又将其变成字符型，字符串前加个零就行了。

go top
h=93030401470
k=0
do while .not.eof()
   repl 字段 with str(K,1)+str(h,11)
   skip 1
   h=h+1
enddo

或者

h=93030401470
k=0
scan
  repl 字段 with str(K,1)+str(h,11)
  h=h+1
endscan