テキストファイルを複数読み込むには

解決

yopito  2003-04-13 23:23:55  No: 106675  IP: [192.*.*.*]

今度は、フォームを開くときに、過去に保存した".txt"のファイルをテキストボックスかリストボックスに読み込みたいのです。１個だと問題なく読めるのですが、複数あります。（ちなみに６個）コレを"Form_Load"時にある分だけ読み込むことは可能でしょうか？

編集 削除
R&K  2003-04-14 09:31:40  No: 106676  IP: [192.*.*.*]

はじめまして

ファイルの中身なのか、ファイル名なのかいまいち
わかりませんが、リストボックスにファイル名を
追加するのは

Dim res As String

List1.Clear
res=Dir("C:\temp\*.txt")
Do While res <> ""
  List1.AddItem res
  res=Dir
Loop

これでC:\Tempの.txtファイルだけのファイル名が
List1に追加していくことができます。

もしファイルの内容ということなら、Dirでファイル名
を取得した後で、ひとつずつ開いて読むだけだと思うの
ですが、用途が違うのでしょうか？

Form_Loadの中に記述しても良いし、別のFunctionに
しても良いと思います。

参考になれば

編集 削除
yopito  2003-04-14 17:33:47  No: 106677  IP: [192.*.*.*]

ありがとうございました。
解決しました。

編集 削除