Latihan_54_46110037

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_46110037

        LATIHAN_53_46110037.CrystalReportViewer1.ReportSource = laporan

Even

Load, click

Property

-

Langkah-Langkah Menjalankan Form Latihan 54 46110037

• Click Start Debugging untuk menjalankan Script Latihan_54_46110037
• Langkah-langkah Menyelesaikan Form Latihan 54 46110037
• Buka project yang telah dibuat.
• Buat form baru, caranya click Project pada Toolbar pilih Add Windows Form kemudian ketik nama form yang diinginkan lalu click Add
• Buat desain form seperti gambar di atas (Latihan_54_46110037) Label dan Button.
• Ganti nama Label dan Button di properties-Name,
• Click Kanan pada design Latihan_54_46110037 lalu pilih View Code kemudian buatlah Script seperti dibawah ini:

Public Class LATIHAN_54_46110037

    Private Sub view_46110037_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles LIAT_46110037.Click

        Dim laporan As New CrystalDecisions.CrystalReports.Engine.ReportDocument

        laporan = New LATIHAN_45_46110037

        LATIHAN_53_46110037.CrystalReportViewer1.ReportSource = laporan

        If LATIHAN_53_46110037.Visible = False Then

            LATIHAN_53_46110037.Show()

        Else

            LATIHAN_53_46110037.Activate()

        End If

    End Sub

End Class

• Save dan Click Start Debugging untuk menjalankan form