Latihan_25A_3610031

 Tahap Penyelesaian Latihan_25A_36110031

1.         Buka Project yang telah dibuat, lalu buka solution Explorer

2.          Setelah itu klik kanan nama project, pilih add dan klik “new item”

 

3.         Click Add New Item terbuka, pilih Windows Form, lalu isi Name dengan Nama Latihan_25A  dan add. seperti pada gambar dibawah:

 

4.         Buat Form Latihan_25A dibawah ini:

 

 5.          Berikut ini Rumus untuk menjalankan Form diatas:

Public Class Latihan_25A_36110031

    Dim Audry As New OleDb.OleDbConnection("PROVIDER = MICROSOFT.ACE.OLEDB.12.0;DATA SOURCE = E:\Apkom 4\LATIHAN 15-26 MENGAKSES DATA\DataTransaksiJualBeli.accdb")

    Dim TABEL As New DataTable

    Private Sub Latihan_25A_36110032_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 * FROM BARANG", Audry)

        TABEL.Rows.Clear()

        adapter.Fill(TABEL)

        DGV_36110031.DataSource = TABEL

        adapter.Dispose()

    End Sub

    Private Sub detail_36110031_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Detail_36110031.Click

        If Latihan_25B_36110031.Visible = False Then

            Latihan_25B_36110031.Show()

        Else

            Latihan_25B_36110031.Activate()

            Latihan_25B_36110031.WindowState = FormWindowState.Normal

        End If

        Latihan_25B_36110031.Kodebarang_36110031.Text = DGV_36110031.CurrentRow.Cells("KODEBARANG").Value

        Latihan_25B_36110031.Namabarang_36110031.Text = DGV_36110031.CurrentRow.Cells("NAMABARANG").Value

        Latihan_25B_36110031.Hargajual_36110031.Text = DGV_36110031.CurrentRow.Cells("HARGAJUAL").Value

        Latihan_25B_36110031.Jumlahbarang_36110031.Text = DGV_36110031.CurrentRow.Cells("PERSEDIAANAWAL").Value

        Latihan_25B_36110031.Ias()

    End Sub

End Class

6.         Setelah itu jalankan Programnya dengan menekan “start debugging”

 

7.         Setelah menekan  “start debugging” akan muncul gambar seperti dibawah ini:

 

8.         Kemudian simpan file tersebut dengan menekan icon “save”

 

9.         Selesai

Deskripsi Latihan 25A

A.     Form Latihan 25A terdapat Tiga Object yaitu label, datagridview dan button .

-    Object Label

Terdapat satu Label yaitu Daftar Barang

-    Object Button

Terdapat satu object button yaitu Detail Transaksi digunakan untuk menampilkan detail dari Master Transaksi yang ada pada datagridview. Detail dari Master Transaksi itu akan mauncul pada form Latihan_25B_36110031

-    Object DataGridView

Terdapat satu Object DataGridView yang dimana digunakan untuk menampilkan daftar barang.

B.     Script Unique

Script dapat dilihat menyeluruh pada tahap penyelesaian yang tertera diatas

C.     Even

Latihan_25A_36110031_Load

 detail_36110031_Click