본문 바로가기
카테고리 없음

ListView 내용 이미지 추가 및 아이템 세로 간격 조정로직

by 호야호잇 2019. 9. 2.

  For Each row As DataRow In SqlDB_Set.Tables(0).Rows

                'ImageList1에 리소스 안에 있는 button 이미지 추가
                ImageList1.Images.Add("점이미지", My.Resources.button)

                'Listview에 추가할 내용 범위 지정
                Dim str() As String = {"", row("제목"), row("num")}

                'ListView에 지정한 범위 내용 추가 후 이미지키 추가
                Dim AddListviewItems As New ListViewItem(str)
                AddListviewItems.ImageKey = "점이미지"

                '최종 ListView1에 내용 추가
                ListView1.Items.Add(AddListviewItems)

                ' ListView1.Items.Add(" " & row("제목"), 0)
            Next

            'ListVIew 아이템
            Dim itemHeight As Integer = 15
            Dim imgList As ImageList = New ImageList
            imgList.ImageSize = New Size(1, itemHeight)
            ListView1.SmallImageList = imgList