Latihan_15_36110034

Deskripsi penyelesaian

Form Latihan_15_36110034  terdapat satu object yaitu DataGreatView

Object DataGreatview

Terdapat satu object datagreatview yang akan menampilkan table yang berasal dari data acces, pada table yang berjudul barang , dimana datagreatview tersebut akan menampilkan semua kolom pada tabel barang. 

Property

Property Datagreatview => name => ok

Prosedur penyelesaian

1.   buka project yang telah dibuat sebelumnya klik add new item => add windows form => ganti nama project => add.

2.   membuat form dengan menggunakan Label dan Textbox yang ada dalam "Toolbox”.

3.   ganti nama textbox dan button menggunakan "Properties Window".

4.   membuka lembar vb Masukkan rumus berikut untuk menyelesaikan latihan_15_36110034.

Public Class latihan_15_36110034

    Dim DD As New DataTable

    Dim DINI As New OleDb.OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=E:\SEMESTER 5\APKOM 4\kumpulan_latihan_36110034\DataTransaksiJualBeli.accdb")

    Private Sub latihan_15_36110034_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Dim AW As New OleDb.OleDbDataAdapter

        AW = New OleDb.OleDbDataAdapter("select * from BARANG", DINI)

        AW.Fill(DD)

        AW.Dispose()

        DGV_36110034.DataSource = DD

    End Sub

End Class

5.   Jalankan program dengan “start debugging”.