收录日期:2020/07/08 22:46:02 时间:2016/06/07 20:55:08 标签:数据库相关
如果一个字段的的数据是按顺序排列的整数:1 2 3。。。11 12。。,我要使它们变成四位数的值:0001 0002 0003。。。0011 0012。。我该怎么办?
如果一个字段的的数据是按顺序排列的整数:1 2 3。。。11 12。。,我要使它们变成四位数的值:0001 0002 0003。。。0011 0012。。我该怎么办?

在sql server中有个取字符串相反的函数,我忘记了叫什么,就是你的123 会变成321 ,还有12变成21
然后就很简单了:

Declare @iNum varchar(10)
set @inum='13'
select reverse(right(100000000+reverse(@inum),4))

程序参考下面的方法:procedure MakeStrToSeven(SList:TStrings);
const
  FILL='0000000';
var
  i,p1,p2:Integer;
  l,s1,s2:String;
  tsl:TStringList;
begin
  tsl:=TStringList.Create;
  try
    for i:=0 to SList.Count-1 do
    begin
      l:=SList[i];
      p1:=Pos('|',l);
      p1:=PosEx('|',l,p1+1);
      p2:=PosEx('|',l,p1+1);
      s1:=Copy(l,p1+1,p2-p1-1);
      if Length(s1)<7 then
      begin
        if tsl.IndexOfName(s1)>=0 then
        begin
          s2:=tsl.Values[s1];
          s2:=IntToStr(StrToInt(s2)+1);
        end
        else
        begin
          s2:=s1+Copy(FILL,1,7-Length(s1));
          tsl.Values[s1]:=s2;
        end;
        SList[i]:=Copy(l,1,p1)+s2+Copy(l,p2,Length(l)-p2);
      end;
    end;
  finally
    tsl.Free;
  end;
end;
给你个例子做个参考
declare
@str varchar(4),
@i int

select @str=cast(序号字段 as varchar(4)) from 表
@i=len(@str)
while i<4 
begin
SET @str='0'+@str
set @i=@i+1
end

select @str from 表
支持楼上
不好意思,分送完了,感谢楼上两位的支持

有上海的.net程序员马?请在这里集合,你一定会觉得不虚此行! 老问题:拖放、DataGrid、EXCEL操作。。高手进。。 100分求可看香港翡翠台(TVB)的网络电视或网站,谢谢! 这台电脑播放音乐,局域网的另一台电脑发出声音。有没有这样的软件? 后退不刷新验证码的问题 ?? 高分求解问题!!(很简单哦) 用C++ builder编译成一个可执行文件,但是放到另一个机子上运行,显示初始化错误? 这个算是机密问题吗?谁知道帮忙解答 关于系统分析师的问题 关于k=(++i)+(++i)问题 请教一个用dataSetProvider更新数据的问题,请高手不吝赐教 怎么让两台机器共享上网 关于cookies的一点问题. 一个简单关于RegularExpressionValidator1控件的问题啊,各位大侠请帮忙一下。 如何在XmlDocument中插入之类信息 : 为何我的README和LICENSE在安装程序对话框中显示不出来?对于这两个文件的路径有什么特别要求吗?TKS! 关于制作VCD!(100分) 如何制作VCD的选曲菜单 FTP serv-U中,怎样设置一个Group的速度限制,我找来找去找不到,只有在每个User里一个选项卡General里有? 莫名其妙 如何让我程序中的一个进程暂停,我想让它恢复的时候再恢复!!! 偶准备做个虚拟地景软件,用 OpenGL 好还是 Direct X 好? 使用第三方控件的包问题 怎么用程序连接SQL数据库呀 求一程序问题 从那里可以下载VC++6.0? 关于msflexgrid 见过的最好的下接的菜单,谁能破解,必重分相谢! 弱弱的问VISUAL STUDIO.NET安装问题! 怎样才能让一个连接做两件事情? 最好的菜单,高分相谢!