Latihan_19_36110056

Deskripsi Latihan 19:

Form Latihan 19 terdapat satu object yaitu Data Grid View

Object  Data Grid View

Terdapat satu object DataGridView digunakan untuk menampilkan semua field atau kolom yang terdapat dalam data D:\Apkom 4\LATIHAN 15-26 MENGAKSES DATA\datatransaksijualbeli

Script Unique

 Dapat dilihat pada langkah -langkah penyelesaian latihan 19

Even

FromLoad

Property

Default

 

                           Form Latihan 19

Langkah-langkah penyelesaian latihan 19:

• Buka project yang dibuat sebelumnya
• Pilih Add new item

• Setelah terbuka jendela Add new item, pilih windows form  serta anda dapat mengganti nama form, dan setelah itu pilih add

• Buat form sesuai soal di atas dengan menggunakan Data Grid View yang terdapat dalam toolsbox

• Setelah form selesai, ubah nama DataGridView yang terdapat dalam properties window  

• Selanjutnya masukkan formula atau rumus untuk menjalan form  :

Public Class latihan19_36110056
    Dim ias As New DataTable
    Dim jembatan As New OleDb.OleDbConnection("provider=microsoft.ace.oledb.12.0;data source= D:\Apkom 4\LATIHAN 15-26 MENGAKSES DATA\datatransaksijualbeli.accdb")
    Private Sub latihan19_36110056_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim yos As New OleDb.OleDbDataAdapter
        yos = New OleDb.OleDbDataAdapter(" select mastertransaksi.notrans, mastertransaksi.tanggaltransaksi, mastertransaksi.jenistransaksi, detailtransaksi.kodebarang, detailtransaksi.unit, detailtransaksi.harga from mastertransaksi inner join detailtransaksi on mastertransaksi.notrans = detailtransaksi.notrans", jembatan)
        ias.Rows.Clear()
        yos.Fill(ias)
        yos.Dispose()
        Dgv_36110056.DataSource = ias
    End Sub
End Class

• Selanjutnya jika ingin menjalankannya pilih Start de bungging