Sabtu, 06 Oktober 2012
Latihan_16_36110029
v
Deskripsi Latihan_16_36110029
Object
Hanya ada
satu object dalam Latihan_16_36110029, yaitu object DataGridView sebanyak
satu.
Script
Unique
Untuk script, dapat diliat secara
lebih lengkap pada Prosedur Penyelesaian Latihan_16_36110029.
Even
Latihan_16_36110029_Load
v
Prosedur Latihan_16_36110029
1. Buka project yang telah dibuat.
2.
pilih
Add New Item pada Microsoft Visual Studio 2005/ 2008
3. Setelah add new item terbuka,
pilih windows form, lalu ketik nama form dan add.
4. Kemudian buat form seperti di
bawah ini:
5. Setelah format untuk
Latihan_16_36110029 sudah dibuat maka selanjutnya kita membuat
listing program pada jendela code:
Public Class Latihan_16_36110029
Dim A As New OleDb.OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=E:\DOKUMEN\SEMESTER 5\Apkom 4\LATIHAN 15-26 MENGAKSES DATA\DataTransaksiJualBeli.accdb")
Dim Hana As New DataTable
Private Sub Latihan_16_36110029_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim C As New OleDb.OleDbDataAdapter
C = New OleDb.OleDbDataAdapter("Select * from MASTERTRANSAKSI", A)
Hana.Rows.Clear()
C.Fill(Hana)
Data_36110029.DataSource = Hana
Hana.Dispose()
End Sub
End Class
Dim A As New OleDb.OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=E:\DOKUMEN\SEMESTER 5\Apkom 4\LATIHAN 15-26 MENGAKSES DATA\DataTransaksiJualBeli.accdb")
Dim Hana As New DataTable
Private Sub Latihan_16_36110029_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim C As New OleDb.OleDbDataAdapter
C = New OleDb.OleDbDataAdapter("Select * from MASTERTRANSAKSI", A)
Hana.Rows.Clear()
C.Fill(Hana)
Data_36110029.DataSource = Hana
Hana.Dispose()
End Sub
End Class
6. Tekan F5 pada keyboard
untuk menjalankan form, kemudian ketik angka
pada kolom dan perhatikan hasilnya.
Langganan:
Posting Komentar (Atom)
0 komentar:
Posting Komentar