Deskripsi :
Dalam form Latihan 20 hanya terdapat satu object yaitu DataGridView.
Object datagridview :
Dalam form ini terdapat 1 buah object
datagridview. Datagridview digunakan untuk
menampilkan data kedalam bentuk table yang terdiri dari baris dan kolom.
Langkah-langkah penyelesaian form 20 :
Masukkan rumus seperti ini
Public Class Latihan_20_46110045
Dim CONNECT As New OleDb.OleDbConnection("provider=microsoft.ace.oledb.12.0;data source= C:\Users\Microsoft\Documents\VB\LATIHAN 15-26 MENGAKSES DATA\datatransaksijualbeli.accdb")
Dim DN As New DataTable
Private Sub Latihan_20_46110045_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim DINA As New OleDb.OleDbDataAdapter
DINA = 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)
DN.Rows.Clear()
DINA.Fill(DN)
dgv46110045.DataSource = DN
DINA.Dispose()
End Sub
End Class
Even :
Load.
Tidak ada komentar:
Posting Komentar