Latihan_383940_46110037

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 46110037

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

Langkah-langkah Menyelesaikan Form Latihan 383940 46110037

• Buka project yang telah dibuat.
• Buat form baru, caranya click Project pada Toolbar pilih Add Windows Form kemudian ketik nama form yang diinginkan lalu click Add
• Buat desain form seperti gambar di atas (Latihan_383940_46110037) dengan menggunakan DataGridView dan Button.
• Ganti nama DataGridView dan Button di properties-Name,
• Click Kanan pada design Latihan_383940_46110037 lalu pilih View Code kemudian buatlah Script seperti dibawah ini:

Public Class LATIHAN_383940_46110037

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

    Dim INNA As New DataTable

    Public Sub MUTH()

        Dim Mobil As New OleDb.OleDbDataAdapter

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

        INNA.Rows.Clear()

        Mobil.Fill(INNA)

        Mobil.Dispose()

    End Sub

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

        MUTH()

        view46110037.DataSource = INNA

    End Sub

End Class

• Save dan Click Start Debugging untuk menjalankan form