编程论坛 → ASP技术论坛

怎么使数字保持四位?

Kettyjin1983 发布于 2008-04-21 16:23， 704 次点击

我这边有数字生成,比如:12,要把它变成0012,134变成0134,7 变成0007,有什么函数可以实现啊?

6 回复

214112008-04-21 17:11

用format()函数吧，详细的上百度找找。

ysm1402008-04-21 17:35

right("0000"&cstr(num),4)

num为你的数字

frankqnj2008-04-21 19:16

最简单的 len 就能实现啊
看有几个字符。1个就"000"& 2个的话就 "00"& 3个就"0"&

lele20072008-04-21 23:48

<%
dim number
randomize timer
number=int(10000*rnd()+1)
if len(number)<4 then
response.write cstr(0) & number
else
response.write number
end if
%>
<meta http-equiv="refresh" content="1,url=asp.asp">
---------------------------------------------------------------
看看是不是你想要的！保持四位数，不够前面用：0补上！

Kettyjin19832008-04-22 10:24

引用了3楼的.方法不错.

天涯听雨2008-04-22 10:42

'====================================================================
'补位
Function BuWei(newid,LengthStr)
newid2 = ""
i = 0
IDLength = LengthStr  '共几位，不足以0来补。
newidLength = Len(newid)
buweiLength = IDLength - newidLength
If buweiLength > 0 then
   For i = 1 to buweiLength
       newid2  = "0" & newid2
   next
Else
   newid2 = ""
End If

newid2 = newid2 & newid
BuWei = newid2
End Function