Hai ragione, ma si può semplificare la vicenda:
codice:
Coordinate = Controllo.Parent.PointToScreen(Controllo.Location)
o anche
codice:
Coordinate = Controllo.PointToScreen(New Point(0,0))
.