Latihan_383940_46110055

Deskripsi Form Latihan 383940

Pada Form Latihan 383940 Terdapat 2 object yaitu DataGridView dan Button.

Object DataGridView
Terdapat 1 DataGridView yang akan menampilkan data table.

Object Button
Terdapat 2 button yaitu Tombol Choose dan Cancel..

Script Unique
Tidak ada Script Unique pada latihan ini karena hampir sama dengan latihan sebelumnya.

Even
Load, click

Property
-

Langkah-langkah membuat Latihan 383940:

1. Buka  Microsoft Visual Studio 2008
2. Setelah itu  pilih “kumpulan_Latihan_46110055” (sesuai dengan nama file anda)

3. Pilih menu Project lalu klik add windows form

4. Ketik nama latihan yang akan dibuat pada kotak “NAME”  (namun jangan menghapus nama .vb) setelah itu pilih “add”.

5. Buatlah desain sesuai dengan yang diperintahkan soal “Latihan 383940”

6. Setelah itu beri teks pada Button dan buatlah DataGridview serta ganti nama design yang diakhiri nim anda pada kedua object tersebut.

7. Pilih menu “view” klik  “code”.
8. Masukkan rumus/script berikut :

Public Class Latihan_383940_46110055
    Dim FEBI As New OleDb.OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source =" & Application.StartupPath & "\Datamajemuk.ACCDB")
    Dim FEB As New DataTable
    Public Sub BATU()
        'mendeklarasikan kendaraan
        Dim FEIBY As New OleDb.OleDbDataAdapter

        'Mengatur data yang akan di angkut
        FEIBY = New OleDb.OleDbDataAdapter("SELECT* FROM BARANG", FEBI)
        FEB.Rows.Clear()

        'untuk memasukkan data yg telah di angkut ke dalam datatable
        FEIBY.Fill(FEB)
        FEIBY.Dispose()
    End Sub

    Private Sub Latihan_383940_46110055_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        BATU()
        DGV46110055.DataSource = FEB
    End Sub
End Class

9. Klik start debugging

10.  maka akan muncul hasil seperti dibawah ini: