latihan_24B_46110023

Deskripsi Form Latihan 24B

Dalam form Latihan 24B hanya terdapat Object Label, Object TextBox, dan Object DataGridView

Object Label
Terdapat 5 label yaitu "Detail Transaksi", "kode barang", "nama barang", "harga jual", dan "jumlah barang".

Object TextBox
Terdapat 4 obejct textbox yang digunakan untuk menampilkan kode barang, nama barang, harga jual, dan jumlah barang dari daftar barang yang dipilih pada form Latihan_24A_46110023.

Object DataGridView
Terdapat 1 object datagridview yang digunakan untuk menampilkan detail transaksi dari form Latihan_24A_46110023.

Langkah-langkah membuat dan menjalankan form latihan 24b

 Langkah-langkah atau cara membuat form pada latihan 23A ini sama saja dengan langkah-langkah membuat  form pada latihan-latihan sebelumnya,. Yang membedakan hanyalah desaign formnya dan scriptnya. Pada form ini bentuk formnya seperti berikut:

 

Setelah desaignnya jadi, klik kanan pada desaidn kemudian pilih view code maka akan muncul halaman baru lalu masukkan script seperti dibawah ini:

Public Class LATIHAN_24B_46110023

Dim jembatan As New OleDb.OleDbConnection("provider=microsoft.ace.oledb.12.0;data source=" & Application.StartupPath & "\datatransaksijualbeli.accdb")

    Dim tabel As New DataTable

    Public Sub dian(ByVal a As String)

    Dim adapter As New OleDb.OleDbDataAdapter

adapter = New OleDb.OleDbDataAdapter("SELECT DETAILTRANSAKSI.ID, DETAILTRANSAKSI.NoTrans, DETAILTRANSAKSI.Unit, DETAILTRANSAKSI.Harga FROM DETAILTRANSAKSI where kodebarang='" & a & "'", jembatan)

        tabel.Rows.Clear()

        adapter.Fill(tabel)

        adapter.Dispose()

        DGV_46110023.DataSource = tabel

    End Sub

Private Sub latihan_24B_46110023_load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub

Private Sub dgv_46110023_CellContentClick(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DGV_46110023.CellContentClick

    End Sub

End Class

Jalankan program dengan mengklik start debugging, latihan ini akan bersamaan dengan latihan 24A

Script Unique
Tidak ada Script unique pada latihan ini karena perintah scriptny sudah ada pada latihan sebelumnya. 

Even
Load