FUNCTION Event(x AS DOUBLE) AS DOUBLE

[Dimster]

Before creating a function I normally would Dimension x as Double BEFORE I actually call the function. For example

Dim x as Double
...code..
...code..

x = Event
...
Function Event(x)
...code...
End Function

But, dimensioning on an "as needed basis" or "on the run" what is the correct syntax

Function Event (x as Double) as Double or Function Event(x) as Double or Function Event (x as Double)??

It's hard to give up on the old ways, if they worked, to learn a new more efficient way. (by efficient I mean to reduce all those Dim Shared variables I have at the beginning of my code to only creating them when they are actually called for service.

[Kernelpanic]

. . .
Function Event (x as Double) as Double or Function Event(x) as Double or Function Event (x as Double)??

It's hard to give up on the old ways, if they worked, to learn a new more efficient way. (by efficient I mean to reduce all those Dim Shared variables I have at the beginning of my code to only creating them when they are actually called for service.

I don't really understand what you actually want. . . 

Code: (Select All)

'Declaration

Declare Function Endpreis(kaufpreis, mehrwertSteuer As Double) As Double



. . . Code



'Definition

Function Endpreis (kaufpreis, mehrwertSteuer As Double)



  Dim As Double gesamtpreis



  gesamtpreis = kaufpreis + ((kaufpreis * mehrwertSteuer) / 100)

  Endpreis = gesamtpreis

End Function

[SMcNeill]

Are you looking for:

FUNCTION Event# (x AS DOUBLE)

The # after the name Event denotes it as returning a double value back to us. 

[TerryRitchie]

Code: (Select All)

PRINT Event

FUNCTION Event# (x AS DOUBLE)

    'code here
    Event = 1000

END FUNCTION

.
You can't declare a function AS DOUBLE, you must instead use the type identifier as shown above.

Update: Steve beat me to it my mere seconds

[Dimster]

That where I've  missed the boat - the correct syntax is 
FUNCTION Event#(x as double)
Thank you