诸位，小弟问个自动生成编号的问题！！先谢谢了
……格式为（A000）的程序怎么写？

本论坛已有多个帖子讨论这个问题，这是其中一个：

https://bbs.bccn.net/viewthread.php?tid=317660&highlight=%D7%D4%B6%AF%B1%E0%BA%C5

******给表文件中记录自动编号(设,自动编号的字段为:zdbh,字符型)
USE 表名 EXCLUSIVE
GO TOP
bh=0
DO WHILE .NOT. EOF()
   REPLACE zdbh WITH "A"+PADL(ALLTRIM(STR(bh)),3,"0")
   bh=bh+1
SKIP
ENDDO
&&&&&如果不是给表文件中记录自动编号，是给数组则参照上面的方法即可。

我也学习一下！

学习

学习

学习

学习