将整数格式化为 5 位数字的字符串

Question

我需要一个基于整数的字符串，它应该始终有 5 位数字。

示例：

myInteger = 999
formatedInteger = "00999"

在经典 ASP 中执行此操作的最佳方法是什么？

Answer 1

为此，您可以使用字符串操作函数。

这假设使用 VBScript 的经典 ASP（答案的原始版本）。

Const NUMBER_DIGITS = 5

Dim myInteger
Dim formatedInteger

myInteger = 999
formatedInteger = Right(String(NUMBER_DIGITS, "0") & myInteger, NUMBER_DIGITS)

这是一个优化版本，封装在一个函数中，提供可变宽度填充：

Const NUMBER_PADDING = "000000000000" ' a few zeroes more just to make sure

Function ZeroPadInteger(i, numberOfDigits)
  ZeroPadInteger = Right(NUMBER_PADDING & i, numberOfDigits)
End Function

' Call in code:

strNumber = ZeroPadInteger(myInteger, 5)

Answer 2

我经常看到这样的事情：

function PadNumber(number, width)
   dim padded : padded = cStr(number)

   while (len(padded) < width)
       padded = "0" & padded
   wend

   PadNumber = padded
end function

PadNumber(999, 5) '00999

Answer 3

尝试一下这一行（好吧，有两行可以防止错误）：

function padZeroDigits(sVariable, iLength)
    if (iLength <= len(sVariable)) then padZeroDigits = sVariable : exit function : end if
    padZeroDigits = string(iLength - len(sVariable),"0") & sVariable
end function

Answer 4

真的，你应该问自己为什么想要这个。

如果这是出于显示目的，那么最好在显示时对您的整数应用字符串格式化函数（将会有一个）。

另一方面，如果您需要它进行内部处理，即您总是期望循环中的五位数字或其他什么，但您不期望对值进行算术运算，那么首先将整数转换为字符串，然后进行任何处理。

简而言之，将整数变量转换为字符串并存储在新变量中，然后使用它。