Visual Basic 中学校 掲示板 投稿内容
タグのない投稿を抽出 統計 RSS

Visual Basic 中学校 > 投稿一覧 >

CSVファイルの読み込み 解決済み

CSV ListView タグの編集...

投稿者 おさむ   (高校生)   投稿日時 2011/6/15 11:59:28
初級講座の第30回をやったのですが、この内容をリストビューのCOLUMNSのコレクション有りで、コレクションごとに表示するにはどうすればいいですか?

投稿者 shu   (社会人)   投稿日時 2011/6/15 12:31:18
ファイルの内容は簡素に文字列配列にしてあります。
読み込みは出来ているとの事なのでこの内容を読み替えてみて下さい。
タイトル行は『:』の前後で表題と幅を表しています。

        Dim strLines() As String = {"col1:40,col2:70,col3:60,col4:100", _
                        "aaaa,1,bbbb,2", _
                        "cccc,3,dddd,4", _
                        "eeee,5,ffff,6", _
                        "gggg,7,hhhh,8"}
        Dim blnTitleLine = True

        ListView1.Clear()
        For Each strLine As String In strLines
            Dim strVals() As String = strLine.Split(","c)
            If blnTitleLine Then
                For Each strCol In strVals
                    Dim strNmWd = strCol.Split(":"c)
                    ListView1.Columns.Add(strNmWd(0), CInt(strNmWd(1)))
                Next
                blnTitleLine = False
            Else
                ListView1.Items.Add(New ListViewItem(strVals))
            End If
        Next

投稿者 おさむ   (高校生)   投稿日時 2011/6/16 08:50:15
ありがとうございます。
早速試してみよとおもいます。