Deskripsi Latihan 17:
Form
Latihan 17 terdapat satu object yaitu Data Grid View
Object
Data Grid View
Terdapat satu object
DataGridView digunakan untuk menampilkan semua field atau kolom pada tabel DETAILTRANSAKSI yang terdapat data D:\Apkom 4\LATIHAN 15-26 MENGAKSES DATA\datatransaksijualbeli
Script Unique
Dapat dilihat pada langkah -langkah penyelesaian latihan 17
Even
FromLoad
Property
Default
Form Latihan 17
Langkah-langkah
penyelesaian latihan 17:
- 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 latihan17_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 latihan17_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 * from detailtransaksi", jembatan)
ias.Rows.Clear()
yos.Fill(ias)
yos.Dispose()
Dgv_36110056.DataSource = ias
End Sub
End Class
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 latihan17_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 * from detailtransaksi", jembatan)
ias.Rows.Clear()
yos.Fill(ias)
yos.Dispose()
Dgv_36110056.DataSource = ias
End Sub
End Class
- Selanjutnya jika ingin menjalankannya pilih Startde bungging


Tidak ada komentar:
Posting Komentar