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