>>122 情報ありがとうございます。

＜＜このような場合は、クラスモジュールのイベント Initialize
と Terminate を利用します。＞＞
と書いてありますが、わたしがやりたいのは、たとえば

　Private 赤_りんご As New clsりんご(iro := "赤"）
　Private 青_りんご As New clsりんご(iro := "青"）

のような感じなのです。

　私の感じでは「クラスのインスタンスを生成する側が
初期値を指定できないと使いづらいというか、
クラスの意味が半減？する気がします。」

　そんな馬鹿なことはないと思いますので、なにか方法があるように
おもうのです。Initializeにたいして、（インスタンスを
作成する側は）初期値を渡せるのでしょうか？