テキストファイルをX行目からY行目までと指定して書き出すには？ (ID:114333)

名前

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

本文 VB.NETのソースですがVB6では出来るか試してください。 Dim fileno As Integer Dim s As String fileno = FreeFile() FileOpen(fileno, "c:\test.txt", OpenMode.Input) While Not EOF(fileno) s = LineInput(fileno) End While FileClose(fileno) これで変数sに一行づつデータが取得出来ます。 順番に一行ずつです。 s = LineInput(fileno)の下に Msgを使って確認して見ればどのように取得されているのか分かります。 あとは、indexOf関数で検索をかけて switch構文で枝分かれにし、 つなげていけば何とかなると思います。