在开始/结束编辑后无法更新数据表

Question

我正在使用以下代码编辑数据表中的记录。它不会更新记录。

Dim drCurrent As DataRow
drCurrent = DbResultDataSet.tblResult.Rows(0)
MsgBox(drCurrent.Item("PaperID"))
drCurrent.BeginEdit()
drCurrent.Item("PaperID") = "433"
drCurrent.EndEdit()
TblResultTableAdapter.Update(DbResultDataSet.tblResult)

请告知错误。 谢谢 Furqan