Latihan_383940_46110022


Deskripsi Form Latihan_383940 46110022
Dalam form ini terdapat 2 buah object yaitu object DataGriedView dan button.

Object DataGriedView
Terdapat sebuah objek DataGriedView yang berfungsi untuk menampilkan data ke dalam bentuk tabel yang terdiri dari baris dan kolom.

Object Button
Terdapat 5 buah object button yaitu Pilih dan Batal.

Script Unique
    Tidak terdapat script unique pada form latihan ini.

Even

Load
Click

Langkah-Langkah Membuat Form Latihan 383940_46110022

1. Buat form baru seperti langkah berikut :

2. Input nama form pada kolom yang tersedia, lalu klik "add" seperti berikut :

3. Buat desain form seperti gambar berikut :



4. Input script di bawah ini :

Public Class Latihan_383940_46110022
    Dim alfa As New OleDb.OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source =" & Application.StartupPath & "\Datamajemuk.ACCDB")
    Dim ega As New DataTable
    Public Sub noldi()
        Dim Mobil As New OleDb.OleDbDataAdapter
        Mobil = New OleDb.OleDbDataAdapter("SELECT* FROM BARANG", alfa)
        ega.Rows.Clear()
        Mobil.Fill(ega)
        Mobil.Dispose()

    End Sub


    Private Sub Latihan_38_39_40_46110022_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        noldi()
        dgv46110022.DataSource = ega
    End Sub
End Class

     5.  Jalankan program dengan cara mengklik start debugging seperti berikut :


     6. Setelah menekan start debug, maka akan tampil hasil dari latihan 383940 seperti berikut :


    7. Selamat mencoba, semoga berhasil :)

0 Responses