2016-02-26 3 views
0

У меня есть список lbchannel1, который содержит несколько элементов, например, таких как c:\test и c:\temp. Теперь я хочу прочитать все файлы (а не содержимое, только имена файлов), которые находятся в этих папках/путях, добавленных в список, в другой список, который называется lbLog (или текстовое поле было бы лучше)Listbox fileinfo в другом списке

Событие на SelectedIndexChanged.

Я пробовал несколько версий этого ...

 Dim f1 As String() 
    f1 = Form2.lbchannel1.Items.Cast(Of String).ToArray 
    Dim einfo As New IO.DirectoryInfo(f1) 
    For Each item As String In f1 
     FileIO.SearchOption.SearchTopLevelOnly, (Form2.tbext1_1.Text)) 
     lbLog.Items.Add(einfo.Name) 
    Next 

Ошибка: Value of type 'string()' cannot be converted to 'String'

Но я не могу заставить его работать.

Что я делаю неправильно?

+0

Какая ошибка вы получаете? –

+0

Обновлен мой вопрос с ошибкой. Я уверен, что код должен быть совершенно другим, но, насколько я знаю, я мог бы быть близок к решению. – MadsTheMan

ответ

1

Это даст вам все пути. Исправьте его, чтобы получить только имена файлов по мере необходимости.

Private Sub CountFilesButton_Click(sender As Object, e As EventArgs) Handles CountFilesButton.Click 
    Try 

     For Each item As String In DirListBox.Items 
      FilesListBox.Items.AddRange(Directory.GetFiles(item.ToString)) 
     Next 
    Catch ex As Exception 
     MessageBox.Show(String.Concat("An error occurred ", ex.Message)) 
    End Try 
End Sub 
+0

Эндрю, это было идеально. Большое спасибо! :) – MadsTheMan

Смежные вопросы