以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  自动编号字符串截取(已解决!)  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=70961)

--  作者:王嘉艺
--  发布时间:2015/7/2 11:03:00
--  自动编号字符串截取(已解决!)
自动编号是根据类型和日期组合的,当类型列数据的长度不确定时,用max.Substring就没法设第一个参数,请问老师该怎么处理?
[此贴子已经被作者于2015/7/2 11:57:23编辑过]

--  作者:大红袍
--  发布时间:2015/7/2 11:09:00
--  

 前面的编号变量 bh 的值,肯定是确定的。

 

 max.SubString(bh.Length)


--  作者:王嘉艺
--  发布时间:2015/7/2 11:14:00
--  
但是实际应用中比如我现在的产品有:充电桩线,电子线,特种定制阻燃线,普通线等!
--  作者:大红袍
--  发布时间:2015/7/2 11:17:00
--  

bh前面肯定是定义了的。直接根据你的bh取位置 max.SubString(bh.Length)


--  作者:王嘉艺
--  发布时间:2015/7/2 11:27:00
--  
那我就可以这样写了:
 If max > "" Then \'如果存在最大单据编号
       idx = CInt(max.Substring(bh.Length+1,2)) + 1 \'获得最大单据编号的后两位顺序号,并加1
Else
       dx = 1 \'否则顺序号等于1
End If

[此贴子已经被作者于2015/7/2 11:42:32编辑过]

--  作者:大红袍
--  发布时间:2015/7/2 11:38:00
--  

 呃,这个意思?

 

idx = CInt(max.SubString(bh.Length-2,2))


--  作者:王嘉艺
--  发布时间:2015/7/2 11:54:00
--  
直接用这个就好了!!! idx = CInt(max.Substring(bh.Length,2)) + 1 
[此贴子已经被作者于2015/7/2 11:56:49编辑过]