Passing a textbox as a function parameter

I have a function that accepts a textbox as a parameter

eg.

Sub LogSetup(tb as textbox)
'Code
End sub

My problem is that when I attempt to run the code, I get a type mismatch error, because VB6 thinks I am passing the default method tb.text through.

Is there a method of disabling the default method in VB6 so that I can pass the object? Or is there a method of passing a reference to the object as the parameter like in VBA.

He,

try Sub LogSetup(byref tb as textbox)..

and if that does not work :

Sub LogSetup(byref tb as Object)
dim cCast as textbox

set cCast = tb

end sub

Code works in VB 5...

hope it help,

Jewe