Coding “Input Data” dalam Visual Basic 2010

Setelah kita membuat Form dalam Visual Basic 2010 beserta dengan Label dan Teksbox serta Button button nya,maka jika kita ingin menginput atau menambahkan data ke dalam Datagridview1 yang langsung tersimpan ke Database MySQL,maka Codingan yang kita perlukan adalah seperti di bawah ini.

Private Sub btntambah_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btntambah.Click
If Txt1.Text = “” Or txt2.Text = “” Or txt3.Text = “” Or txt4.Text = “” Or txt5.Text = “” Or txt6.Text = “” Or txt7.Text = “” Then
MsgBox(“Data belum lengkap,pastikan semua form terisi”)
Exit Sub
Else
Call Koneksi()
Dim simpan As String = “insert into tabel_database_anda values (‘” & Txt1.Text & “‘,'” & txt2.Text & “‘,'” & txt3.Text & “‘,'” & txt4.Text & “‘,'” & txt5.Text & “‘,'” & txt6.Text & “‘,'” & txt7.Text & “‘)”
cmd = New SqlCommand(simpan, Conn)
cmd.executenonquery()
MsgBox(“Data berhasil di input”, MsgBoxStyle.Information, “information”)
Call kondisiAwal()
End If
End Sub

Masukan Codingan tersebut ke dalam Button Tambah yang sudah anda buat.

Selamat Mencoba.

Advertisements

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / Change )

Twitter picture

You are commenting using your Twitter account. Log Out / Change )

Facebook photo

You are commenting using your Facebook account. Log Out / Change )

Google+ photo

You are commenting using your Google+ account. Log Out / Change )

Connecting to %s