Latihan_18_36110052
A. Object-object dalam
Latihan_18_36110052
Hanya ada satu object dalam Latihan_18_36110052, yaitu
object DataGridView sebanyak satu.
B. Script
Unique
Untuk script, dapat diliat secara lebih lengkap pada
langkah-langkah kerja Latihan_18_36110052.
C. Even
Latihan_18_36110052_Load
Langkah-langkah
kerja latihan_18_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_18_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_18_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 form18_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 Query1", VEE)
soe.Fill(VIA)
soe.Dispose()
DataGridView_36110052.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