Código
Option Explicit Public Function Mensaje(ByVal Msg As String) As String Mensaje = Msg End Function
Para mi el problema esta en que ninguna de las variables tienen informacion, es decir
que estan vacias.
intenta con la DLL asi:
Código
Option Explicit Public Function Mensaje(ByVal Msg As String) As String Msg = "Hola Mundo!" Mensaje = Msg End Function