Cara membuat Button Update atau Edit data di Projek Visual Studio

Tampilan berhasil mengedit data/update

Sebuah aplikasi Desktop ataupun Web akan dikategorikan baik jika setiap fitur tersedia didalamnya. Seperti tersedia Button Update atau Button Edit data yang telah diinputkan. Karena setiap data yang diinputkan pada sebuah aplikasi terkadang mengalami perubahan ataupun kesalahan ketik dan sebagainya. Sehingga dibutuhkan sebuah Button yang berfungsi untuk mengedit sebuah data ataupun beberapa data.

Maka dari itu, setelah kemarin saya membagikan artikel tutorial Cara menampilkan data database pada DatagridView di Visual Studio, kali ini saya akan membagikan tutorial Cara membuat Button Update atau Edit data di Projek Visual Studio

Hal yang perlu Anda persiapkan yaitu sebagai berikut :

• Membuat Database
• Mengkoneksikan database dengan projek aplikasi studio
• Mendesign sesuai kebutuhan dan Button Edit/Update

Setelah semua langkah diatas dilakukan maka untuk membuat Program Button Update/Edit silahkan Double klik pada Button Update dan akan muncul tampilan pembuatan Program. Silahkan Copy dan Pastekan Script Update/Edit dibawah ini.

Try

            Call Koneksi()

            Dim str As String

            str = "UPDATE t_transaksi SET id_obat=?,nama_obat=?,harga=?,tgl=? where id_transaksi='" & TextBox1.Text & "'"

            Dim cmd As New MySqlCommand(str, conn)

            With cmd

                .Parameters.Clear()

                .Parameters.Add(New MySqlParameter("id_obat", MySqlDbType.VarChar, 30)).Value = TextBox2.Text

                .Parameters.Add(New MySqlParameter("nama_obat", MySqlDbType.VarChar, 30)).Value = TextBox3.Text

                .Parameters.Add(New MySqlParameter("harga", MySqlDbType.VarChar, 30)).Value = TextBox4.Text

                .Parameters.Add(New MySqlParameter("tgl", MySqlDbType.VarChar, 30)).Value = TextBox5.Text

                .ExecuteNonQuery()

                conn.Close()

            End With

            MessageBox.Show("update berhasil di lakukan", "PEMBERITAHUAN", MessageBoxButtons.OK, MessageBoxIcon.Information)

        Catch ex As Exception

            MessageBox.Show(ex.Message)

        End Try

Jika sudah di Pastekan silahkan ubah beberapa Script diatas sesuai dengan kebetuhan Anda seperti berikut.

            str = "UPDATE t_transaksi SET id_obat=?,nama_obat=?,harga=?,tgl=? where id_transaksi='"& TextBox1.Text & "'"

Berdasarkan potongan script diatas silahkan ubah t_transaksi dengan nama table dimana data tersebut tersedia. Selain nama table yang harus diubah beberapa nama Field seperti id_obat, nama_obat, dan harga silahkan ubah dengan nama-nama field yang tersedia pada table yang Anda gunakan. Untuk id_transaki, ini adalah primary key dari table yang Anda gunakan. Sehingga seilahkan ubah dengan nama Primary Key dari table yang Anda gunakan, karena data yang akan diedit akan dipanggil berdasarkan Primary Key.

.Parameters.Add(New MySqlParameter("id_obat", MySqlDbType.VarChar, 30)).Value = TextBox2.Text

Setelah Script SQL yang diubah, silahkan ubah juga Script Parameters diatas tersebut, dimana id_obat adalah nama dari salah satu field di table yang digunakan dan TextBox2 adalah nama dari textbox yang digunakan untuk menampilkan data id_obat dari Database. Silahkan ubah dengan sesuai kebutuhan Anda.

MessageBox.Show("update berhasil di lakukan", "PEMBERITAHUAN", MessageBoxButtons.OK, MessageBoxIcon.Information)

Potongan Script diatas digunakan untuk menampilkan Message Box yang menampilkan potongan kalimat “Update berhasil dilakukan”. Silahkan ubah dengan sesuai keinginan Anda.

Terakhir silahkan Running dan coba eksekusi Button Update apakah berhasil terupdate atau gagal. Jika gagal, silahkan cek kembali Script diatas apakah ada kesalahan atau tidak. Ataupun jika masih bermasalah silahkan konsultasikan kepada kami lewat Contact yang telah kami sediakan, atau Anda bisa menggunakan kolom komentar dibawah ini.