各位达人们，问题又来了：
我做的一个新增记录，想不用自己定义编号，让编号自动生成，也就是在编号最大的一个上加1。
交易编号是6位字符型。问题是运行表单时，如果数据表里没有记录，那么第一条记录是“0000 1”。
也就是那个“1”前面有个零不显示。。测试过不是空格。第二条也是“0000 2”如果存在很多记录，就会正常显示。
如“000011”“000232”请指教这是怎么回事？
程序如下
set exact on
select jyxx
set order to 交易编号
go bottom
i=val(alltrim(jyxx.交易编号))
if i<9 and i>1
i=i+1
k='00000'+str(i,1)
else
if i<99
i=i+1
k='0000'+str(i,2)
else
if i<999
i=i+1
k='000'+str(i,3)
else
if i<9999
i=i+1
k='00'+str(i,4)
else
if i<99999
i=i+1
k='0'+str(i,5)
else
if i<999999
i=i+1
k=str(i,6)
else
k='000001'
endif
endif
endif
endif
endif
endif
thisform.交易编号.value=alltrim(k)

没用啊，依然是0000 1，而且编号一直是0000 1，不会住上加，也就是说表里的记录只有一个一样的编号0000 1
确实搞不懂，请教

谢谢，搞定了，谢谢指导
我那一大堆补“0”的程序原来都是浪费，呵呵