收录日期:2019/12/16 13:33:14 时间: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 表
支持楼上
不好意思,分送完了,感谢楼上两位的支持

writeln 打印问题,急!! comboBox下拉框问题 【求助】asp.net收取邮件,并且下载邮件里面的附件然后删除邮件。。 writeln 打印问题,急!! ssh研究关于libssh2_session_startup函数 单位内网(跟外网物理隔离)安装杀毒软件,请给推荐下吧 是要安装网络版杀毒软件吗? 中文操作系统可以打印出来朝鲜文字吗? 很纠结的一个问题 关于c#操作excel 如何实现从文本里截取部分行显示? 请教一个和Maven test有关的问题,大家不吝赐教啊(最高就40分,全给啦!)^_^ 如果你发现你的情人跟你老婆家里人住在同一个小区,你会怎样做? 怎么把const char* 转换为char* 大侠们,请进来看看!Xml节点操作Web.config后的刷新问题 谁编译通过或者用过了Boost.asio里的广播例子,进来接分~ JS代码斜杠转义的问题,试了好久没出来。急,高手帮下忙。谢谢 求助:3D 的27注校验算法 如何实现? 芯片的带负载能力? MFC中如何更改自己生成的类的类名,谢谢啦! CDataGrid 怎么让列表的内容只读 熟悉mtk源码的请进 VB.NET 2008程序运行错误 - 项目配置文件 不使用类似sscanf任何库函数,使用C语言编程实现字符串到16进制数的转换 怎么网站中加入google地图 并且制定具体位置 VC 多显示器 全屏实现 问题 c# 插入中文到MYSQL就变成问号了? 窗体实现问题 麻烦看看是什么错误有关Lucene的 急急急急急!!!关于使用JVM插件从Oracle到处Excel表格的问题,高分在线等!!!进者有分!!! iPhone固件升级方案