Latihan 37, 38, 39

Deskripsi

1. objek datagridview
menampilkan data yang ada pada access


even : FormLoad


Pembuatan Form
1. buka Microsoft Visual Studio anda
2. bukalah file kumpulan latihan anda
3. pilih menu project lalu klik add windows form
4. drag objek dari toolbox anda. susun hingga menjadi form seperti form pada gambar dibawah ini.

5. masukkan script berikut

Public Class Latihan_38_39_40_4611008
    Dim Jalan As New OleDb.OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source =" & Application.StartupPath & "\Datamajemuk.ACCDB")
    Dim tabel As New DataTable
    Private Sub Latihan_38_39_40_4611008_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        xxx()
        dgv46110008.DataSource = tabel
    End Sub
    Public Sub xxx()
        Dim Mobil As New OleDb.OleDbDataAdapter

        Mobil = New OleDb.OleDbDataAdapter("SELECT* FROM BARANG", Jalan)
        tabel.Rows.Clear()

        Mobil.Fill(tabel)
        Mobil.Dispose()

    End Sub
End Class