Latihan_15_36110056

Deskripsi Latihan 15:

Form Latihan 15 terdapat satu object yaitu Data Grid View

Object  Data Grid View

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

Script Unique

 Dapat dilihat pada langkah -langkah penyelesaian latihan 15

Even

FromLoad

Property

Default

                                      Latihan Form Latihan 15

Langkah-langkah penyelesaian latihan 15:

• 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

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

• Selanjutnya masukkan formula atau rumus untuk menjalan form  :

Public Class latihan15_36110056
    Private Sub latihan15_36110056_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        'deklarasi connection
        Dim CONECT As New OleDb.OleDbConnection("provider=microsoft.ace.oledb.12.0;data source= D:\Apkom 4\LATIHAN 15-26 MENGAKSES DATA\datatransaksijualbeli.accdb")

        'deklarasi data table
        Dim DIDI As New DataTable

           Dim DEDE As New OleDb.OleDbDataAdapter

        'deklarasi adapter
        DEDE = New OleDb.OleDbDataAdapter("select * from barang", Conect)

        'membersihkan data table
        DIDI.Rows.Clear()

        'mengisi database ke dalam data table
        DEDE.Fill(DIDI)

        'mengisi database ke dalam data table
        Dgv_36110056.DataSource = DIDI

        'menghancurkan kendaraan(adapter) yang sudah dipakai
        DEDE.Dispose()
    End Sub
End Class

• Selanjutnya jika ingin menjalankannya pilih Startde bungging atau dapat menekan F5 pada keyboard