latihan_54_46110004

Deskripsi form latihan 54
Dalam form Latihan 54 terdapat dua object yaitu Label dan Button.

Object Label :
Dalam form ini terdapat sebuah buah object label yang bertuliskan “Daftar Barang (Latihan 45)"

Object Button :
Dalam form ini terdapat sebuah object button yang bertuliskan “preview” dan “tambah”. Button ini digunakan untuk menampilkan data report yang terdapat di latihan 45.

Script Unique :

Melakukan proses variabel report yang akan ditampilkan:
Dim laporan As New CrystalDecisions.CrystalReports.Engine.ReportDocument
laporan = New latihan_45_46110004

Mengisi Report Source dangan variabel laporan
latihan_53_46110004.CrystalReportViewer1.ReportSource = laporan

Even :
Button click

Langkah-langkah penyelesaian form latihan 54

1.Buat form baru seperti gambar dibawah ini,

2. Ketikkan nama form latihan_54_xxxxx, lalu klik add

3. Buat form seperti gambar di bawah ini:

4. Setelah itu input script berikut ini :

Public Class latihan_54_46110004


    Private Sub view_46110004_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles view_46110004.Click
        Dim laporan As New CrystalDecisions.CrystalReports.Engine.ReportDocument
        laporan = New latihan_45_46110004

        latihan_53_46110004.CrystalReportViewer1.ReportSource = laporan

        If latihan_53_46110004.Visible = False Then
            latihan_53_46110004.Show()
        Else
            latihan_53_46110004.Activate()
        End If

    End Sub
End Class

5. Jalankan program dengan cara klik kanan pada project, lalu pilih properties, kemudian akan muncul tampilan seperti gambar dibawah ini: