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
카테고리 없음