如何将String数组的所有元素放入Queue(Of String)？

Question

我想将一个String数组的所有元素放入一个Queue(Of String)中.我有以下代码使用For ...每个将字符串放入Queue(Of String):

    Dim Files() As String = OpenFileDialog1.FileNames
    'OpenFileDialog1 is an instance of OpenFileDialog control

    Dim PendingFiles As New Queue(Of String)

    For Each x1 As String In Files
        PendingFiles.Enqueue(x1)
    Next

我的问题:是否可以这样做(即将字符串数组放入Queue(Of String))而不使用For ... Each？

Answer 1

的使用构造函数Queue<T>,它接受一个IEnumerable<T>.

Dim PendingFiles As New Queue(Of String)(Files)