'Declaration Public Sub GetRectangle( _
ByRef x0X координата левого верхнего угла прямоугольника.As Double, _
ByRef y0Левая верхняя координата Y прямоугольника.As Double, _
ByRef x1X координата справа внизу прямоугольника.As Double, _
ByRef y1Правая нижняя координата Y прямоугольника.As Double _
)
Parameters
- x0
 - X координата левого верхнего угла прямоугольника.
 - y0
 - Левая верхняя координата Y прямоугольника.
 - x1
 - X координата справа внизу прямоугольника.
 - y1
 - Правая нижняя координата Y прямоугольника.