tagCANDY CGI VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
[ツリー表示へ]  [ワード検索]  [Home]

タイトル テキストをtextboxに配置
投稿日: 2008/08/12(Tue) 00:37
投稿者イチノセ
みなさん、はじめまして。
VB6.0 winvista 32 環境でプログラムを作っています。
テキストファイルの中から特定の文字列(項目名)を複数のテキストボックスに
配置しようとしているのですが、テキストボックスに表示されるのは
すべての行の項目名が入ってしまいます。
これを一行ずつテキストボックスに収めるにはどうすれば良いのでしょうか?

※テキストの中身(test001.txt)
0001,あいうえお,アイウエオ,aiueo
0002,かきくけこ,カキクケコ,kakikukeko
0003,さしすせそ,サアシスセソ,sashisuseso
 ・
 ・
 ・
この中のカナ部分のみを複数のテキストボックスへ配置したいのです。

試したコード

   Dim line As String
        Dim Item() As String
        Dim reader As New System.IO.StreamReader("D:\test001.txt", System.Text.Encoding.Default)
        TextBox1.Clear()
        Do Until reader.EndOfStream
            line = reader.ReadLine
            Item = line.Split(",")
            'TextBox1.AppendText(line.Substring(3) & ControlChars.CrLf)
            TextBox1.AppendText(Item(2))
            TextBox2.AppendText(Item(2))
        Loop
        reader.Close()

実際の動作は、TextBox1と2も同じく[アイウエオカキクケコサシスセソ・・・・]
になってしまいます。
どれが一行目でどれが2行目なのか等記入すれば思いどおりに表示できるのでしょうか?



その記述方法がわからないのですが、どなたか知恵を貸していただけませんでしょうか?

- 関連一覧ツリー をクリックするとツリー全体を一括表示します)

古いスレッドにレスはつけられません。