Thank you! This worked: (+Rep)
Code:
Code:
For i = 0 To PtList.Count - 1
    PtList(i) = New Point(PtList(i).X - 5, PtList(i).Y - 5)
Next