report-builder2.0 - 如何在报表生成器中动态格式化货币字段？

Question

我有一份报告，我想在其中显示可以是多种不同货币的各种金额。我的查询为我提供了每个值的货币符号和三个字母的国家/地区代码（例如 GBP 或 USD），但我没有国家/地区 ISO 代码。

如何格式化值表达式以使用正确的货币符号？

我不能简单地将货币符号放在值的前面，因为某些值可能是负数，所以我希望减号出现在货币符号之前。

Answer 1

我整理了一些自定义代码来做到这一点：

Public Function Currency(ByVal s As String,ByVal a As Double) As String
 Dim r As String
  If a < 0 Then
      r = "(" + s + FORMAT(-1*a,"#,0.00") + ")"
  ElseIf a = 0
      r = "-"
  Else
      r = s + FORMAT(a,"#,0.00")
End If
Return r
End Function

在这里，我将货币符号作为s和金额作为a