Coding Menambahkan DML (Insert) di VB 2010

Menambahkan data DML (insert) di VB 2010, cukup ikuti langkah di bawah ini :
(Langkah 1)

Imports System.Data.SqlClient

(langkah 2)
Public Class Form1
    Dim a As SqlConnection
    Dim b As SqlCommand

(Langkah 3)
    Private Sub Button2_Click
        Try
            b = New SqlCommand("insert into penjualan_barang values('" & Txtkode.Text & "','" & Txtnma.Text & "','" & Cmbjnis.Text & "','" & Txtstock.Text & "','" & Txtjmlh.Text & "')", a)
            b.ExecuteNonQuery()
            b.Dispose()
            MsgBox("Data Telah Tersimpan", MsgBoxStyle.Information, "Koneksi")
        Catch ex As Exception
            MsgBox("Koneksi Eror", MsgBoxStyle.Exclamation, "Koneksi")
        End Try
    End Sub

Tinggalkan Komentar Anda Untuk Memperbaiki Isi Blog ini