duda con function vb6

[g_cury]

Ante todo gracias al que se interese en mi duda.
El tema es asi:
tengo una funcion a la que le envio una variable x como parametro declarada como currency con un valor, la cosa que segun ciertos criterios dentro de esa funcion el valor de esa variable la cambio pero la cambio dentro de la funcion, ahora cuando vuelvo de la funcion la variable que le habia pasado a la funcion me cambio el valor por el modificado en la funcion. (las variables son de ambito local, no son ni publicas ni globales)
como es esto??
paso el codigo

espero haber sido claro

dim z as currency
z=222
r = calculo(z)
...

private function calculo(x as currency)
...
b=111
...
x=b
.....

calculo=x
end function