Sabtu, 24 November 2012

latihan_41_46110023


Deskripsi Form Latihan_41_46110023
Form Latihan_41_46110023 terdapat Dua object yaitu  Data Grid View dan Microsoft Chart Control.

Objek DataGridView
Terdapat satu objek DataGridView yang berguna untuk menampilkan databerupa tabel dn kolom yang terdapat pada database

Objek Microsoft Chart Control
Terdapat satu objek Microsoft Chart Control yang berguna untuk menampilkan pendapatan dan biaya setiap tahunnya dalam bentuk grafik.

Script Unique 
untuk
   For Each HOHO As DataRow In gitik.Rows
            sekarang = sekarang + 1

            Chart1_46110023.Row = sekarang
            Chart1_46110023.RowLabel = HOHO("Tahun")

            Chart1_46110023.Column = 1
            Chart1_46110023.Data = HOHO("Pendapatan") / 1000

            Chart1_46110023.Column = 2
            Chart1_46110023.Data = HOHO("Biaya") / 1000

Even
load 

Prosedur Penyelesaiaan

1.    Buka project yang telah dibuat
2.    Pilih menu project yang ada pada menubar lalu pilih add windows form
     
    
3.    Ganti nama form sesuai dengan nama latihan 
          

4.    Buatlah form seperti gambar dibawah ini
              

5.    Ganti nama pada semua objek kecuali objek label
6.    Klik kanan pada desaign lalu pilih view code, maka akan muncul halaman seperti ini


  7. Masukkan rumus berikut:
Public Class LATIHAN_41_46110023
    Dim Jalan As New OleDb.OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source =" & Application.StartupPath & "\Datagrafik.ACCDB")
    Dim gitik As New DataTable

    Private Sub Latihan_41_46110023_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim DIAN As New OleDb.OleDbDataAdapter
        DIAN = New OleDb.OleDbDataAdapter("select * from keuangan", Jalan)
        gitik.Rows.Clear()
        DIAN.Fill(gitik)
        DIAN.Dispose()
        DGV_46110023.DataSource = gitik

        Chart1_46110023.RowCount = gitik.Rows.Count
        Chart1_46110023.ColumnCount = 2

        Dim sekarang As Integer = 0

        For Each HOHO As DataRow In gitik.Rows
            sekarang = sekarang + 1

            Chart1_46110023.Row = sekarang
            Chart1_46110023.RowLabel = HOHO("Tahun")

            Chart1_46110023.Column = 1
            Chart1_46110023.Data = HOHO("Pendapatan") / 1000

            Chart1_46110023.Column = 2
            Chart1_46110023.Data = HOHO("Biaya") / 1000

        Next

    End Sub
End Class

8.    Uji program dengan mengklik debugging
9.    Selesai

latihan_46_46110023


Deskrikpsi  latihan_46_46110023
Pada  latihan ini terdapat 2 object yaitu textobject dan lineobject

Textobject
Terdapat 2 textobject yang bertuliskan PT dan DAFTAR BARANG

Lineobject
Lineobject berfunsi untuk membuat baris dan kolom pada main report

Langkah-langkah membuat latihan_46_46110023

1.       Buka file project yang telah ada
2.       Pada kolom solution explorer, klik kanan pada kumpulan_latihan 46110023 lalu pilih add new item seperti berikut:

        

3.      Kemudian akan muncul halaman seperti dibawah ini, lalu ganti nama report pada kolom “name” lalu pilih add
        
        

4.      Maka akn muncul halaman seperti ini, pilih as blank report
        

5.      Maka halaman main report yang baru akan tampil

        

6.      Kemudian pada menu “field explorer”, klik kanan “database field” dan pilih “database expert”

         

7.      kemudian akan muncul tampilan seperti di bawah ini. Setelah itu, pilih “tables” kemudian pilih data apa yang diperlukan dalam report yang akan dibuat, lalu bawa ke selected tables.

        

8.      Desaignlah report seperti yang diinginkan, dengan cara tarik object databese expert yang ada pada database field ke section 3. Kemudian desaign report dengan memberikan line object pada kolom dan baris.

        

9.      Untuk mendapatkan jumlah dari persediaan awal dan rata-rata dari harga jual, caranya:
·         Klik kanan pada field persediaan pilih insert è summary è  pada kotak Calculate this summary, pilih SUM. kemudian klik OK.
·         Klik kanan pada field harga jual pilih insert è summary è  pada kotak Calculate this summary, pilih AVERAGE. kemudian klik OK.

10.   Untuk melihat hasilnya, pilih “main report preview”, hasilnya seperti berikut


11.    Selamat mencoba

latihan_45_46110023


Deskrikpsi  latihan_45_46110023
Pada  latihan ini terdapat 2 object yaitu textobject dan lineobject

Textobject
Terdapat 2 textobject yang bertuliskan PT dan DAFTAR BARANG

Lineobject
Lineobject berfunsi untuk membuat baris dan kolom pada main report

Langkah-langkah membuat latihan_45_46110023

1.       Buka file project yang telah ada.
2.       Pada kolom solution explorer, klik kanan pada kumpulan_latihan 46110023 lalu pilih add new item seperti berikut:

        

3.      Kemudian akan muncul halaman seperti dibawah ini, lalu ganti nama report pada kolom “name” lalu pilih add

        

4.      Maka akn muncul halaman seperti ini, pilih as blank report
                 
        

5.      Maka halaman report yang baru akan tampil

        

6.      Kemudian pada menu “field explorer”, klik kanan “database field” dan pilih “database expert”

        

7.      kemudian akan muncul tampilan seperti di bawah ini. Setelah itu, pilih “tables” kemudian pilih data apa yang diperlukan dalam report yang akan dibuat, lalu bawa ke selected tables.

        

8.      Desaignlah report seperti yang diinginkan, dengan cara tarik object databese expert yang ada pada database field ke section 3. Kemudian desaign report dengan memberikan line object pada kolom dan baris.

        

9.      Untuk melihat hasilnya, pilih “main report preview”, hasilnya seperti berikut

10.   Selamat mencoba