latihan_18_46110023

Deskripsi Form Latihan 18

Pada form latihan 18 hanya terdapat 1 object yaitu object datagridview yang digunakan untuk menampilkan data berupa tabel.

Langkah-langkah membuat dan menjalankan form 18

1.      Buat form baru dengan cara pilih project pada menu bar dihalaman form yang telah ada,  kemudian pilih add windows form:

2

.      Ubah nama form sesuai dengan urutan latihan, dengan cara:

 

3

.      Setelah itu buatlah design form seperti gambar:

 

4

.      Ubahlah nama object pada form kecuali object label. 

    

    Klik kanan pada form kemuadian pilih view code, lalu muncul halaman baru dan masukkan script seperti dibawah ini:

  

Public Class LATIHAN_18_46110023
    Dim asal As New OleDb.OleDbConnection("provider=microsoft.ace.oledb.12.0;data source= " & Application.StartupPath & "\datatransaksijualbeli.accdb")

    Dim ol As New DataTable

    Private Sub Latihan15_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim dian As New OleDb.OleDbDataAdapter
        dian = New OleDb.OleDbDataAdapter("select barang.kodebarang, barang.namabarang, detailtransaksi.notrans, detailtransaksi.unit, detailtransaksi.harga from barang inner join detailtransaksi on barang.kodebarang=detailtransaksi.kodebarang", asal)
        ol.Rows.Clear()
        dian.Fill(ol)
        dgv_46110023.DataSource = ol
        dian.Dispose()

    End Sub
End Class

5.      Setelah selesai membuat script, save file.

6.      Untuk menjalankan, klik star debugging

7.      Selesai

Script unique
tdk ada script unique pada latihan ini karena perintahnya sama dengan ltihan sebelumnya.

Even

Load