用到了顯示錶格，修改資料，寫回資料表的專案，幾乎用了兩天的事件查詢電子書和網頁資料，竟然無法找到將DataSet修改後的資料使用update寫到資料表中的任何一個正確的程式碼，幾乎快崩潰了，看來我真的不是學VB的腦袋啊，幾乎忍不住要轉回delphi了，就在剛才抱著最後一次執行的絕望修改後，TNND竟然可以了，真想說粗話，誰說VB好學了，你過來，我保證不打死你！

我確認我的程式碼基本正確，也參考了幫助檔案，沒想到的是問題的關鍵是資料表，竟然必須要設定主鍵，但錯誤提示盡然和主鍵沒有一點屁關係！！！

覺得不好看的自己修改一下吧，我真是奇怪，VB的程式碼確實怪怪的，真的真的真的不如delphi寫著舒服！

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim constr As String = "Data Source=.;Initial Catalog=資料庫;Integrated Security=True"
        Dim sqlstr As String = "select * from 資料表"
        Dim scon As New SqlConnection(constr)
        Dim sda As New SqlDataAdapter()
        sda.SelectCommand = New SqlCommand(sqlstr, scon)
        Dim builder As New SqlCommandBuilder(sda)
        scon.Open()
        Dim customers As New DataSet
        sda.Fill(customers, " 資料表")
        DataGridView1.DataSource = customers.Tables(" 資料表")
        customers.Tables(" 資料表").Rows(0)(8) = 7      '為了演示省事了，你可以先顯示資料，再修改資料，再寫回資料表
        customers.Tables(" 資料表").Rows(1)(8) = 7
        Button1.Text = sda.Update(customers, " 資料表").ToString
        customers.AcceptChanges()
    End Sub