【发布时间】:2020-05-13 21:42:25
【问题描述】:
我正在构建一个用 Visual Basic.NET 编写的小应用程序,但我需要您的帮助。我有 DataGridView 来显示我的数据库,我想让“更新”按钮从 DataGridView 更新到数据库。但在更新之前,我想像这样在 DataGridView 中选择行:
并显示到文本框。因此,我从文本框进行了更改以更新我的数据库。怎么做?
这是我的更新代码:
Private Sub btnPesEdit_Click(sender As Object, e As EventArgs) Handles btnPesEdit.Click
Koneksi()
Dim konfEdit As DialogResult = MsgBox("Apakah data yang di-update sudah benar?",
MessageBoxButtons.YesNo, "Konfirmasi")
Try
str = "UPDATE data_pesanan SET (@namakons, @almtkons, @tglpesan, @jenispaket, @jmlpesan, @totaluang) WHERE (@kodekons)"
comm = New MySqlCommand(str, conn)
comm.Parameters.AddWithValue("@kodeKons", txtPesKodeKonsu.Text)
comm.Parameters.AddWithValue("@namakons", txtPesNamaKonsu.Text)
comm.Parameters.AddWithValue("@almtkons", txtPesAlmtKonsu.Text)
dtPesTglPesan.CustomFormat = "dd-MM-yyyy"
comm.Parameters.AddWithValue("@tglpesan", dtPesTglPesan.Value)
comm.Parameters.AddWithValue("@jenispaket", lblPesJenisPkt.Text)
comm.Parameters.AddWithValue("@jmlpesan", Convert.ToInt32(txtPesJmlPesan.Text))
comm.Parameters.AddWithValue("@totaluang", Convert.ToInt32(lblPesTotal.Text))
comm.ExecuteNonQuery()
conn.Close()
Catch ex As Exception
MsgBox(ex.InnerException.Message)
'MsgBox(ex.Message)
End Try
End Sub
这是我从数据库显示到 DataGridView 的代码:
Private Sub tablePesanan()
Koneksi()
comm = New MySqlCommand("select * from data_pesanan", conn)
dataAdap = New MySqlDataAdapter(comm)
Dim dataTbl As New DataTable
dataAdap.Fill(dataTbl)
tblPesList.DataSource = dataTbl
tblPesList.ReadOnly = True
End Sub
注意: 如果我的英语不好,我很抱歉。我希望你明白我在说什么。
【问题讨论】:
-
贴代码时,建议将实际代码粘贴到问题中。大多数人不会重新输入您的代码,您的问题几乎不会得到回应。我建议您研究
TextBox... 示例的“绑定”...Binding b = new Binding("Text", GridTable, "column1"); textBox1.DataBindings.Add(b);... 其中“GridTable”是DataTable数据源,“column1”是表中要显示的字段。我还建议访问 SO HELP – How to ask 页面。 -
谢谢你纠正我:)
-
为什么不直接在网格中进行更改?
-
对不起。我不明白。可以举个例子吗?
标签: vb.net datagridview