[vb2005] Images dans Listview
Bonjour,
Je voudrais afficher des images dans un listview
J'ai fais ceci mais il plante
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
Imports System.IO
Public Class Form1
Dim filepath As String = "C:\Documents and Settings\All Users\Documents\Mes Images\Échantillons d'images"
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
ListView1.Dock = DockStyle.Left
ListView1.View = View.LargeIcon
Dim i As Integer
Dim di As New DirectoryInfo(filepath)
Dim fi As FileInfo
For Each fi In di.GetFiles(".Tiff")
ListView1.Items.Add(fi.Name, i)
Next
End Sub |
Une petite aide ou un lien merci
