vb.net GetFiles에 의해 반환 된 컬렉션에서 파일 이름을 제거하는 방법

Question

My.Computer.FileSystem.GetFiles는 "디렉터리 내의 파일 이름을 나타내는 문자열의 읽기 전용 컬렉션을 반환합니다."를 반환합니다.

임의로 파일을 컬렉션에서 선택하여 처리하고 목록에서 삭제 한 다음 모든 파일이 처리 될 때까지 반복하고 싶습니다.

나는 GetFiles에서 변경 가능한 컬렉션으로 만 컬렉션을 복사하는 것으로 생각할 수 있습니다. 그러나 GetFiles는 결국 수백만 개의 파일 이름을 반환 할 수 있습니다.

Answer 1

함수 호출이 끝날 때 .ToList()을 넣으면됩니다.

목록의 중간에서 임의로 항목을 선택하는 대신 목록을 다시 셔플하고 셔플 처리 된 항목을 반복하는 것이 좋습니다. 컬렉션에서 항목을 삭제하는 것보다 쉽습니다. my_mutable_list에서 필요에 따라

Answer 2

my_mutable_list = My.Computer.FileSystem.GetFiles (my_dir_path) .ToList()

그런 다음, 단지 각 파일을 삭제합니다. 이 일반적인 기능을 사용

은

Answer 3

Shared r = New Random() ' must not create new Random each time 

Public Shared Function Shuffle(Of T)(source As IEnumerable(Of T)) As IEnumerable(Of T) 
    Dim n = source.Count() 
    Dim a(n - 1) As T 
    For i = 0 To n - 1 
     Dim j = r.Next(0, i + 1) 
     If i <> j Then 
      a(i) = a(j) 
     End If 
     a(j) = source(i) 
    Next 
    Return a 
End Function 

그런 다음 셔플 목록을 반복 할 수 Fisher-Yates Shuffle에 따라 셔플한다. iterating 경우 항목을 제거 할 필요가 없습니다.

Dim source = My.Computer.FileSystem.GetFiles("C:/") 
Dim result = Shuffle(source) 
For Each r In result 
    ' process file 
Next