How to get the return value of a function in Access vba?

Question

I want to replace several characters in a string with several other characters with the following function:

Public Function CharacterChange(S As String) As St