无法从 List(Of List) 访问数据

Question

我正在开发 Revit 插件，在该插件中我尝试使用 List(Of List(Of Curve))，但是我在访问子列表中的数据时遇到问题。

Dim ClosedCurveList As New List(Of List(Of Curve))
Dim ClosedCurve As new List (Of Curve)

For i=0 To FinalWallLines.Count-1
    If FinalWallLines(i+1).GetEndPoint(0).X = FinalWallLines(i).GetEndPoint(1).X And _
       FinalWallLines(i+1).GetEndPoint(0).Y = FinalWallLines(i).GetEndPoint(1).Y And _
       FinalWallLines(i+1).GetEndPoint(0).Z = FinalWallLines(i).GetEndPoint(1).Z Then

        ClosedCurve.Add(FinalWallLines(i))

    Else

        TaskDialog.Show("A",ClosedCurve.Count)
        ClosedCurveList.Add(ClosedCurve)
        TaskDialog.Show("B", ClosedCurveList(ClosedCurveList.Count-1).Count)
        ClosedCurve.Clear()

    End if
Next

TaskDialog.Show("C", ClosedCurveList.Count)

For i=0 To ClosedCurveList.Count-1
    TaskDialog.Show(i,ClosedCurveList(i).Count)
next

因此，当我运行该代码时，第一个 TaskDialog.Show("A",ClosedCurve.Count) 向我显示所有 ClosedCurve 都由 4 条曲线组成，这是有道理的，因为我的所有曲线都形成了矩形。

正如预期的那样，我的第二个 TaskDialog.Show("B", ClosedCurveList(ClosedCurveList.Count-1).Count) 也返回 4 作为每个子列表的计数。

我的第三个 TaskDialog.Show("C", ClosedCurveList.Count) 返回 23。

因此，我们可以收集到ClosedCurveList 是一个包含 4 条曲线的 23 个列表的列表。

但是，在我的循环 For i=0 To ClosedCurveList.Count-1 期间，我的 TaskDialog.Show(i,ClosedCurveList(i).Count) 返回 23 0s。

有人知道为什么我在尝试访问每个子列表的计数时没有按预期获得 23 个 4 秒吗？

Answer 1

您应该使用ClosedCurve = new List(Of Curve) 而不是ClosedCurve.Clear()。

当您将其添加到ClosedCurveList 时，您并未添加副本。您正在添加对对象 CLosedCurve 的引用。因此，当您清除ClosedCurve 时，它也会清除在ClosedCurveList 中添加的那个，因为它们是对同一对象的引用。通过将新的 List(Of Curve) 重新分配给 ClosedCurve，您现在将拥有单独的引用，就像您最初期望的那样。