This is a little more non-specific:

Code:
    Private Function FindFormCoordinates(ByVal control As Control) As Point
        Return control.FindForm.PointToClient(control.PointToScreen(control.Location) - New Size(control.Location))
    End Function
If you find a problem with it, please let me know.
If you find a more efficient method, please let me know.
If you find there's a framework method, please let me know.
If you get tired of letting me know, don't let me know.