Sql datagridview更新到数据库

请帮帮我

我在datagrid视图中加载数据库并编辑一些单元格。 现在我只需要更新我的数据库

这是我的密码

  Dim dT As DataTable = MyDB.ExecCommand("SELECT `Field Name` FROM `tblfield`", "wellsfargo").Tables(0)

    Dim sSQL As String = ""

    Dim dZ As DataTable = MyDB.ExecCommand("SELECT " & sColumn & " FROM `" + cboJob.Text.Trim + "`", "wellsfargo", 0).Tables(0)

    dColumn = New DataTable
    dColumn = MyDB.ExecCommand("SHOW COLUMNS IN tblrecord", "wellsfargo", 0).Tables(0)


    If dZ.Rows.Count <> 0 Then
        sSQL = "UPDATE " & sColumn & " FROM `" + cboJob.Text.Trim + "`"
        MyDB.ExecQuery(sSQL, "wellsfargo")
    Else
        Dim sColumn As String = ""

        For z As Integer = 0 To dT.Rows.Count - 1
            If z = 0 Then
                sColumn = "`" & dT.Rows(z).Item(0).ToString & "`"
            Else
                sColumn = sColumn & ",`" & dT.Rows(z).Item(0).ToString & "`"
            End If
        Next
        sSQL = "INSERT INTO `" + MyJob + "` (" + sColumn + ") "

        MyDB.ExecQuery(sSQL, "wellsfargo")
    End If

Dim dT As DataTable=MyDB.ExecCommand（“从`tblfield`、`wellsfargo`中选择`Field Name`”）。表（0）
Dim sSQL As String=“”
Dim dZ As DataTable=MyDB.ExecCommand（“从”`+cboJob.Text.Trim+“`”、“wellsfargo”，0中选择”&sColumn&“）。表格（0）
dColumn=新数据表
dColumn=MyDB.ExecCommand（“在tblrecord中显示列”，“wellsfargo”，0）。表（0）
如果dZ.Rows.Count为0，则
sSQL=“UPDATE”&sColumn&“FROM`+cboJob.Text.Trim+“`”
MyDB.ExecQuery（sSQL，“wellsfargo”）
其他的
Dim sColumn As String=“”
对于z作为整数=0到dT.Rows.Count-1
如果z=0，则
sColumn=“`”和dT.Rows（z）.Item（0）.ToString&“`”
其他的
sColumn=sColumn&“，`&dT.Rows（z）.Item（0）.ToString&”`”
如果结束
下一个
sSQL=“插入到“+MyJob+”`（“+sColumn+”）中”
MyDB.ExecQuery（sSQL，“wellsfargo”）
如果结束

完成。 我用了这个密码

 Try
        Cursor = Cursors.WaitCursor
        Dim sSQL As String
        sSQL = "UPDATE `" + cboJob.Text.Trim + "` SET `Description` ='" + TextBox1.Text + "' WHERE `Description`= '" + Label2.Text + "' AND `Line Number` ='" + comList.Text + "'"
        MyDB.ExecQuery(sSQL, "wellsfargo")
        MsgBox("Updated!")
        btnUpdate.Enabled = False

    Catch ex As Exception
        MsgBox("Select table first to Update")
    End Try
    Cursor = Cursors.Default

---

我们可以了解更多有关您面临的问题以及您实际上没有预料到的问题的详细信息吗？谢谢，但我已经完成了。我建议在显示消息之前验证数据库中是否发生了更新，因为有时update语句会运行，但会修改零行。另外，

MsgBox

用于VB.Net的VB6

MessageBox.Show

uses.oh。。我懂了。。如何验证它？这取决于

MyDB.ExecQuery

的实现方式。如果它是通过

SqlCommand.ExecuteNonQuery

实现的，并且此方法返回一个整数值，则检查返回值是否大于零值，例如：If（MyDB.ExecQuery（sSQL，“wellsfargo”）>0）然后“show message End If