Latihan_60_46110006

Deskripsi Form Latihan 60

Pada form latihan 60 ada 3 object yang digunakan yaitu Label, TextBox dan Button.

 

Object Label

Pada form ini yang digunakan ada 2 label “No. Transaksi dan Nama Kasir.

Object Button
  Terdapat 1 object button (preview). Tombol preview digunakan untuk menampilkan form “Latihan_53_46110006” yang berisi berisi Rincian Transaksi berdasarkan “Latihan_50_46110006”.

Object Textbox

Terdapat 2 textbox berstatus input, yang digunakan dalam menginput data berupa no. transaksi dan nama kasir.

 
Even
ButtonClick

Langkah-Langkah membuat Form Latihan 60 :

 

1. Buka Project yang telah dibuat sebelumnya , Pilih menu Project lalu klik add windows form

 

 

2.  Ketik nama Latihan_60  yang akan dibuat pada kotak “NAME” lalu pilih “add”

 

 

3. Buatlah desain menggunakan toolbox

     

Klik kanan, pilih "properties" dan Beri nama pada objek di kolom "Name" kecuali pada object Label

4. Pilih menu “view” klik  “code”

5. Masukkan rumus berikut: 

Public Class Latihan_60_46110006

    Private Sub View_46110006_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles View_46110006.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_46110006, Application.StartupPath, "Data Report.accdb")

        Latihan_53_46110006.CrystalReportViewer1.ReportSource = Laporan

        'mengatur nilai parameter

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

        'Mengatur(Filter)

        Latihan_53_46110006.CrystalReportViewer1.SelectionFormula = "{detailtransaksi.notrans} = '" & NT_46110006.Text & "'"

        'Menampilkan for

        If Latihan_53_46110006.Visible = False Then

            Latihan_53_46110006.Show()

        Else

            Latihan_53_46110006.Activate()

        End If

    End Sub

End Class

6.    Klik start debugging

 

 

7. Setelah form muncul, input data berupa no. transaksi dan nama kasir pada textbox yang tersedia.