ThumbnailView1.Margin = 5
ThumbnailView1.Padding = 5
ThumbnailView1.RowNumber = 3
ThumbnailView1.ColNumber = 3
ThumbnailView1.Label = "{0}"
ThumbnailView1.EnableThumbnailDatabase(File.DirApp,"thumbs.db")
Dim imgDir As String = File.Combine(File.DirApp,"images")
Dim filenames As List
filenames = File.ListFiles(File.Combine(File.DirApp,"images"))
ThumbnailView1.LoadThumbnails(imgDir,filenames)