Latihan 23B_36001155

PROSEDUR LATIHAN 23B:

Ø  Lanjutan

Ø  Pilih “Add New Item” pada tool

Ø  Lalu pilih “Windows Form” dan ganti nama yang di ingin kan kemudian pilih “Add”

Ø  Muncullah form1.vb (Form1 bisa diganti)

Ø  Mulai bekerja dengan menggunakan tool pada toolbox

Ø  Buat empat label (yang bertuliskan detail transaksi, nomor, tanggal, dan jenis).

Ø  Buat satu object datagridview yang digunakan untuk menampilkan detail transaksi dari form Latihan_23A_36001155.

Ø  Setelah itu buat satu object datetimepicker yang digunakan untuk menampilkan tanggal transaksi dari master transaksi yang dipilih pada form Latihan_23A_36001155.

Ø  Buat dua obejct textbox yang digunakan untuk menampilkan nomor dan jenis transaksi dari master transaksi yang dipilih pada form Latihan_23A_36001155’

Ø  Untuk lebih jelasnya perhatikan gambar di bawah ini :

 

Ø  Setelah selesai, maka kita masuk pada rumus yaitu :

Public Class Latihan_23B_36001155

    Dim TabelMasnur As New DataTable

    Dim Masnur As New OleDb.OleDbConnection("provider=microsoft.ace.oledb.12.0;data source= D:\MATA KULIAH\SEMESTER 5\Apkom 4\Apkom\LATIHAN 15-26 MENGAKSES DATA\datatransaksijualbeli.accdb")

    Public Sub Mas()

        Dim truckMasnur As New OleDb.OleDbDataAdapter

        truckMasnur = New OleDb.OleDbDataAdapter("Select DETAILTRANSAKSI.ID, DETAILTRANSAKSI.KODEBARANG, DETAILTRANSAKSI.UNIT, DETAILTRANSAKSI.HARGA From DETAILTRANSAKSI Where NOTRANS = '" & Nomor_36001155.Text & "'", Masnur)

        TabelMasnur.Rows.Clear()

        truckMasnur.Fill(TabelMasnur)

        truckMasnur.Dispose()

    End Sub

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

        Masnur2_36001155.DataSource = TabelMasnur

    End Sub

End Class