Kamis, 04 Oktober 2012

Latihan_16_36110056

Deskripsi Latihan 16:
Form Latihan 16 terdapat satu object yaitu Data Grid View
Object  Data Grid View
Terdapat satu object DataGridView digunakan untuk menampilkan semua field atau kolom pada table MASTERTRANSAKSI yang terdapat data D:\Apkom 4\LATIHAN 15-26 MENGAKSES DATA\datatransaksijualbeli
Script Unique
 Dapat dilihat pada langkah -langkah penyelesaian latihan 16
Even
FromLoad
Property
Default
 
                                Form Latihan 16


Langkah-langkah penyelesaian latihan 16:
  • 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 latihan16_36110056
    Dim jalan As New OleDb.OleDbConnection("provider=microsoft.ace.oledb.12.0;data source= D:\Apkom 4\LATIHAN 15-26 MENGAKSES DATA\datatransaksijualbeli.accdb")
    Dim ias As New DataTable
    Private Sub latihan16_36110056_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Dim nos As New OleDb.OleDbDataAdapter
        nos = New OleDb.OleDbDataAdapter("select * from MASTERTRANSAKSI", jalan)
        ias.Rows.Clear()
        nos.Fill(ias)
        nos.Dispose()
        Dgv_36110056.DataSource = ias

    End Sub
End Class
  • Selanjutnya jika ingin menjalankannya pilih Startde bungging

Tidak ada komentar:

Posting Komentar