'宣言 Public Function New()
'使用法 Dim instance As New RectangleShape()
public RectangleShape()
RectangleShape クラス RectangleShape メンバ