Missing parameter - while compiling

[davide69]

Hello,
I would appreciate an help ...

I am trying to convert a function from VB program to B4A.

I have a sub that should executed a difference between two complex numers but I receive from the compiler the error message "missing parameter" in the line cdif.im and cdif.re

My code looks like:

Sub process_globals
Type complex (re as float, im as float)
dim a,b,c as complex

end sub

sub calculation
c=cdif(a,b)
end sub

Sub Cdif(z1 as complex, z2 as complex) as complex
cdiff.im=z1.im-z2.im
cdiff.re=z1.re-z1.re
end sub

Thanks

Davide

 

[Erel]

You should declare the function variable explicitly. There is no special variable.

Sub Cdif(z1 As complex, z2 As complex) As complex
    Dim cdiff As complex
    cdiff.im=z1.im-z2.im
    cdiff.re=z1.re-z1.re
    Return cdiff
End Sub

 

[davide69]

Thanks Erel, It works fine.

Davide