Deskripsi Form Latihan_25b_46110003
Dalam
form Latihan_25b_46110003 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_25a_46110003.
Object DataGridView
Terdapat 1 object datagridview yang digunakan untuk menampilkan detail transaksi dari form Latihan_25a_46110003.
Script Unique
Tidak ada Script unique pada latihan ini karena perintah scriptny sudah ada pada latihan sebelumnya.
Even
Load
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_25a_46110003.
Object DataGridView
Terdapat 1 object datagridview yang digunakan untuk menampilkan detail transaksi dari form Latihan_25a_46110003.
Script Unique
Tidak ada Script unique pada latihan ini karena perintah scriptny sudah ada pada latihan sebelumnya.
Even
Load
Langkah-langkah Penyelesaian
1. Buat desain Form seperti contoh
dibawah ini:
2. Masukkan rumus:
Public Class Latihan_25b_46110003
Dim koneksi
As New
OleDb.OleDbConnection("provider=microsoft.ace.oledb.12.0;data
source= " & Application.StartupPath & "\datatransaksijualbeli.accdb")
Dim tabel As New DataTable
Public Sub amal(ByVal A As String)
Dim
adapter As New
OleDb.OleDbDataAdapter
adapter = New
OleDb.OleDbDataAdapter("select*from
detailtransaksi where kodebarang='" & A & "'", koneksi)
tabel.Rows.Clear()
adapter.Fill(tabel)
dgv46110003.DataSource = tabel
End Sub
Private Sub Latihan_25b_46110003_Load(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load
End Sub
End Class
3. Jalankan Program dengan mengklik
Debugging.
4. Maka akan tampil program seperti
dibawah ini.
0 komentar:
Posting Komentar