Deskripsi Penyelesaian
Latihan_38,39,40_36110041
A. Objek dalam Form Latihan_38,39,40:
Dalam form latihan ini hanya terdapat dua object yaitu datagridview dan buttom.
1. Object DataGridView
Terdapat
satu object datagridview yang digunakan untuk menampilkan kode barang dan nama
barang yang akan dipilih untuk dimasukkan pada form Latihan_38_36110048.
2. Object Buttom
Terdapat dua
object button (Pilih dan Batal). Tombol digunakan untuk memilih kode barang
yang akan diinput ke dalam textbox kode barang yang ada pada form Latihan_38_36110048.
Tombol batal digunakan untuk menutup form Latihan_383940_36110048.
B. Script Unique
Untuk scriptnya akan ditampilkan
secara keseluruhan dalam prosedur
Latihan28_39_40_36110041_Load
C.
Even
latihan_38_39_40_36110041_Load
Prosedur penyelesaian
1.
Buka Project
yang telah dibuat sebelumnya klik Add New Item
=> Add Windows Form
 |
2.
Kemudian beri
nama dan klik Add
3.
buat form seperti di bawah ini
dengan menggunakan toolbox yang saya tunjukkan pada postingan sebelumnya.
4.
Berikut
ini adalah rumus untuk menjalankan form di atas
Public Class
latihan_38_39_40_36110041
Dim rizka As
New DataTable
Dim azisah As
New OleDb.OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data
Source=" & Application.StartupPath & "\DataMajemuk.accdb;Jet OLEDB:Database
Password=008")
Private Sub
latihan_38_39_40_36110041_Load(ByVal sender As System.Object, ByVal
e As System.EventArgs) Handles
MyBase.Load
Dim cari As
New OleDb.OleDbDataAdapter
cari = New OleDb.OleDbDataAdapter("SELECT * FROM BARANG", azisah)
rizka.Rows.Clear()
cari.Fill(rizka)
cari.Dispose()
rizka_36110041.DataSource = rizka
End Sub
End Class
5.
Kemudian jalankan perintahnya
Tidak ada komentar:
Posting Komentar