DISKRIPSI LATIHAN 24 B
Latihan_24B_36110030
A.
Object-object dalam Latihan_24B_36110030 :
1. Object Label
Terdapat lima
label (yang bertuliskan detail transaksi, kode barang, nama barang, harga jual,
dan jumlah barang).
2. Object
DataGridView
Terdapat
satu object datagridview yang digunakan untuk menampilkan detail transaksi dari
form Latihan_24A_36110030 yang berupa
nama barang, persediaan awal, dan harga jual.
3. Object
TextBox
Terdapat
empat obejct textbox yang digunakan untuk menampilkan kode barang, nama barang,
harga jual, dan jumlah barang dari daftar barang yang dipilih pada form
Latihan_24A_36110039.
B.
Script Unique
Untuk
script, dapat dilihat secara menyeluruh pada Prosedur Penyelesaian Latihan_24B_36110030
C.
Even
Latihan_24B_36110030_Load
YHUYA()
PROSEDUR PENYELESAIAN LATIHAN 24 B
1.KLIK STAR KEMUDIAN PILIH
MICROSOFT VISUAL STUDIO 2008
2.KEMUDIAN KLIK NEW PROJECT PADA FILE
3.KEMUDIAN
KLIK ADD UNTUK MENAMBAHKAN PROJECT
4. KEMUDIAN BUATLAH FORM SEPERTI DIBAWAH INI :
5.KEMUDIAN MASUKAN RUMUS :
Public Class Latihan_24B_36110030
Dim
bridgeyhuya As New
OleDb.OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data
Source= E:\semester 5\Apkom 4\LATIHAN 15-26 MENGAKSES
DATA\DataTransaksiJualBeli.accdb")
Dim
tabelyhuya As New
DataTable
Public Sub yhuya()
Dim
truckyhuya As New
OleDb.OleDbDataAdapter
truckyhuya = New
OleDb.OleDbDataAdapter("Select
BARANG.NAMABARANG, BARANG.PERSEDIAANAWAL, BARANG.HARGAJUAL From BARANG where
KODEBARANG = '" & kb_36110030.Text & "'", bridgeyhuya)
tabelyhuya.Rows.Clear()
truckyhuya.Fill(tabelyhuya)
truckyhuya.Dispose()
End Sub
Private Sub Latihan_24B_36110030_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles
Me.Load
DataGridView1.DataSource = tabelyhuya
End Sub
End Class
6. KEMUDIAN
UJI PROGRAM
kemudian klik star debugging maka akan muncul seperti ini :
7. JIKA SUDAH
BERHASIL Save program anda
8.selesai
0 komentar:
Posting Komentar