无法删除行数据网格视图和无法从文本框 VB.Net 将数据插入数据库 MYSQL(ODBC)

Question

这是我目前拥有的代码：

Imports System.Data.Odbc
Imports System.Data.SqlClient
Imports System.Data
Imports System
Public Class FormInput1
    Dim sCommand As Odbc.OdbcCommand
    Dim sAdapter As Odbc.OdbcDataAdapter
    Dim sBuilder As Odbc.OdbcCommandBuilder
    Dim sDs As DataSet
    Dim sTable As DataTable
Private Sub CmdLoad_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdLoad.Click
Dim sql As String = "SELECT * FROM TblInput1"
        OpenDB()

        sCommand = New Odbc.OdbcCommand(sql, con)
        sAdapter = New Odbc.OdbcDataAdapter(sCommand)
        sBuilder = New Odbc.OdbcCommandBuilder(sAdapter)
        sDs = New DataSet()
        sAdapter.Fill(sDs, "TblInput1")
        sTable = sDs.Tables("TblInput1")
        con.Close()
        DGVInput1.DataSource = sDs.Tables("TblInput1")
        DGVInput1.ReadOnly = True
        CmdSave.Enabled = False
        DGVInput1.SelectionMode = DataGridViewSelectionMode.FullRowSelect
    End Sub

    Private Sub CmdAddEdit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdAddEdit.Click
        DGVInput1.[ReadOnly] = False
        CmdSave.Enabled = True
        CmdAddEdit.Enabled = False
        CmdDelete.Enabled = False

    End Sub

    Private Sub CmdDelete_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdDelete.Click

        If MessageBox.Show("Do you want to delete this row ?", "Delete", MessageBoxButtons.YesNo) = DialogResult.Yes Then
            DGVInput1.Rows.RemoveAt(DGVInput1.SelectedRows(0).Index)
            sAdapter.Update(sTable)

        End If
    End Sub

无法删除行 (CmdDelete)

    Private Sub CmdSave_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CmdSave.Click
        sAdapter.Update(sTable)
        DGVInput1.[ReadOnly] = True
        CmdSave.Enabled = False
        CmdAddEdit.Enabled = True
        CmdDelete.Enabled = True
    End Sub

我还有更多问题，当我单击命令按钮“保存到数据库”时，我有 TxtPeriode.Text、Txtstore.text 和 TxtPartNumber.Text 无法插入到表“TblInput1”。

Answer 1

从DataGridView 中删除一行不会删除绑定DataTable 中的底层DataRow，因此它不会影响数据库。

当您检索数据时，将DataTable 绑定到BindingSource 并将其绑定到网格。要删除选定的记录，请在 BindingSource 上调用 RemoveCurrent，这会删除基础 DataRow，这会固有地从网格中删除相应的行。当您在数据适配器上调用Update 时，RowState 或Deleted 的行将从数据库中删除相应的记录。