Access + VBA：货币更改。区域设置

Question

Access 使用货币类型的区域/国家/地区设置。

如何更改货币类型中的符号？

Dim DBTable as ADOX.Table
Dim DBCatalog as ADOX.Catalog
Dim DBConnection as ADODB.Connection


DBTable.Name = "TableName"
DBTable.Columns.Append "Currency", adCurrency
DBCatalog.Tables.Append DBTable

Dim C as Double
C = 30.42
DBConnection.Execute "INSERT INTO TableName VALUES (" + "'" + Str(C) + "'" + " ) "

Answer 1

该Currency数据类型不存储任何货币符号信息。它只是一种特殊的数字类型，最适合用于精确的与货币相关的存储。

Access 文档将货币数据类型定义为：

货币变量以整数格式存储为 64 位（8 字节）数字，按 10,000 缩放以给出小数点左侧 15 位、右侧 4 位的定点数。此表示提供的范围为 -922,337,203,685,477.5808 到 922,337,203,685,477.5807。货币的类型声明字符是 at 符号 (@)。

货币数据类型对于涉及货币的计算和精度尤为重要的定点计算非常有用。

因此，并不是因为它被称为数据类型，它实际上与任何特定的世界货币Currency有任何关系。 您在货币字段中存储的值的含义取决于您。

格式化

显示Currency数据类型时，Access 将默认显示当前区域设置的货币符号。当然，只有当您在该字段中存储的是来自您自己国家的钱时，这才有意义。

设计表时最好覆盖此行为，以便格式将在您使用该字段的任何地方传播。
例如，突出显示的CurrencyRate字段设置为使用货币格式，因此它将使用$，因为这是我的语言环境的货币符号：

只需覆盖该格式即可将字段格式化为其他格式。
例如，作为具有 3 位小数的标准数字或欧元：

当需要在窗体或数据表中显示数据时，您还可以覆盖控件的Format属性：

综上所述

因此，货币符号不是数据库中存储什么值的问题，而是该值对您的应用程序意味着什么以及如何向用户显示它的问题。