ファイルのコピーについて

質問

次のようにファイル名が記述されている、テキストファイルがあります。

「A.xls,B.txt
C.doc,D.xls,E.pdf」
行と行はEnterで改行されており、ファイ名は「,」で区切られています。
この状態で、最後の行の複数のファイルを特定のフォルダにコピーするにはどのように記述すればいいですか？

回答No.1

redfox63 · ベストアンサー

# VB6の例です

dim sLine as string
dim ff as integer
dim sName() as String

ff = FreeFile
Open "ファイル名" for input as ff
do until eof(ff)
line input #ff, sLine
Loop
CLose ff
sName = split( sLine, ",")

といった具合で sName配列にファイル名が取得できると思います

お礼

ご回答ありがとうございました。
初心者で、正直、よく意味がわかりませんが勉強して行きたいと思います。
これからもよろしくお願いいたします。