Public Sub Move( _ ByVal Point1 As Point, _ ByVal Point2 As Point _ )
InfiniteLine Object | InfiniteLine Members