Latihan_383940_36110031

Tahap Penyelesaian Latihan_383940_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_383940  dan add. seperti pada gambar dibawah:

 

4.      Buat Form Latihan_383940 dibawah ini:

 

5.       Berikut ini Rumus untuk menjalankan Form diatas:

Public Class Latihan_383940_36110031

    Dim Audry As New OleDb.OleDbConnection("Provider = microsoft.ace.oledb.12.0;data source=" & Application.StartupPath & "\DataMajemuk.accdb;Jet OLEDB:Database Password=3711")

    Dim Tabel As New DataTable

    Private Sub Latihan_383940_36110031_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)

        adapter.Dispose()

        Dgv_36110031.DataSource = Tabel

    End Sub

End Class

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

 

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

 

8.      Selesai

Deskripsi Latihan_383940_36110031

-    Object DataGridView

Terdapat satu  DataGridView untuk menampilkan kode barang dan nama barang yang akan dipilih untuk dimasukkan dalam form latihan_383940_361100031

-    Object Button

Terdapat dua object Button yaitu Pilih dan Batal. Button Pilih digunakan untuk untuk memilih kode barang yang akan diinput ke dalam textbox kode barang yang ada pada form Latihan_38_36110031. Sedangkan Button Batal digunakan untuk menutup form Latihan_383940_36110031.

Script Unique

Untuk script dapat dilihat secara menyeluruh pada tahap penyelesaian yang tertera diatas…

Even

Latihan_383940_36110031_Load

property

DialogResult=ok

DialogResult=cancel