Latihan_54_46110041

Deskripsi Form Latihan 54

Terdapat 2 object yaitu Label dan Button

Object Label

Terdapat 1 yaitu daftar Barang.

Object Button

Terdapat  1 Button yaitu Priviewyang ketika di click akan menampilkan report Latihan 45

Script Unique

Menampilkan Report

Dim laporan As New CrystalDecisions.CrystalReports.Engine.ReportDocument

        laporan = New LATIHAN_45_46110041

  LATIHAN_53_46110041.CrystalReportViewer1.ReportSource = laporan

Even

Load, click

Property

-

Langkah-Langkah Menjalankan Form Latihan_54_46110041

Click Start Debugging untuk menjalankan Script Latihan_54_46110041

Langkah-langkah Menyelesaikan Form Latihan_54_46110041

1.     Buka project yang telah dibuat.

2.     Buat form baru, caranya click Project pada Toolbar pilih Add Windows Form kemudian ketik nama form yang diinginkan lalu click Add

3.     Buat desain form sesuai yang diinginkan (Latihan_54_46110041) Label dan Button.

4.     Ganti nama Label dan Button di properties-Name,

5.     Click Kanan pada design Latihan_54_46110041 lalu pilih View Code kemudian buatlah Script seperti dibawah ini:

Public Class LATIHAN_54_46110041

Private Sub view_46110041_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles LIAT_46110041.Click

Dim laporan As New CrystalDecisions.CrystalReports.Engine.ReportDocument

        laporan = New LATIHAN_45_46110041

        LATIHAN_53_46110041.CrystalReportViewer1.ReportSource = laporan

        If LATIHAN_53_46110041.Visible = False Then

            LATIHAN_53_46110041.Show()

        Else

            LATIHAN_53_46110041.Activate()

        End If

            End Sub

End Class

6.     Save dan Click Start Debugging untuk menjalankan form