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 :)