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