Latihan 26b

Deskripsi latihan 26b

1. Objek Datagridview
terdapat 1 objek datgridview pada form ini. fungsinya adalah untuk menampilkan tabel detail transaksi yang ada di datagridview latihan 26a

2.  objek textbox
terdapat 6 objek textbox pada form ini. dua diantaranya berstatus readonly. bertujuan untuk menampilkan kode barang, nama barang, harga jual, & jumlah barang  yang ada di datagridview latihan 26a. sedangkan yang berstatus readonly ditujukan untuk menampilkan jumlah total jual dan total beli

 even : form_load

Pembuatan Form
1. buka Microsoft Visual Studio anda
2. bukalah file kumpulan latihan anda
3. pilih menu project lalu klik add windows form
4. drag objek dari menu toolbox anda. susun hingga menjadi form seperti form pada gambar dibawah ini.

 5. buat koneksi dengan file access, caranya bisa anda lihat di http://www.tulistulisian.blogspot.com/2012/10/membuat-koneksi-antara-access-2007.html

6. buat pendeklarasian untuk datatable dan koneksi

 Dim CONECT As New OleDb.OleDbConnection("provider=microsoft.ace.oledb.12.0;data source= " & Application.StartupPath & "\datatransaksijualbeli.accdb")
    Dim tabel As New DataTable

7. buat script public sub untuk mngisi texbox dan datgridview

Public Sub xxx(ByVal A As String)
        Dim adapter As New OleDb.OleDbDataAdapter
        Dim abc As String
        abc = "SELECT MASTERTRANSAKSI.NOTRANS, MASTERTRANSAKSI.TANGGALTRANSAKSI, MASTERTRANSAKSI.JENISTRANSAKSI, MASTERTRANSAKSI.KETERANGAN, DETAILTRANSAKSI.UNIT, DETAILTRANSAKSI.HARGA, [DETAILTRANSAKSI]![UNIT]*[DETAILTRANSAKSI]![HARGA] AS JUMLAH FROM DETAILTRANSAKSI INNER JOIN MASTERTRANSAKSI ON DETAILTRANSAKSI.NOTRANS = MASTERTRANSAKSI.NOTRANS WHERE KODEBARANG = '" & A & "'"
        adapter = New OleDb.OleDbDataAdapter(abc, CONECT)
        adapter.Fill(tabel)

        Dim aa As Integer = 0
        Dim bb As Integer = 0
        For Each row As DataRow In tabel.Rows
            aa += row("Unit")
            bb += row("Jumlah")
        Next
        tu46110008.Text = aa
        tj46110008.Text = bb

    End Sub

8. untuk menjalankan, klik button detail transaksi di  form latihan 26a