Latihan_17_46110002

Deskripsi Form Latihan 17

Pada form latihan 17 hanya ada 1 object yang digunakan yaitu Data Grid View.

Object DataGridView

Terdapat 1 object datagridview yang berfungsi untuk menampilkan data tabel.

Script Unique

Membuat koneksi untuk menyambungkan data access dengan form ata datagerid view yang dibuat

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

Membuat data tabel

Dim DS As New DataTable

Membuat adapter  dengan fungsi ini mentransfer data pada access dari tabel "barang" dan dmaukkan di data gridview

Dim DEDE As New OleDb.OleDbDataAdapter

Even

Load

Langkah-Langkah Penyelesaian Form Latihan_17_46110002

·         Buka folder project yang telah dibuat.

·         Click project kemudian pilih add windows form

·         Buat form "Latihan_17_46110002" pada name kemudian click add 

·         Buat form seperti berikut

·         Setelah itu beri nama pada properties 

·         Setelah itu masukkan rumus

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

    Dim DS As New DataTable

    Private Sub Latihan_15_46110002_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim DEDE As New OleDb.OleDbDataAdapter
        DEDE = New OleDb.OleDbDataAdapter("select * from mastertransaksi", CONECT)
        DS.Rows.Clear()
        DEDE.Fill(DS)
        DGV1_46110002.DataSource = DS
        DEDE.Dispose()

    End Sub
End Class

 

Langkah-Langkah Menjalankan Form Latihan 17

·         Klik star debugging, trus klik latihan 17

·          Maka akan muncul hasil seperti ini