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