How to get the return value of a function executed via eval 1

[FancyPrairie]

I call a function (element_myfunction) via Eval. I want the function to return a value. How do I do it? This is what my code looks like.

    Dim myReturnValue
    Dim strElementID

    strElementID = "Element1"
    myReturnValue = Eval(strElementID & "_myFunction")
    if (myReturnValue = "abc") then ...

Function Element1_myFunction()
    Element1_myFunction = "abc"
End Function

 

[PHV]

The following seems OK to me:

    Dim myReturnValue
    Dim strElementID
    strElementID = "Element1"
    myReturnValue = Eval(strElementID & "_myFunction")
    if (myReturnValue = "abc") then msgbox "OK"
Function Element1_myFunction()
    Element1_myFunction = "abc"
End Function

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[FancyPrairie]

Thanks for verifying this. It made me examine my code again. I discovered that I had forgot to declare myReturnValue in my original code (had Option Explicit set but visual studio didn't report it to me).