Dim con を新しい OleDbConnection として
Dim dt As New DataTable
Dim ds As New DataSet
con.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=|DataDirectory|\MedicalSys.accdb"
con.Open()
ds.Tables.Add(dt)
Dim da As New OleDbDataAdapter
da = New OleDbDataAdapter("SELECT * FROM Add Form", con)
da.Fill(dt)
Dim newRow As DataRow = dt.NewRow
これは私のコードですが、実行すると次の行でエラーが発生します。
da.Fill(dt)
何が問題なのか正確にはわかりません!