[VB.NET]DateGridView怎么只能显示，不能保存？

DateGridView怎么只能显示，不能保存？
源代码如下：

Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
TODO: 这行代码将数据加载到表“DbxDataSet.销售合同统计表”中。您可以根据需要移动或移除它。
Me.销售合同统计表TableAdapter.Fill(Me.DbxDataSet.销售合同统计表)
End Sub
--------------------
Private Sub btnSave_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSave.Click

Me.Validate()
Me.销售合同统计表TableAdapter.Update(Me.DbxDataSet.销售合同统计表.GetChanges())
MsgBox( pppppppppppppppppp )

End Sub
End Class

UPDATE的用法也是按照书上说的写的，运行不出错，就是不能保存我在DateGridView中所做的修改，这个问题捆饶我一天了。。。
__________________________________________________________________________
PS：销售合同统计表是一个ACCESS表
__________________________________________________________________________
急等帮助！
__________________________________________________________________________
adapter.InsertCommand.Transaction = sqlswcl
adapter.UpdateCommand.Transaction = sqlswcl
adapter.DeleteCommand.Transaction = sqlswcl
__________________________________________________________________________
搞錯了
要
Dim adapter As New SqlClient.SqlDataAdapter(sqlstr, SqlConn)
Dim cmdbuider As New SqlClient.SqlCommandBuilder(adapter)
adapter.UpdateCommand = cmdbuider.GetUpdateCommand
adapter.InsertCommand = cmdbuider.GetInsertCommand
adapter.DeleteCommand = cmdbuider.GetDeleteCommand
__________________________________________________________________________
ou108，你的代码是什么意思啊，我要如何把你的代码加在我的代码里面啊，谢谢了！！
__________________________________________________________________________