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,并从中进行探索。