Latihan 24b

Deskripsi latihan 24b

1. Objek Datagridview
terdapat 1 objek datgridview pada form ini. fungsinya adalah untuk menampilkan tabel detail transaksi yang ada di datagridview latihan 24a

2.  objek textbox
terdapat 4 objek textbox pada form ini. bertujuan untuk menampilkan kode barang, nama barang, harga jual, & jumlah barang  yang ada di datagridview latihan 24a

 even : form_load

Pembuatan Form
1. buka Microsoft Visual Studio anda
2. bukalah file kumpulan latihan anda
3. pilih menu project lalu klik add windows form
4. drag objek dari menu toolbox anda. susun hingga menjadi form seperti form pada gambar dibawah ini.

5. buat koneksi dengan file access, caranya bisa anda lihat di http://www.tulistulisian.blogspot.com/2012/10/membuat-koneksi-antara-access-2007.html

6. buat pendeklarasian untuk datatable dan koneksi

Dim CONECT As New OleDb.OleDbConnection("provider=microsoft.ace.oledb.12.0;data source= " & Application.StartupPath & "\datatransaksijualbeli.accdb")
    Dim tabel As New DataTable

7. buat script public sub untuk mngisi texbox dan datgridview

 Public Sub xxx(ByVal a As String)
        Dim adapter As New OleDb.OleDbDataAdapter
        adapter = New OleDb.OleDbDataAdapter("select*DETAILTRANSAKSI.ID, DETAILTRANSAKSI.NoTrans, DETAILTRANSAKSI.Unit, DETAILTRANSAKSI.Harga FROM DETAILTRANSAKSI where kodebarang='" & a & "'", CONECT)
        tabel.Rows.Clear()
        adapter.Fill(tabel)
        adapter.Dispose()

        dgv46110008.DataSource = tabel
    End Sub

8. untuk menjalankan, klik button detail transaksi di  form latihan 24a 

Latihan 24a

Deskripsi latihan 24a

1. Objek Datagridview
terdapat 1 objek datgridview pada form ini. fungsinya adalah untuk menampilkan tabel yang telah dibuat di file access 2007

2. objek button
terdapat 1 objek button pada form ini. bertujuan untuk menampilkan form latihan 24b

3. objek label
terdapat 1 objek label di form ini (bertuliskan master transaksi)

even : form_load, buttonclick


Pembuatan Form
1. buka Microsoft Visual Studio anda
2. bukalah file kumpulan latihan anda
3. pilih menu project lalu klik add windows form
4. drag objek dari menu toolbox anda. susun hingga menjadi form seperti form pada gambar dibawah ini.

 5. buat koneksi dengan file access, caranya bisa anda lihat di http://www.tulistulisian.blogspot.com/2012/10/membuat-koneksi-antara-access-2007.html

6. buat pendeklarasian untuk datatable dan koneksi

Dim CONECT As New OleDb.OleDbConnection("provider=microsoft.ace.oledb.12.0;data source= " & Application.StartupPath & "\datatransaksijualbeli.accdb")
    Dim tabel As New DataTable

7. letakkan script berikut untuk even form_load

Private Sub Latihan_24a_46110008_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim adapter As New OleDb.OleDbDataAdapter
        adapter = New OleDb.OleDbDataAdapter("select*from barang inner join detailtransaksi on barang.kodebarang = detailtransaksi.kodebarang", CONECT)
        tabel.Rows.Clear()
        adapter.Fill(tabel)
        adapter.Dispose()

        dgv46110008.DataSource = tabel
    End Sub

8. letakkan script berikut pada even buttonclick

 Private Sub dt46110008_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles dt46110008.Click
        If Latihan_24b_46110008.Visible = False Then
            Latihan_24b_46110008.Show()
        Else : Latihan_24b_46110008.Activate()
        End If

        Latihan_24b_46110008.kb46110008.Text = dgv46110008.CurrentRow.Cells("barang.kodebarang").Value
        Latihan_24b_46110008.nb46110008.Text = dgv46110008.CurrentRow.Cells("namabarang").Value
        Latihan_24b_46110008.hj46110008.Text = dgv46110008.CurrentRow.Cells("harga").Value
        Latihan_24b_46110008.jb46110008.Text = dgv46110008.CurrentRow.Cells("unit").Value

        Latihan_24b_46110008.xxx(Latihan_24b_46110008.kb46110008.Text)
    End Sub

9. save all, lalu debug untuk menjalankan  

Latihan 23b

Deskripsi latihan 23b

1. Objek Datagridview
terdapat 1 objek datgridview pada form ini. fungsinya adalah untuk menampilkan tabel detail transaksi yang ada di datagridview latihan 23a

2.  objek textbox
terdapat 2 objek textbox pada form ini. bertujuan untuk menampilkan nomor dan jenis transaksi yang ada di datagridview latihan 23a

3. objekdatetimepicker
terdapat 1 objek datetimepicker pada form ini. bertujuan untuk memunculkan tanggal yang ada di datagridview latihan 23a

even : form_load

Pembuatan Form
1. buka Microsoft Visual Studio anda
2. bukalah file kumpulan latihan anda
3. pilih menu project lalu klik add windows form
4. drag objek dari menu toolbox anda. susun hingga menjadi form seperti form pada gambar dibawah ini.

5. buat koneksi dengan file access, caranya bisa anda lihat di http://www.tulistulisian.blogspot.com/2012/10/membuat-koneksi-antara-access-2007.html

6. buat pendeklarasian untuk datatable dan koneksi

Dim CONECT As New OleDb.OleDbConnection("provider=microsoft.ace.oledb.12.0;data source= " & Application.StartupPath & "\datatransaksijualbeli.accdb")
    Dim tabel As New DataTable

7. buat script public sub

Public Sub xxx(ByVal A As String)
        Dim adapter As New OleDb.OleDbDataAdapter
        adapter = New OleDb.OleDbDataAdapter("select*from detailtransaksi where notrans='" & A & "'", CONECT)
        tabel.Rows.Clear()
        adapter.Fill(tabel)

        dgv46110008.DataSource = tabel

    End Sub

8. untuk menjalankan, klik button detail transaksi di  form latihan 23a

Latihan 23a

Deskripsi latihan 23a

1. Objek Datagridview
terdapat 1 objek datgridview pada form ini. fungsinya adalah untuk menampilkan tabel yang telah dibuat di file access 2007

2. objek button
terdapat 1 objek button pada form ini. bertujuan untuk menampilkan form latihan 23b

3. objek label
terdapat 1 objek label di form ini (bertuliskan master transaksi)

even : form_load, buttonclick

Pembuatan Form
1. buka Microsoft Visual Studio anda
2. bukalah file kumpulan latihan anda
3. pilih menu project lalu klik add windows form
4. drag objek dari menu toolbox anda. susun hingga menjadi form seperti form pada gambar dibawah ini.

5. buat koneksi dengan file access, caranya bisa anda lihat di http://www.tulistulisian.blogspot.com/2012/10/membuat-koneksi-antara-access-2007.html

6. buat pendeklarasian untuk datatable dan koneksi

Dim CONECT As New OleDb.OleDbConnection("provider=microsoft.ace.oledb.12.0;data source= " & Application.StartupPath & "\datatransaksijualbeli.accdb")
    Dim tabel As New DataTable

7. letakkan script berikut untuk even form_load

Private Sub Latihan_23a_46110008_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim adapter As New OleDb.OleDbDataAdapter
        adapter = New OleDb.OleDbDataAdapter("select*from mastertransaksi", CONECT)
        tabel.Rows.Clear()
        adapter.Fill(tabel)
        adapter.Dispose()

        dgv46110008.DataSource = tabel
    End Sub

8. letakkan script berikut pada even buttonclick

Private Sub klik46110008_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles klik46110008.Click
        If Latihan_23b_46110008.Visible = False Then
            Latihan_23b_46110008.Show()
        Else : Latihan_23b_46110008.Activate()
        End If

        Latihan_23b_46110008.nomor46110008.Text = dgv46110008.CurrentRow.Cells("notrans").Value
        Latihan_23b_46110008.tgl46110008.Value = dgv46110008.CurrentRow.Cells("tanggaltransaksi").Value
        Latihan_23b_46110008.jenis46110008.Text = dgv46110008.CurrentRow.Cells("jenistransaksi").Value

        Latihan_23b_46110008.xxx(Latihan_23b_46110008.nomor46110008.Text)

    End Sub

9. save all, lalu debug untuk menjalankan 

Latihan 22

Deskripsi Latihan 22

1. objek datagridview

terdapat dua objek datgridview pada form ini. fungsinya adalah untuk menampilkan tabel yang telah dibuat di file access 2007

even : form_load

Pembuatan Form
1. buka Microsoft Visual Studio anda
2. bukalah file kumpulan latihan anda
3. pilih menu project lalu klik add windows form
4. drag objek dari menu toolbox anda. susun hingga menjadi form seperti form pada gambar dibawah ini.

  5. buat koneksi dengan file access, caranya bisa anda lihat di http://www.tulistulisian.blogspot.com/2012/10/membuat-koneksi-antara-access-2007.html

6. buat pendeklarasian datatable, koneksi, dataset, dan bindingsource

Dim CONECT As New OleDb.OleDbConnection("provider=microsoft.ace.oledb.12.0;data source= " & Application.StartupPath & "\datatransaksijualbeli.accdb")
    Dim ab As New DataTable
    Dim ac As New DataTable

    Dim dss As New DataSet

    Dim xxx As New BindingSource
    Dim yyy As New BindingSource

7. letakkan script berikut untuk even form_load

 Private Sub Latihan_22_46110008_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim sss1 As New OleDb.OleDbDataAdapter
        Dim sss2 As New OleDb.OleDbDataAdapter

        sss1 = New OleDb.OleDbDataAdapter("select * from mastertransaksi", CONECT)
        sss1.Fill(ab)
        sss1.Dispose()

        sss1 = New OleDb.OleDbDataAdapter("select * from detailtransaksi", CONECT)
        sss1.Fill(ac)
        sss2.Dispose()

        dss.Tables.Add(ab)
        dss.Tables.Add(ac)

        ab.TableName = "01"
        ac.TableName = "02"

        dss.Relations.Add(New DataRelation("03", dss.Tables("01").Columns("notrans"), dss.Tables("02").Columns("notrans")))

        xxx.DataSource = dss
        xxx.DataMember = "01"
        yyy.DataSource = xxx
        yyy.DataMember = "03"

        dgv1_46110008.DataSource = xxx
        dgv2_46110008.DataSource = yyy
    End Sub

8. save all, lalu debug untuk menjalankan

Latihan 21

Deskripsi Latihan 21

1. Objek Datagridview
terdapat dua objek datgridview pada form ini. fungsinya adalah untuk menampilkan tabel yang telah dibuat di file access 2007

even : form_load

Pembuatan Form
1. buka Microsoft Visual Studio anda
2. bukalah file kumpulan latihan anda
3. pilih menu project lalu klik add windows form
4. drag objek dari menu toolbox anda. susun hingga menjadi form seperti form pada gambar dibawah ini.

  5. buat koneksi dengan file access, caranya bisa anda lihat di http://www.tulistulisian.blogspot.com/2012/10/membuat-koneksi-antara-access-2007.html


6. buat pendeklarasian datatable, koneksi, dataset, dan bindingsource

Dim CONECT As New OleDb.OleDbConnection("provider=microsoft.ace.oledb.12.0;data source= " & Application.StartupPath & "\datatransaksijualbeli.accdb")
    Dim ab As New DataTable
    Dim ac As New DataTable

    Dim dss As New DataSet

    Dim xxx As New BindingSource
    Dim yyy As New BindingSource

7. letakkan script berikut untuk even form_load

 Private Sub Latihan_21_46110008_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim sss1 As New OleDb.OleDbDataAdapter
        Dim sss2 As New OleDb.OleDbDataAdapter

        sss1 = New OleDb.OleDbDataAdapter("select * from mastertransaksi", CONECT)
        sss1.Fill(ab)
        sss1.Dispose()

        sss1 = New OleDb.OleDbDataAdapter("select * from detailtransaksi", CONECT)
        sss1.Fill(ac)
        sss2.Dispose()

        dss.Tables.Add(ab)
        dss.Tables.Add(ac)

        ab.TableName = "01"
        ac.TableName = "02"

        dss.Relations.Add(New DataRelation("03", dss.Tables("01").Columns("notrans"), dss.Tables("02").Columns("notrans")))

        xxx.DataSource = dss
        xxx.DataMember = "01"
        yyy.DataSource = xxx
        yyy.DataMember = "03"

        dgv1_46110008.DataSource = xxx
        dgv1_46110008.DataSource = yyy
    End Sub

8. save all, lalu debug untuk menjalankan

latihan 20

Deskripsi Latihan 20

1. Objek Datagridview
terdapat satu objek datgridview pada form ini. fungsinya adalah untuk menampilkan tabel yang telah dibuat di file access 2007

even : form_load

Pembuatan Form
1. buka Microsoft Visual Studio anda
2. bukalah file kumpulan latihan anda
3. pilih menu project lalu klik add windows form
4. drag objek dari menu toolbox anda. susun hingga menjadi form seperti form pada gambar dibawah ini.

5. buat koneksi dengan file access, caranya bisa anda lihat di http://www.tulistulisian.blogspot.com/2012/10/membuat-koneksi-antara-access-2007.html

6. buat pendeklarasian datatable dan koneksi

 Dim CONECT As New OleDb.OleDbConnection("provider=microsoft.ace.oledb.12.0;data source= " & Application.StartupPath & "\datatransaksijualbeli.accdb")
    Dim DT As New DataTable

7. letakkan script berikut untuk even form_load

Dim sss As New OleDb.OleDbDataAdapter
        sss = New OleDb.OleDbDataAdapter("select barang.kodebarang, barang.namabarang, mastertransaksi.notrans, mastertransaksi.tanggaltransaksi, mastertransaksi.jenistransaksi, detailtransaksi.unit, detailtransaksi.harga from (mastertransaksi inner join detailtransaksi on mastertransaksi.notrans=detailtransaksi.notrans) inner join barang on detailtransaksi.kodebarang=barang.kodebarang", CONECT)
        DT.Rows.Clear()
        sss.Fill(DT)
        dgv46110008.DataSource = DT
        sss.Dispose()

8. save all, lalu debug untuk menjalankan