Свойство возвразает координату Y правого верхнего угла прямоугольника.
Visual Basic:
Property Ymax() As Double
read only
Sub ZRectangle_Ymax 'Создаем объем ZRectangle Set rect = CreateObject("ZuluLib.ZRectangle") 'присваеваем ему координаты вершин rect.SetRectangle 30, 31, 32, 33 'Выводим координату Y правого верхнего угла MsgBox(rect.Ymax) End Sub