CSVファイルの読み込み への返答

投稿で使用できる特殊コードの説明。(別タブで開きます。)
本名は入力しないようにしましょう。
投稿した後で削除するときに使うパスワードです。返答があった後は削除できません。
返答する人が目安にします。相手が小学生か社会人かで返答の仕方も変わります。
最初の投稿が質問の場合、質問者が解決時にチェックしてください。(以降も追加書き込み・返信は可能です。)
※「過去ログ」について書くときはその過去ログのURLも書いてください。

以下の返答は逆順(新しい順)に並んでいます。

投稿者 おさむ  (高校生) 投稿日時 2011/6/16 08:50:15
ありがとうございます。
早速試してみよとおもいます。
投稿者 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/15 11:59:28
初級講座の第30回をやったのですが、この内容をリストビューのCOLUMNSのコレクション有りで、コレクションごとに表示するにはどうすればいいですか?