I see. I tried for myself on Vista and had no problem getting the address of the function you specified. I made my own VB6 test and attached it. Your problem might be in not using 'Option Explicit' and thus using undeclared variables and variants. I highly recommend to enable it.
An additional note: You can use Exit For to exit a For..Next loop. GoTo is forbidden, even in VB6
