'宣言 Public Function New( _ ByVal rect As _Rect _ )
public RectArea( _Rect rect )
RectArea クラス RectArea メンバ