Deskripsi latihan_55_36110036
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_36110036 di dalam latihan_53_36110036.
C.
Script Unique
Untuk
script unique dapat dilihat pada Langkah-langkah mengerjakan latihan_55_36110036.
D.
Even
view_36110036_Click
Langkah-langkah mengerjakan latihan_55_36110036
1.
Buka project yang telah dibuat, dan
buka solution explorer
2.
Klik
kanan nama project ==> add ==> new item
3.
Klik New Item, setelah terbuka pilih windows form dan ketik nama form lalu klik Add
4. Kemudian klik file
tersebut, maka akan terbuka jendela
pekerjaan dari Ms. Visual Studio.
5. Kemudian buat form seperti dibawah ini:
6. Setelah
design form
selesai dibuatlah rumusnya,
Berikut adalah rumus untuk
menjalankan latihan_55_36110036.
Public Class
Latihan_55_36110036
Private Sub
view_36110036_Click(ByVal sender As System.Object, ByVal
e As System.EventArgs) Handles
view_36110036.Click
Dim Laporan As New
CrystalDecisions.CrystalReports.Engine.ReportDocument
'mengatur lokasi dan nama database laporan
Dim anna As New ByIskandar.MengaturDataBaseCrystalReport
Laporan =
anna.AturDatabase(New latihan_45_36110036,
Application.StartupPath, "data
report.accdb")
latihan_53_36110036.crv_36110036.ReportSource = Laporan
'Menampilkan form
If latihan_53_36110036.Visible = False Then
latihan_53_36110036.Show()
Else
latihan_53_36110036.Activate()
End If
End Sub
End Class
7. Setelah rumus selesai, program dijalankan dengan menggunakan
start debugging
8. Setelah program jalan maka
file disave.




Tidak ada komentar:
Posting Komentar