Vb.net 数据集包含数据,但发生NullReference异常

Vb.net 数据集包含数据,但发生NullReference异常,vb.net,Vb.net,ds1变量包含数据,但此时发生错误NullReference异常 `TextBox2.Text = ds1.Tables("Custmor").Rows(0).Item(0).ToString()` 实际代码块为: Try con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Pradnya_DataB.mdb" con.Open() ds1 = New DataSet ss = "Se

ds1
变量包含数据,但此时发生错误
NullReference异常

`TextBox2.Text = ds1.Tables("Custmor").Rows(0).Item(0).ToString()`
实际代码块为:

Try
  con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Pradnya_DataB.mdb"
  con.Open()

  ds1 = New DataSet
  ss = "Select c1.cust_name,c1.cust_bottle_type,c2.B_Pending From Customer c1"
  ss = ss + " INNER JOIN Bottel_Collect c2 ON c2.Cust_ID=c1.Cust_ID WHERE c1.Cust_ID=" & CInt(lblText.Text)
  'ss = "Select * from Customer"

  da = New OleDbDataAdapter(ss, con)
  da.Fill(ds1)
  If ds1.Tables.Count > 0 Then
    TextBox2.Text = ds1.Tables("Custmor").Rows(0).Item(0).ToString()
    TextBox5.Text = ds1.Tables("Customer").Rows(0).Item(1).ToString()
    TextBox6.Text = ds1.Tables("Bottel_Collect").Rows(0).Item(5).ToString()
  End If
  con.Close()
  rd.Close()
Catch ex As Exception
  MsgBox(ex.Message)
End Try

几乎所有NullReference异常都有相同的原因。请参阅以获取此方面的帮助。DataAdapter将创建表,但它不会命名它们,一个
da.Fill语句不会创建3个表。请参阅链接中的“数据提供程序对象”。即使您有多个表,而且即使它们被命名,
“Custmor”
也会拼写错误。在da.Fill命令之后,请查看即时窗口中的ds1.Tables.Count,并从中进行探索。