Latihan_60_46110038

Deskripsi Form Latihan_60_46110038:

Form Latihan_60_46110038 hanya terdapat 3 object yaitu Label, TextBox, dan Button.

Object Label

Di Latihan_60_46110038  ada 2 object label yang bertuliskan nomor transaksi dan nama kasir.

Object TextBox

Di Latihan_60_46110038  ada dua object textbox yang berstatus input.

Object Button 

Di Latihan_60_46110038  ada satu object button (preview) yang digunakan untuk menampilkan daftar barang latihan_59_46110038 di dalam latihan_53_46110038 berdasarkan nomor transaksi.

Even

        View46110038.Click

Cara Membuat Form Latihan_60_46110038:

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 sesuai perintah.

5.            Setelah format untuk Latihan_60_46110038  sudah dibuat maka selanjutnya membuat listing program pada jendela code:

Public Class Latihan_60_46110038

    Private Sub View46110038_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles View46110038.Click

        Dim Laporan As New CrystalDecisions.CrystalReports.Engine.ReportDocument

        'mengatur lokasi dan nama database laporan

        Dim botto As New ByIskandar.MengaturDataBaseCrystalReport

        Laporan = botto.AturDatabase(New Latihan_59_46110038, Application.StartupPath, "datareport.accdb")

        Latihan_53_46110038.CrystalReportViewer1.ReportSource = Laporan

        'mengatur nilai parameter

        Laporan.SetParameterValue("nama", NK46110038.Text)

        'Mengatur(Filter)

        Latihan_53_46110038.CrystalReportViewer1.SelectionFormula = "{detailtransaksi.notrans} = '" & NT46110038.Text & "'"

        'Menampilkan for

        If Latihan_53_46110038.Visible = False Then

            Latihan_53_46110038.Show()

        Else

            Latihan_53_46110038.Activate()

        End If

    End Sub

End Class

Untuk menjalankan Latihan_60_46110038, klik start debugging untuk melihat apakah rumus tersebut bisa terbaca atau tidak.

Latihan_59_46110038

Deskripsi Form Latihan_59_46110038:

Form Latihan_59_46110038 hanya terdapat 3 object yaitu    text object, line object, dan box object.

Database fields

1.      Barang (kodebarang, dan namabarang)

2.      DetailTransaksi (unit, dan harga)

3.      Mastertransaksi (notrans dan tanggaltransaksi, dan jenistransaksi).

Group name fields

Terdapat satu Group name fields (group #1 name) dimana group yang berdasarkan notrans berasal dari mastertransaksi.

Parameter fields

      Terdapat satu parameter fields yang digunakan untuk mengisi nama.

Cara menjumlahkan field

Field HARGA :  klik kanan field HARGA pilih insert kemudian summary. Setelah itu pada kotak Calculate this summary, pilih SUM. kemudian klik OK       .

Cara Membuat Report Latihan_59_46110038:

1.  Buka project yang telah dibuat, dan buka solution explorer.

2.  Klik  kanan nama project ==> add ==> new item.

3. Klik New Item, setelah terbuka klik kotak reporting dan pilih crystal report kemudian ketik nama report lalu klik Add

4. Kemudian klik file tersebut,  maka akan terbuka jendela dari Ms. Visual Studio.

5. Buat main report sesuai tugas.

6. Untuk menampilkan hasil main report tersebut dengan mengklik main report  preview. SAVE.

Latihan_58_46110038

Deskripsi Form Latihan_58_46110038:

Form Latihan_58_46110038 hanya terdapat 3 object yaitu Label, DataTimePicker, dan Button.

Object Label

Di Latihan_58_46110038  ada 4 object label yang bertuliskan rincian transaksi (latihan 50) berdasarkan tanggal, Insert the date will be preview, dari tanggal, dan hingga tanggal.

Object DateTimePicker

Di Latihan_58_46110038  ada dua object datetimepicker yang digunakan untuk menampilkan tanggal transaksi.

Object Button 

Di Latihan_58_46110038  ada satu object button (preview) yang digunakan untuk menampilkan daftar barang latihan_50_46110038 di dalam latihan_53_46110038.

Even

        View46110038.Click

Cara Membuat Form Latihan_58_46110038:

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 sesuai perintah.

5.            Setelah format untuk Latihan_58_46110038  sudah dibuat maka selanjutnya membuat listing program pada jendela code:

          Public Class Latihan_58_46110038

    Private Sub View46110038_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles View46110038.Click

        Dim Laporan As New CrystalDecisions.CrystalReports.Engine.ReportDocument

        'mengatur lokasi dan nama database laporan

        Dim botto As New ByIskandar.MengaturDataBaseCrystalReport

        Laporan = botto.AturDatabase(New Latihan_50_46110038, Application.StartupPath, "datareport.accdb")

        Latihan_53_46110038.CrystalReportViewer1.ReportSource = Laporan

        'Mengatur(Filter)

        Latihan_53_46110038.CrystalReportViewer1.SelectionFormula = "datevalue({mastertransaksi.tanggaltransaksi}) = #" & DTP146110038.Value.Month & "/" & DTP246110038.Value.Day & "/" & DTP146110038.Value.Year & "#" & "and datevalue({mastertransaksi.tanggaltransaksi}) <= #" & DTP246110038.Value.Month & "/" & DTP246110038.Value.Day & "/" & DTP246110038.Value.Year & "#"

        'Menampilkan form 53

        If Latihan_53_46110038.Visible = False Then

            Latihan_53_46110038.Show()

        Else

            Latihan_53_46110038.Activate()

        End If

    End Sub

End Class

Untuk menjalankan Latihan_58_46110038, klik start debugging untuk melihat apakah rumus tersebut bisa terbaca atau tidak.