No value is returned to function call line

[Ankur]

Here you go:

Code:

x = TestFunction (sMenuClick, noMenuVal)
Reporter.ReportEvent micPass, "Test Function", "TestFunction: " & x

'Function file:

Code:

Function TestFunction (sMenuClick, noMenuVal)
If 1+1 = 2 Then
TestFunction = true
Reporter.ReportEvent micPass, "INSIDE Test Function", "TestFunction: " & TestFunction
End If
End Function

You forgot to assign the return value to a variable. Next time please format the code while posting a query.