Ms access Md访问:文本框中未显示用户定义的函数值

Ms access Md访问:文本框中未显示用户定义的函数值,ms-access,vba,Ms Access,Vba,在我的表单中,我有一个文本框,TextBox1,并且我将文本框的控制源设置为一个用户定义的函数,即=UserTracking()。用户跟踪功能在名为用户定义的\u函数的模块中定义。功能如下 Function UserTracking() As String Dim test As String test = "TEST" End Function 现在我希望这个TEST应该出现在表单视图的文本框中,但它没有显示出来。它也没有给出任何错误。我怎样才能做到这一点?提前谢谢 您需要在函数中将值设置为

在我的表单中,我有一个文本框,
TextBox1
,并且我将文本框的控制源设置为一个用户定义的函数,即
=UserTracking()
。用户跟踪功能在名为
用户定义的\u函数
的模块中定义。功能如下

Function UserTracking() As String
Dim test As String
test = "TEST"
End Function

现在我希望这个
TEST
应该出现在表单视图的文本框中,但它没有显示出来。它也没有给出任何错误。我怎样才能做到这一点?提前谢谢

您需要在函数中将值设置为
UserTracking

Function UserTracking() As String
Dim test As String
test = "TEST"
UserTracking = test
End Function