Null 检查始终返回 null，如果删除则返回未设置为对象实例的对象引用

Question

我有一些代码通过 GetChildren 函数获取菜单的子项，该函数采用 menuData 列表：

Dim builtMenu As New List(Of MenuData)(_rawData.FindAll(Function(item) item.GroupingID = 0))

For Each menuData As MenuData In builtMenu
             If menuData.Children IsNot Nothing Then
            menuData.Children.AddRange(GetChildren(menuData))
             End If
        Next

如果我检查 menudata.children 是否不是什么，它总是什么都不是，因为 GetChildren 函数尚未运行（提供子项，确实存在）。如果我删除此检查并只有此代码：

Dim builtMenu As New List(Of MenuData)(_rawData.FindAll(Function(item) item.GroupingID = 0))

For Each menuData As MenuData In builtMenu  
            menuData.Children.AddRange(GetChildren(menuData)) 
        Next

然后我会在 menuData.Children.AddRange(GetChildren(menuData)) 上看到一个对象引用未设置为对象实例错误，

请告诉我如何解决此问题问题？ 多谢

Answer 1

您的 menuData.Children 从未被实例化，因此它是一个 null (Nothing) 引用。

使用之前需要先实例化它：

Dim builtMenu As New List(Of MenuData)(_rawData.FindAll(Function(item) item.GroupingID = 0))
menuData.Children = New List(Of MenuData)

For Each menuData As MenuData In builtMenu  
    menuData.Children.AddRange(GetChildren(menuData)) 
Next