Latihan_20_36110046

Deskripsi & Prosedur Form Latihan_20_36110046

Deskripsi Form Latihan_20_36110046

 

Pada Form Latihan 20 hanya terdapat 1 object, yaitu datagridview . (Sediki’ nya..hehehe)

Object Pada Form

Object DataGridView

Terdapat 1 objek datagridview (seperti terlihat gambar di atas)

Script Unique

(identik dengan latihan 15)

Event

Form Load

Property

-

Deskripsi Form Latihan_20_36110046

Langkah-langkah mengerjakan Latihan 20, sbb:

1.        Buka Ms. Visual Studio

2.        Klik Create Project

3.        Ketik nama file yang ingin disimpan

4.        Akan terbuka jendela pekerjaan Ms. Visual Studio

5.        Design form dengan menggunakan tools pada toolbox

6.        Buat text pada form dengan menggunakan label, seperti pada gambar

7.        Buat  objek semua objek sesuai dengan design pada latihan 20 dengan toolbox, ikuti gambar dibawah ini:

8.        Setelah design sudah bagus, saatnya untuk membuat script

9.        Buat script prosedur sendiri seperti dibawah ini:

Public Class Latihan_20_36110046

    Dim CONNECT As New OleDb.OleDbConnection("provider=microsoft.ace.oledb.12.0;data source=d:\SEMESTER 5\aplikasi komputer 4\Rhepoet keren\LATIHAN 15-26 MENGAKSES DATA\DataTransaksiJualBeli.accdb")

    Dim DT As New DataTable

    Private Sub Latihan_20_36110046_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

        Dim QIPE As New OleDb.OleDbDataAdapter

        QIPE = 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", CONNECT)

        DT.Rows.Clear()

        QIPE.Fill(DT)

        DGV_36110046.DataSource = DT

        QIPE.Dispose()

    End Sub

End Class

10.    Silahkan jalankan program anda. Wassalam.