How to find a file on local drives

Hi
Can anyone tell me how to write a function in VB6.0,
to search all local drives and locates a specified file and
returns its path.
Thanks,
Tomaz