私はこのコードに取り組んできましたが、この構文エラーが発生しました。
Dim sql As String
Dim con As New OleDb.OleDbConnection
Dim da As OleDb.OleDbDataAdapter
Dim ds As New DataSet
con.ConnectionString = "PROVIDER = Microsoft.Jet.OLEDB.4.0; Data Source = G:\school\Thespellingbee\Resources\Spelling Bee1.mdb"
con.Open()
sql = "SELECT * FROM [Words + Definitions]"
da = New OleDb.OleDbDataAdapter(sql, con)
da.Fill(ds, "Words + Definitions")
con.Close()
Dim cb As New OleDb.OleDbCommandBuilder(da)
ds.Tables("Words + Definitions").Rows(0).Item(1) = WordTextBox.Text
ds.Tables("Words + Definitions").Rows(0).Item(2) = DescriptionTextBox.Text
da.Update(ds, "Words + Definitions")
MsgBox("It's working", MessageBoxButtons.OK)
End Sub
私は近づいていることを知っていますが、最後のda.update部分でこの問題が発生しています。まだvbasicにかなり慣れていないので、誰か助けてもらえますか?ありがとう :)
わかりました、ハンスに言われたことを実行しましたが、最後の ds.tables セクションに到達すると、「オブジェクト参照がオブジェクトのインスタンスに設定されていません」というメッセージが表示されます。データベースの場所は正しく、テキストボックスの名前も正しいので、何がヌル参照になるのでしょうか?
私のテーブルには、3 つの列と 10 行のデータが入っています。