Загрузка файла в axacropdf (компонент pdf) из смешанного списка
Я получаю имена папок, получаю pdf-файлы в одном и том же каталоге, и перечисляю оба в одном и том же списке со следующим кодом:
Private Sub frmBooks_Load(sender As Object, e As EventArgs) Handles MyBase.Load
For Each folder As String In System.IO.Directory.GetDirectories(Application.StartupPath & "\Books")
ListBox1.Items.Add(Path.GetFileName(folder))
Next
For Each file As String In System.IO.Directory.GetFiles(Application.StartupPath & "\Books\", "*.pdf")
ListBox1.Items.Add(Path.GetFileNameWithoutExtension(file))
Next
ОБА Смешаны и отсортированы в одном списке1. Затем я добавляю axacropdf (компонент PDF) для чтения файлов PDF. Как я могу открыть / получить путь от выбранного элемента в списке, чтобы открыть в axacropdf??
(axacropdf.src =)
1 ответ
Решение
Этот код проверяет, существует ли файл в формате.pdf
Private Sub ListBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ListBox1.SelectedIndexChanged
If File.Exists(Application.StartupPath & "\Books\" & ListBox1.SelectedItem.ToString & ".pdf") = True Then
AxAcroPDF1.src = (Application.StartupPath & "\Books\" & ListBox1.SelectedItem.ToString & ".pdf")
end if
end sub