Von einer Funktion einen Text in ein TextBox übneh

Ich hab in einer Funktion einen Text und den will ich in einem Formular in einem TextBox einlesen. Wie kann ich den Text an die TextBox übergeben?

Function Test()
Form![UserForm]![TextBox]! = "Hallo"
End Function

Hatte ich mir so gedacht, funktioniert aber nicht