Latihan_383940_46110041

Deskripsi 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 Menjalankan Form Latihan_383940_46110041

Click Start Debugging untuk menjalankan Script Latihan_383940_46110041, maka data barang akan tampil di DataGridView

Langkah-langkah Menyelesaikan Form Latihan_383940_46110041

1.     Buka project yang telah dibuat.

2.     Buat form baru, caranya click Project pada Toolbar pilih Add Windows Form kemudian ketik nama form yang diinginkan lalu click Add

3.     Buat desain form sesuai yang diinginkan (Latihan_383940_46110041) dengan menggunakan DataGridView dan Button.

4.     Ganti nama DataGridView dan Button di properties-Name,

5.     Click Kanan pada design Latihan_383940_46110041 lalu pilih View Code kemudian buatlah Script seperti dibawah ini:

Public Class LATIHAN_383940_46110041

Dim Jembatan As New OleDb.OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source =" & Application.StartupPath & "\Datamajemuk.ACCDB")

    Dim Fidah As New DataTable

    Public Sub Shaleh()

        Dim Mobil As New OleDb.OleDbDataAdapter

        Mobil = New OleDb.OleDbDataAdapter("SELECT* FROM BARANG", Jembatan)

        Fidah.Rows.Clear()

        Mobil.Fill(Fidah)

        Mobil.Dispose()

    End Sub

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

        Shaleh()

        view46110041.DataSource = Fidah

    End Sub

End Class

6.     Save dan Click Start Debugging untuk menjalankan form