Kamis, 04 Oktober 2012

Deskripsi dan Prosedur Latihan_18_36110039


*   Deskripsi Form Latihan_18_36110039


Object DataGridView
Hanya terdapat satu object Datagridview.

*   Script Unique
Scriptnya ada pada Prosedur Latihan_18_36110039 dibawah ini.

*   Even
Latihan_18_36110039_Load



Prosedur menjalankan Latihan_18_36110039:

1.       Klik Start dan pilih Microsoft Visual Studio 2008.
 
2.       Klik menu file dan pilih New Project.
 
3.       Ketik nama dan pilih lokasi yang diinginkan pada masing-masing tempat yang tersedia, klik Ok.
 

4.       Klik menu view dan pilih toolbox.

5.      Kemudian pilih object DataGridView dan buat sebanyak satu. Isi properti name menjadi nama yang anda inginkan dan nomor stambuk pada akhir nama tersebut.

6.      Setelah perintah diatas dilakukan maka jadilah seperti kolom dibawah ini:
 

7.      Berikut ini adalah rumus untuk menjalankan form di atas:
Dim Koneksi As New OleDb.OleDbConnection(" Provider = microsoft.ace.oledb.12.0; data source = D:\Apkom 4\LATIHAN 15-26 MENGAKSES DATA\DataTransaksiJualBeli.accdb")
    Dim DtTable As New DataTable

    Private Sub Latihan_18_36110039_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim Adapter As New OleDb.OleDbDataAdapter
        Adapter = New OleDb.OleDbDataAdapter("Select Barang.Kodebarang, Barang.Namabarang, Detailtransaksi.Notrans, Detailtransaksi.Unit, Detailtransaksi.Harga " & _
        "From Barang Inner Join Detailtransaksi On Barang.Kodebarang = Detailtransaksi.Kodebarang", Koneksi)

        DtTable.Rows.Clear()
        Adapter.Fill(DtTable)
        dgv_36110039.DataSource = DtTable

        Adapter.Dispose()
    End Sub
8.       Untuk melihat apakah program yang anda telah buat sudah benar atau belum tepat maka klik icon Start Debugging atau tekan F5.
 

Tidak ada komentar:

Posting Komentar