Latihan_18_46110037

Deskripsi Form Latihan 18

Pada latihan 18 Hanya terdapat DataGridView.

Object DataGridView

Terdapat 1 DataGridView yang akan menampilkan data dalam tabel yang telah dibuat di script yang merupakan data dari microsoft Access

Script Unique

*Script latihan 18 sama dengan script unique latihan 15 (tidak ada Script unique pada latihan  ini)

Even

Load

Propertty

Default

Langkah-langkah Menyelesaikan Form

• Buka project yang telah dibuat.
• Buat form baru, caranya click Project pada Toolbar pilih Add Windows Form kemudian ketik nama form yang diinginkan lalu click Add
• Buat desain form seperti gambar di atas dengan menggunakan DataGridView
• Ganti nama DataGridView di properties-Name
• Click Kanan lalu pilih View Code kemudian buatlah Script seperti dibawah ini:

Public Class LATIHAN_18_46110037

    Dim CONECT As New OleDb.OleDbConnection("provider=microsoft.ace.oledb.12.0;data source= D:\POLTEK\5\Apkom (pak hasyim)\APKOM 4 a\LATIHAN 15-26 MENGAKSES DATA\datatransaksijualbeli.accdb")

    Dim DS As New DataTable

    Private Sub Latihan_18_46110037_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Dim INNA As New OleDb.OleDbDataAdapter

        INNA = New OleDb.OleDbDataAdapter("select barang.kodebarang, barang.namabarang, detailtransaksi.notrans, detailtransaksi.unit, detailtransaksi.harga from barang inner join detailtransaksi on barang.kodebarang=detailtransaksi.kodebarang", CONECT)

        DS.Rows.Clear()

        INNA.Fill(DS)

        DGV46110037.DataSource = DS

        INNA.Dispose()

    End Sub

End Class

• Click Start Debugging untuk menjalankan form. Maka yang ditampilkan adalah gabungan dari tabel barang dan tabel detail transaksi.