listviewに追加した項目を表示するには？ (ID:116141)

名前

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

本文

>ただ、listview自体を変数として宣言し、同じようにlistviewにlistviewitemを追加して、
>これをformに貼り付けると、ちゃんとDBの内容が表示されていることから、listviewへの項目の
>追加についてはちゃんとできているような気がします。
たぶん読んでる側には何のことか伝わってないと思うけど、ヘルプ見てたら
たまたま分かったので…ｗ。
-2 が原因みたい。でも理由は不明のままですが。Me.Controls.Add された
後のイベントを１つ１つ検証していけば分かるんだろうけど…やる気が…(汗)
[VB.NET]
    Private Sub btnSqlSelect_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSqlSelect.Click
        Dim i As Integer

With Me.lsv_1.Columns
            For i = 0 To .Count - 1
                .Item(i).Width = 80
            Next
        End With
    End Sub

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Me.CreateMyListView()
        With Me.lsv_1
            .Bounds = New Rectangle(New Point(10, 220), New Size(300, 200))
            .View = View.Details
            .Columns.Add("Item Column", -2, HorizontalAlignment.Left)
            .Columns.Add("Column 2", -2, HorizontalAlignment.Left)
            .Columns.Add("Column 3", -2, HorizontalAlignment.Left)
            .Columns.Add("Column 4", -2, HorizontalAlignment.Center)
        End With
    End Sub

Private Sub CreateMyListView()
        ' Create a new ListView control.
        Dim listView1 As New ListView
        With listView1
            .Bounds = New Rectangle(New Point(10, 10), New Size(300, 200))
            ' Set the view to show details.
            .View = View.Details
            ' Create columns for the items and subitems.
            .Columns.Add("Item Column", -2, HorizontalAlignment.Left)
            .Columns.Add("Column 2", -2, HorizontalAlignment.Left)
            .Columns.Add("Column 3", -2, HorizontalAlignment.Left)
            .Columns.Add("Column 4", -2, HorizontalAlignment.Center)
        End With
        Me.Controls.Add(listView1)
    End Sub 'CreateMyListView

←解決時は質問者本人がここをチェックしてください。

戻る