Latihan_15_36110052
A.
Object-object dalam Latihan_15_36110052
:
Hanya ada satu
object dalam Latihan_15_36110048, yaitu object DataGridView sebanyak satu.
B. Script Unique
Untuk script, dapat diliat secara lebih lengkap pada
langkah-langkah kerja Latihan_15_36110052.
C. Even
Latihan_15_36110052_Load
Langkah-langkah
kerja latihan_15_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_15_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_15_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 form15_36109003_Load(ByVal
sender As System.Object, ByVal As System.EventArgs) Handles
MyBase.Load
Dim soe
As New
OleDb.OleDbDataAdapter
soe = New
OleDb.OleDbDataAdapter("select * from
BARANG", 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