Office中国论坛/Access中国论坛

标题: 可以用Format函数解决吗？ [打印本页]

作者: lzongb 时间: 2011-7-31 16:10
标题: 可以用Format函数解决吗？
有一字符型字段SN，拟对其格式化，规则是：
如果SN＝“3”，则显示003；
如果SN＝“3A”，则显示003A；
如果SN＝“3AB”，则显示003AB
如果SN＝“33”，则显示033；
如果SN＝“33A”，则显示033A；

即数字部分要表示成“000”的格式，目前我是这样做的：
str(3-len(val([SN])),"0") & [SN]
（有局限，一是如果SN＝“3333”，会出错；二是如果SN＝“03”，结果就成了0003，原本是希望得到003的）

感觉这个问题应该能用Format函数解决，哪位大侠指点一下。

作者: zlu287 时间: 2011-7-31 16:45
新手报到，向大家学习

作者: jackysu78 时间: 2011-7-31 19:13
既然你提出了数字长度>3的情况，那应该是显示错误或是怎样的格式呢？

作者: todaynew 时间: 2011-7-31 20:18
本帖最后由 todaynew 于 2011-7-31 20:30 编辑

lzongb 发表于 2011-7-31 16:10
有一字符型字段SN，拟对其格式化，规则是：
如果SN＝“3”，则显示003；
如果SN＝“3A”，则显示003A；

先分后合，各个击破，即可：

format(Val(SN),"000") & Replace(Replace(SN,Val(SN),""),"0","")

作者: lzongb 时间: 2011-8-10 19:32

todaynew 发表于 2011-7-31 20:18
先分后合，各个击破，即可：

format(Val(SN),"000") & Replace(Replace(SN,Val(SN),""),"0","")

非常感谢提醒,改进了一下:
Format(Val([SN]),"\-000") & Mid([SN],Len(Val([SN]))+InStr([SN],Val([SN])))
(因为有些0是不能替换掉的)

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)