Member 14507966 Ответов: 1

Как я могу добавить все изображения из папки в список изображений в VB.NET-что?


Мне нужно добавить все изображения в элемент управления imagelist из папки, но я не знаю имен и расширений этих изображений, даже не знаю их количества. И я хочу показать эти изображения одно за другим на ТИКе таймера, используя цикл (нон-стоп)
Есть идеи? Пожалуйста помочь
vb.net
visual studio 2010..

Что я уже пробовал:

Теперь я использую метод старой школы , вызывая изображение из этой папки по его имени и расширению и меняя его на ТИКе таймера

phil.o

Ты можешь:
- получить список всех файлов в определенной папке.
- фильтруйте их, возможно, по расширению, чтобы получить только файлы изображений.
- добавьте их в список изображений.
Итак, с какой частью вам нужна помощь?

Maciej Los

Мой виртуальный 5!

1 Ответов

Рейтинг:
1

MadMyche

Если вы не знаете имен файлов, но знаете папку, вы используете System.IO.DirectoryInfo чтобы перечислить файлы.

Множество примеров кода там можно найти с помощью Google, я взял этот из
TheScarms.com : Список всех файлов в папке с помощью VB.NET[^]

Imports System.IO
Dim strFileSize As String = ""
Dim di As New IO.DirectoryInfo("C:\temp")
Dim aryFi As IO.FileInfo() = di.GetFiles("*.txt")
Dim fi As IO.FileInfo

For Each fi In aryFi
    strFileSize = (Math.Round(fi.Length / 1024)).ToString()
    Console.WriteLine("File Name: {0}", fi.Name)
    Console.WriteLine("File Full Name: {0}", fi.FullName)
    Console.WriteLine("File Size (KB): {0}", strFileSize )
    Console.WriteLine("File Extension: {0}", fi.Extension)
    Console.WriteLine("Last Accessed: {0}", fi.LastAccessTime)
    Console.WriteLine("Read Only: {0}", (fi.Attributes.ReadOnly = True).ToString)
Next


Maciej Los

5ed!

MadMyche

Спасибо