vba - 自定义函数错误 : 'the expression cannot be used in a calculated column'

Question

在 Access 2010 中，我尝试在计算列中使用自定义 VBA 函数。我得到“表达式不能在计算列中使用”。

这是我的步骤:

启动 Access 2010。

创建一个新的数据库“DB”。

创建一个带有文本列“Column1”的表“Table1”。在 Column1 中创建一个带有“hello”的测试行。

在“创建”功能区上，单击右上角的“模块”，启动 VBA 编辑器。

在 VBA 编辑器“项目”窗口中，有两个项目“ACWZTOOL”和“DB”。选择“数据库”并选择“插入”->“模块”。

编写以下代码:

Public Function TestFunc() As String
    TestFunc = "test"
End Function

“调试”->“编译数据库”通过，“保存”并关闭 VBA 编辑器。现在“Module1”出现在左侧 Pane 的“Modules”选项卡中。

在表 1 中，创建一个计算列“Column2”，表达式为“Len([Column1])”，该列正常工作，测试行中的值为 5。

将表达式更改为“TestFunc()”，弹出错误。

我尝试了其他一些内置函数，似乎表达式生成器只支持“基本”函数。例如。 “InStrRev()”也无法识别。

Answer 1

根据this guide , 计算列表达式中不允许使用用户定义的函数。相关报价在“阅读”部分:

Be aware that calculated fields cannot call user-defined functions, only built-in functions. In addition, you must supply all parameters for methods that you call, even if the parameters are optional.