投稿者 mitchin  (社会人) 投稿日時 2009/9/13 08:43:00
1 箇所間違っていました。

誤
Protected Sub DrawDeme(ByVal g As Graphics)

正
Protected Overridable Sub DrawDeme(ByVal g As Graphics)

オーバーライドできないと拡張できませんよね。