Return Value

[martijn]

I want to make a function that gives a return value, but I don't know how to build one. Could someone help me?

Thanx and Greetz

 

[simongallop]

Not sure of what you want. If you want to carry out calculations on a field then:

Function MyStuff(TestData as ....)
''Carry out calculations then

TestData = Result of Calculations
End Function

What this does is the data being calculated is being passed to the function as variable TestData. When the function sees TestData = x it then returns x back to where it came from.

HTH

 

[martijn]

It's not what I mean.

In Delphi or C++ this is the body of the return function:

Funtion GiveFilename()
Return Filenaam
End Funtion

What the function has to do is return a private variable from a module class

 

[Pat Hartman]

The syntax in VBA is:

Funtion GiveFilename() as String
GiveFilename = Filenaam
End Funtion

It is always best to assign specific data types rather than using variants so I added the "as String". Then to set the value, you just use an equate statement in the form:

FunctionName = something

 

[martijn]

Thanx, that's what I needed!
=