字符串数字格式为＆＃34; /＆＃34;千分隔符

Question

sValA变量。

例如sValA = 23224560。

我需要以下格式：

  

23/224/560

（将/字符指定为<​​strong>千位分隔符。）

我的尝试：

Format(23224560, "#,##0")返回： 23,224,560

但Format(23224560, "#/##0")返回： 23224/560 ！的 （需要）

Answer 1

除了系统识别的数字格式之外，您不能使用千位分隔符 - 您的千位分隔符似乎是逗号。要使用除系统千位分隔符以外的任何其他内容，您可以通过重复模式来实现所需的结果：

?Format(23224560, "###/###/##0")
23/224/560

当然，只有在您的号码至少为7位且最多为9位时才有效。您可以使用Select块进行格式化：

Dim sValA As String
sValA = 23224560

Dim result As String

Select Case Len(sValA)
  Case 1 To 3
      result = Format$(sValA, "##0")
  Case 4 To 6
      result = Format$(sValA, "###/##0")
  Case 7 To 9
      result = Format$(sValA, "###/###/##0")
  'Case...
End Select

PS - 你最好使用Format$函数返回String，而不是返回Format的{​​{1}}。