对象引用未设置为对象的实例是什么意思。

Question

我们正在尝试从单独的 XML 文档中读取信息。

这是我们的代码：

'load the XMLTest document containing cars.
    Dim xml As XDocument = XDocument.Load("CreditApp.xml")


    Dim SSN As String = txtSSN.Text
    'get all car makes that are red.
    Dim query = From xe In xml.Descendants("SSN")
         Where xe.Element("SSN").Value = SSN
                Select New With {
                    .FName = xe.Element("FName").Value 'Error in code is here
                }

    'loop through query result output results.
    For Each element In query.ToArray
        MessageBox.Show(element.FName)
    Next

我们得到了错误：

对象引用未设置为对象的实例。

我们也不确定它指的是什么。

Answer 1

当您播种该消息时，这意味着您尝试访问当前值为 Nothing 的变量的成员。

Dim obj As Object = Nothing
Console.WriteLine(obj.ToString()) ' Null ref on obj access

VB.Net中Nothing的值（类似于C#null）表示对象没有值。试图访问它的成员是在访问一个成员。运行时无法满足此请求，因此会引发异常以让您了解问题。

在这个特定的示例中，看起来最可能的错误原因是以下行

FName = xe.Element("FName").Value

这段代码不会做任何事情来验证xe.Element("FName") 不会返回Nothing，因此在访问成员Value 时可能会导致异常。要解决此问题，您需要防范这种可能性。最简单的方法是使用辅助方法

Public Function GetFNameValueOrEmpty(ByVal elem As XElement) As String
  Dim child = elem.Element("FName")
  If child Is Nothing Then
    Return String.Empty
  Else
    Return child.Value
  End If
End Function

有了这个助手，你可以重写原来的查询

Dim query = From xe In xml.Descendants("SSN")
         Where xe.Element("SSN").Value = SSN
                Select New With {
                    .FName = GetFNameValueOrEmpty(xe)
                }