DTPickerというものがありますが、これをCSVに書き出して、またテキストで読み込もうとすると、代入するところで、型が違いますとなってしまいまして、代入することができません。
どのようにしたら、代入することができるようになるのでしょうか？
以下のようにしたのですが、単純には行かないようでした。
ご教授願えますでしょうか？よろしくお願いいたします。

書き出し
Open ".\aaa.csv" For Output As #1
Write #1, Form1.DTPicker1.Value, Form1.Text1.Text
Close #1

ファイル内容
#2004-06-19#,"あかさたな"

読み込み
Open ".\df_fusigi.csv" For Input As #1
Input #1, a, b
Close #1
Form1.DTPicker1.Value = a
Form1.Text38.Text = b

初心者です。
すいません、自己解決しました。

Open ".\aaa.csv" For Input As #1
Input #1, a,b
Close #1
dft = Mid(j_memo(0), 2, 4) + "/" + Mid(j_memo(0), 7, 2) + "/" + Mid(j_memo(0), 10, 2)
Form1.Text1.Text = b

これで、できました。
お騒がせしました。
この辺のことって、どこを見れば掲載されているんでしょうねぇ？やっぱり、本を買ってきたほうがはやいのかなぁ？・・・とにかく、分かりました。

もう解決したようですが・・・

> dft = Mid(j_memo(0), 2, 4) + "/" + Mid(j_memo(0), 7, 2) + "/" + Mid(j_memo(0), 10, 2)
前後の"#"だけ外して「2004-06-19」でも、日付として認識してくれるので
Mid(j_memo(0), 2, 10) とか Replace(j_memo(0),"#","")
という手もありかと・・・

> この辺のことって、どこを見れば掲載されているんでしょうねぇ？
MSDNのヘルプ DTPicerコントロール Value プロパティの説明に
object.Value [=date]
date ・・・ コントロールに表示される日付を指定する日付式です。
とありますが・・・

初心者です。
ご回答ありがとうございます。

> MSDNのヘルプ DTPicerコントロール Value プロパティの説明に
> object.Value [=date]
> date ・・・ コントロールに表示される日付を指定する日付式です。
> とありますが・・・
すいません。。。見つけました；；
情報収集に問題があるようです。
勉強いたします。
ありがとうございました。