Dim s As String
s = "SELECT Voter.SrNo, Voter.YadiNo, Voter.FullName, Voter.Gender, Voter.Age, Voter.HouseNo, Voter.CardNo, Voter.CardNo, Voter.Cast FROM Voter WHERE (((Voter.Cast) [Is Null]))"
Dim da As New OleDbDataAdapter(s, My.Settings.trialConnectionString)
Dim ds As New DataSet
da.Fill(ds, "voter")
DataGridView1.DataSource = ds.Tables("voter")
In the upper code there is an
"cast" is an the reserved key word
only i was change the
"cast" into
"castt" and it can be excute
Dim s As String
s = "SELECT Voter.SrNo, Voter.YadiNo, Voter.FullName, Voter.Gender, Voter.Age, Voter.HouseNo, Voter.CardNo, Voter.CardNo, Voter.Castt FROM Voter WHERE (((Voter.Castt) [Is Null]))"
Dim da As New OleDbDataAdapter(s, My.Settings.trialConnectionString)
Dim ds As New DataSet
da.Fill(ds, "voter")
DataGridView1.DataSource = ds.Tables("voter")