2020年5月25日 星期一

vb.net 使用 Listview 的 Group 分類 [Use ListView Group]


 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
    Private Sub lvwGroup()
        Dim bln As Boolean = False
        For i As Integer = 0 To 3
            If bln = False Then
                bln = True
                Dim lvwgUserGroup As New ListViewGroup
                lvwgUserGroup.Name = "Nombre"
                lvwgUserGroup.Header = "Titulo"
                lvwLista.Groups.Add(lvwgUserGroup)
            Else
                Dim lvwi As New ListViewItem("", lvwLista.Groups("Nombre"))
                lvwi.Text = "Texto"
                lvwLista.Items.Add(lvwi)
            End If
        Next
    End Sub

沒有留言:

張貼留言