Dim conn = New OleDbConnection("PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=g:\aa.mdb")
Dim da = New OleDbDataAdapter("Select * From bz", conn)
Dim ds = New DataSet()
da.Fill(ds, "student")
ds.Tables("student").Rows(0).Delete()‘洗掉第一行
ds.AcceptChanges()
Dim cb As OleDbCommandBuilder = New OleDbCommandBuilder(da)
da.Update(ds, "student")
ds = New DataSet()
da.Fill(ds, "student")
為什么上述代碼不報錯，但是也沒有洗掉資料庫中的第一行，資料庫中有主鍵，插入一行、修改一行資料執行da.update命令均成功，只是在洗掉一行資料不能成功，也不報錯，為什么？我用的是vb2015，
uj5u.com熱心網友回復：
Dim conn = New OleDbConnection("PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=g:\aa.mdb")
Dim da = New OleDbDataAdapter("Select * From bz", conn)
Dim ds = New DataSet()
da.Fill(ds, "student")
'填加一個記錄
Dim dr As DataRow = ds.Tables("student").NewRow
'dr("Userid") '主鍵
dr("UserPwd") = 8888.888
dr("UserName") = "張三"
ds.Tables("student").Rows.Add(dr)
Dim scb As OleDbCommandBuilder = New OleDbCommandBuilder(da)
da.Update(ds, "student") '資料庫成功增加一條記錄
conn.Close()
uj5u.com熱心網友回復：
Dim conn = New OleDbConnection("PROVIDER=MICROSOFT.JET.OLEDB.4.0;DATA SOURCE=g:\aa.mdb")
Dim da = New OleDbDataAdapter("Select * From bz", conn)
Dim ds = New DataSet()
da.Fill(ds, "student")
ds.Tables("student").Rows(0)(1) = "雙遼"
ds.Tables("student").Rows(1)(1) = "海南"
Dim cb As OleDbCommandBuilder = New OleDbCommandBuilder(da)
da.Update(ds, "student") '可以成功修改資料
ds = New DataSet()
da.Fill(ds, "student")
轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/38682.html
標籤：VB基礎類
上一篇：求助帖：球大神指點迷津——如何用VBA實作查找特定字串，并將其存盤在陣列中
下一篇：/dl在密文開頭是什么意思？