以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]编号后几位位数不够用0替换  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=39128)

--  作者:loongtai
--  发布时间:2013/8/16 9:18:00
--  [求助]编号后几位位数不够用0替换
000104091225130  ====>   0010409122500130
00010409122524    ====>   00010409122500024
想把编号列从左边的样式转换成右边的样式。写了个代码,系统报错。

图片点击可在新窗口打开查看此主题相关图片如下:截图00.png
图片点击可在新窗口打开查看



--  作者:Bin
--  发布时间:2013/8/16 9:28:00
--  
一般程序都是从0开始算的,而不是从1开始算.  你这样就会超标了.自然报错.
--  作者:lsy
--  发布时间:2013/8/16 9:34:00
--  

For Each dr As DataRow In DataTables("待配组数据").DataRows

    Dim s As String = dr("电芯编号")

    dr("电芯编号") = s.SubString(0,11) & s.SubString(12).PadLeft(5,"0")
Next


--  作者:loongtai
--  发布时间:2013/8/16 9:36:00
--  
修改了下,代码好像起作用了,但是出现这种情况,另外也报错了。
图片点击可在新窗口打开查看此主题相关图片如下:截图00.png
图片点击可在新窗口打开查看

--  作者:Bin
--  发布时间:2013/8/16 9:37:00
--  
图片点击可在新窗口打开查看你参考楼上的吧,你数字都没数对.
--  作者:loongtai
--  发布时间:2013/8/16 9:44:00
--  
按照你的方法在命令窗口执行了下,数据都改成所期望的了,但最后为什么还会报错?
图片点击可在新窗口打开查看此主题相关图片如下:截图00.png
图片点击可在新窗口打开查看

--  作者:Bin
--  发布时间:2013/8/16 9:47:00
--  
你下面有空行吧.上例子看看
--  作者:loongtai
--  发布时间:2013/8/16 9:58:00
--  
是存在空行的原因。谢谢耐心解答!