An interesing thought

[Jack]

it actually works  

Code: (Select All)

_Title "FakeDLL-test"

$Console:Only

_Dest _Console

Option _Explicit



Declare Dynamic Library "addl"

    Function addl& Alias "_Z18FUNC_ADDL123456789PiS_" (x As Long, y As Long)

End Declare



Dim As Long x, y, z

x = 123

y = 456

z = addl(x, y)

Print z

579

Press any key to continue