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