Я работаю с файлами ZIP и использую следующий код:
Dim archive As ZipArchive
archive = ZipFile.OpenRead(Filelocation)
Do While (stopLoop)
entry = archive.Entries.Item(counter)
If (entry.FullName.Contains(".jpeg") Or entry.FullName.Contains(".jpg") Or entry.FullName.Contains(".png")) Then
stopLoop = False
Else
counter += 1
End If
Loop
Эти файлы ZIP содержат изображения и документы, но изображения находятся в определенном порядке. Пользователь может пролистывать изображения, и иногда мой код работает отлично (изображения показывают от 1 до 10), но в других случаях порядок полностью мусорный (изображения показывают 2,9,3,7,8 ....). Я понимаю, что записи основаны на том, когда они были добавлены в архив, но есть ли способ отсортировать их по полному имени?