[VB6] Moje VAN IP

Jak odczytać w VB6 mój adress VAN IP?

strName = Winsock1.LocalIP

to pokazuje moje LAN IP


Już mam.
Zrobiłem sobie sam gadżet na pulpit.