Latihan_19_36110052
A. Object-object dalam
Latihan_19_36110052
Hanya ada satu object dalam Latihan_19_36110052, yaitu
object DataGridView sebanyak satu.
B. Script
Unique
Untuk script, dapat diliat secara lebih lengkap pada
langkah-langkah kerja Latihan_19_36110052.
C. Even
Latihan_19_36110052_Load
Langkah-langkah
kerja latihan_19_36110052
1. Buat
new windows form dengan cara ketik project àadd windows
form pada project yang telah dibuat dan
berikan nama form yang diinginkan
Contoh: latihan_19_36110052
3. Setiap
tools yang diambil pada textbox dapat diubah propertiesnya seperti nama dan
teksnya dengan cara klik kanan-properties.
4. Buat
form dengan bentuk seperti ini:
5. Setelah
selesai form, masuk ke lembar Vb dan masukkan script
Public NotInheritable Class
LATIHAN_19_36110052
Dim VIA As
New DataTable
Dim VEE As
New OleDb.OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data
Source='" & Application.StartupPath & "\DataTransaksiJualBeli.accdb'")
Private Sub
form19_36109003_Load(ByVal sender As System.Object, ByVal
e As System.EventArgs) Handles
MyBase.Load
Dim soe
As New
OleDb.OleDbDataAdapter
soe = New
OleDb.OleDbDataAdapter("select * from Query2", VEE)
soe.Fill(VIA)
soe.Dispose()
DataGridView_3611052.DataSource = VIA
End Sub
End Class
6.
Uji program dengan mengklik “Start Debbuging” dan save program dengan mengklik
“Save”.
7.
SELESAI
Tidak ada komentar:
Posting Komentar