列挙型をテキストに落とす際Nullが入るのを防ぐには？ (ID:89749)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 列挙型をPutステートメントでテキストファイルに落としているのですが、 Type Data Head as string *10 Detail as string *10 Foot as string *10 end type のような簡単なものだと大丈夫なのですが、 type PLData title as string nData() as Data end type dim allData as plData （実際はもっと複雑です・・・） といったように列挙型をネストしていき、最後のallDataをPUTステートメントで 書き出すと各構造体の先頭の項目（この場合はtitleとHead）の頭にNull値が 入ってしまいます。なぜでしょう？ 何とかしてこのNullが入らないようにしたいのですが、わかる方よろしくお願いします。 ちなみに環境はWin2000、ExcelVBA2000です。