VB.NET如何无需迭代从长度250的字符串数组提取指定索引子数组

嘿，很高兴能帮你解决这个问题！你想要提取数组中0-189索引的元素加上240索引的元素，而且不想自己写迭代循环——完全可以做到，下面给你两种简洁的实现方式，都不需要你手动写for/each这类迭代代码：

方法一：使用Array.Copy（高效底层实现） #

这种方法利用.NET内置的Array.Copy方法，它是CLR优化过的底层操作，不需要你手动处理迭代逻辑。我们先创建目标数组，再分两步完成元素的复制与添加：

' 假设你的原数组已经初始化完成
Dim data As String() = {"xx", "xx", ..., "aa"} ' 长度250的数组

' 计算结果数组长度：0-189共190个元素 + 索引240的1个 = 191个
Dim result As String() = New String(190) {}

' 复制原数组中0到189的元素到结果数组
Array.Copy(data, sourceIndex:=0, destinationArray:=result, destinationIndex:=0, length:=190)
' 添加原数组索引240的元素到结果数组最后一位
result(190) = data(240)

方法二：使用LINQ（简洁易读） #

如果你更偏爱简洁的语法，可以用LINQ的Take和Concat方法来组合需要的元素，同样不需要手动写迭代：

Imports System.Linq ' 记得引入LINQ命名空间

' 原数组初始化
Dim data As String() = {"xx", "xx", ..., "aa"}

' 提取前190个元素（0-189），再拼接上索引240的元素，最后转成数组
Dim result As String() = data.Take(190).Concat({data(240)}).ToArray()

补充说明 #

这里要澄清一点：如果你的“无需迭代”是指完全不存在任何迭代操作，那实际上是不可能的——因为要获取这些元素，总得逐个访问对应的数组位置。但显然你指的是不用自己手动编写迭代循环，上面两种方案都完美满足这个需求，迭代的工作要么由.NET底层的Array.Copy处理，要么由LINQ方法内部完成。

内容的提问来源于stack exchange，提问作者user2302158