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