Latihan_54_36110044 Aplikasi Komputer 4

Latihan 54

Deskripsi latihan54_36110044

A.           Object Label

Terdapat satu object label yang bertuliskan daftar barang (latihan 45).

B.            Object Button

Terdapat satu object button (preview) yang digunakan untuk menampilkan daftar barang latihan_45_36110044 di dalam latihan_53_36110044.

C.           Script Unique

                           Untuk script unique dapat dilihat pada Langkah-langkah mengerjakan latihan54_36110044.

D.    Even

        Button1_Click

PROSEDUR PENYELESAIAN:

1.       buka project yang telah dibuat.

2.       Pilih add new item

3.       Pada kotak templates pilih windows form. Kemudian pada kotak name tulis latihan_54_36110044. Lalu klik add

4.       Buat form sesuai dengan dibawah ini dengan menggunakan  button dan label

 

5.      Ganti nama button tersebut

 

6.       Setelah itu buatlah rumus

Public Class Latihan_54_36110044

    Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles PRIVIEW_36110044.Click

        Dim laporan As New CrystalDecisions.CrystalReports.Engine.ReportDocument

        laporan = New Latihan_45_36110044

        Latihan_53_36110044.CRV_36110044.ReportSource = laporan

        If Latihan_53_36110044.Visible = False Then

            Latihan_53_36110044.Show()

            Latihan_53_36110044.Activate()

        End If

    End Sub

End Class

7.       Jalankan program tersebut dengan Start Debugging