[3booody]

'اعتذر اخي عن الغياب كان بسبب ظرف
'ضع اداة ListView وغير الخاصية CheckBoxes الى True
'اضف اداة ImageList
'غير الخاصية LargeImageList الموجوده فيListView الىImageList1
واخيرآ ضع زر بوتون وضع هذا الكود

كود :

Dim n As Short = 0
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        On Error Resume Next
        Using open As New OpenFileDialog
            open.Title = "Select Image"
            open.FileName = ""
            open.Filter = "Image(.jpg)|*.jpg"
            If open.ShowDialog = DialogResult.OK Then
                ImageList1.Images.Add(0, Image.FromFile(open.FileName))
                ListView1.Items.Add(open.FileName).ImageIndex = n
                n += 1
            End If
        End Using
    End Sub