latihan_20_46110004

Deskripsi form latihan 20
Dalam form Latihan 20 hanya terdapat satu object yaitu DataGriedView

Object datagridview :
Dalam form ini terdapat 1 buah object datagridview. Datagridview digunakan untuk menampilkan data kedalam bentuk table yang terdiri dari baris dan kolom.

Script Unique :
Dalam form ini tidak terdapat script unique karena script yang digunakan sama dengan script latihan 15.

Even :
Load

Langkah-langkah penyelesaian form latihan 20

1.Buat form baru seperti gambar dibawah ini,

2. Ketikkan nama form latihan_20_xxxxx, lalu klik add

3. Buat form seperti gambar di bawah ini:

4. Setelah itu input script berikut ini :
Public Class latihan_20_46110004
    Dim CONECT As New OleDb.OleDbConnection("provider=microsoft.ace.oledb.12.0;data source= D:\Dokumen Koe\SEMESTER 5\APKOM 4\Visual Basic\LATIHAN 15-26 MENGAKSES DATA\datatransaksijualbeli.accdb")
    Dim sulhi As New DataTable

    Private Sub latihan_20_46110004_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Dim husni As New OleDb.OleDbDataAdapter
        husni = New OleDb.OleDbDataAdapter("select barang.kodebarang, barang.namabarang, mastertransaksi.notrans, mastertransaksi.tanggaltransaksi, mastertransaksi.jenistransaksi, detailtransaksi.unit, detailtransaksi.harga from (mastertransaksi inner join detailtransaksi on mastertransaksi.notrans=detailtransaksi.notrans) inner join barang on detailtransaksi.kodebarang=barang.kodebarang", CONECT)
        sulhi.Rows.Clear()
        husni.Fill(sulhi)
        dg_46110004.DataSource = sulhi
        sulhi.Dispose()
    End Sub
End Class

5. Jalankan program dengan cara klik kanan pada project, lalu pilih properties, kemudian akan muncul tampilan seperti gambar dibawah ini: