Latihan 383940 36110051 APKOM 4 D3B Akuntansi PNUP

A.    Object-object dalam Latihan_38_39_40_36110051 :

            1.      Object Button

Terdapat dua object button (Pilih dan Batal). Tombol digunakan untuk memilih kode barang yang akan diinput ke dalam textbox kode barang yang ada pada form Latihan_38_36110051. Tombol batal digunakan untuk menutup form Latihan_38_39_40_36110051. 

2.      Object DataGridView

Terdapat satu object datagridview yang digunakan untuk menampilkan kode barang dan nama barang yang akan dipilih untuk dimasukkan pada form Latihan_38_36110051.

 

B.     Script Unique

Untuk script, silahkan lihat selengkapnya pada PROSEDUR di bawah ini.

C.     Even

Latihan_38_39_40_36110051_Load

 

 

PROSEDUR :

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 dan buatlah desain kolom seperti kolom dibawah ini:

 

5.      Berikut ini adalah rumus untuk menjalankan form di atas:

 

Public Class Latihan_38_39_40_36110051

    Dim ACI As New DataTable

    Dim RANTE As New OleDb.OleDbConnection("PROVIDER = MICROSOFT.ACE.OLEDB.12.0; DATA SOURCE =" & Application.StartupPath & "/Datamajemuk.ACCDB")

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

        Dim ISA As New OleDb.OleDbDataAdapter

        ISA = New OleDb.OleDbDataAdapter("SELECT * FROM BARANG", RANTE)

        ACI.Rows.Clear()

        ISA.Fill(ACI)

        ISA.Dispose()

        dgv_36110051.DataSource = ACI

    End Sub

End Class

6.       Uji program dengan mengklik icon Start Debugging.