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

Question

我想将String数组的所有元素放入Queue（Of String）中。我有以下代码，使用 For ... Each 将字符串放入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

我的问题：是否可以这样做（即将字符串数组放入队列（字符串））而不使用 For ... Each

Answer 1

使用带有IEnumerable<T>。{/ p>的Queue<T>构造函数

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