Kamis, 04 Oktober 2012

Latihan_17_36110056

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

  • Selanjutnya jika ingin menjalankannya pilih Startde bungging

 








Tidak ada komentar:

Posting Komentar