我編輯我的問題和繼承人的整個代碼,我用插入,更新和刪除在vb.net
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'TODO: This line of code loads data into the 'GradesDBDataSet.tblGrades' table. You can move, or remove it, as needed.
Me.TblGradesTableAdapter.Fill(Me.GradesDBDataSet.tblGrades)
End Sub
Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
TblGradesBindingSource.MoveNext()
End Sub
Private Sub btnDelete_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnDelete.Click
TblGradesBindingSource.RemoveCurrent()
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
TblGradesBindingSource.MovePrevious()
End Sub
Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
TblGradesBindingSource.MoveLast()
End Sub
Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
TblGradesBindingSource.MoveFirst()
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
TblGradesBindingSource.AddNew()
End Sub
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
On Error GoTo saveErr
TblGradesBindingSource.EndEdit()
TblGradesTableAdapter.Update(GradesDBDataSet.tblGrades)
MsgBox("Record Save ", MsgBoxStyle.Information)
saveErr:
Exit Sub
End Sub
End Class
大家好...我有使用此代碼的問題。 。將數據保存到vb.net的ms訪問 我只是按照YouTube上的教程。它工作,但是當我關閉程序,然後幾分鐘後我再次運行它,數據doesnt保存。 。 。爲什麼? 。
你能建議什麼是使用vb.net添加,刪除保存的最佳方式?謝謝eveyone^_^
你能發佈你的完整代碼嗎?它應該這樣工作,所以其他地方有問題。 – jAC 2014-09-20 11:22:59
另外,如果使用連接的關係數據庫,當然通過ODBC或OLEDB連接後,爲什麼不使用SQL的INSERT,UPDATE,DELETE動作查詢? – Parfait 2014-09-20 16:28:18
@Parfait,你應該學習一些關於類型化數據集。代碼中的表格適配器已經完全符合您的建議。 – jmcilhinney 2014-09-21 06:14:32