Kamis, 12 Januari 2012

Latihan 56 APKOM 4 D4A

Submit Here
Diposting oleh di

33 komentar:

  1. Dwitya Saadah Suaib14 Januari 2012 pukul 18.19

    Public Class Latihan056_46109001


    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Dim laporan As New CrystalDecisions.CrystalReports.Engine.ReportDocument
    laporan = New Latihan_045_46109001
    Latihan_053_46109001.honda.SelectionFormula = "{barang.kodebarang}='" & wiwi46109001.Text & "'"

    Latihan_053_46109001.honda.ReportSource = laporan
    If Latihan_053_46109001.Visible = False Then
    Latihan_053_46109001.Show()
    Latihan_053_46109001.Activate()

    End If
    End Sub
    End Class

    BalasHapus
  2. ainun16 Januari 2012 pukul 04.56

    Public Class LATIHAN_056_46109030


    Private Sub p_4610903_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles p_4610903.Click
    Dim laporan As New CrystalDecisions.CrystalReports.Engine.ReportDocument
    laporan = New Latihan_045_46109030
    Latihan_053_46109030.Honda.SelectionFormula = "{barang.kodebarang}='" & ainun46109001.Text & "'"

    Latihan_053_46109030.Honda.ReportSource = laporan
    If Latihan_053_46109030.Visible = False Then
    Latihan_053_46109030.Show()
    Latihan_053_46109030.Activate()
    End If

    End Sub
    End Class

    BalasHapus
  3. Anonim16 Januari 2012 pukul 05.57

    Public Class LATIHAN056_46109027


    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Dim laporan As New CrystalDecisions.CrystalReports.Engine.ReportDocument
    laporan = New LATIHAN045_46109027
    LATIHAN053_46109027.honda.SelectionFormula = "{barang.kodebarang}='" & FEBY46109027.Text & "'"

    LATIHAN053_46109027.honda.ReportSource = laporan
    If LATIHAN053_46109027.Visible = False Then
    LATIHAN053_46109027.Show()
    LATIHAN053_46109027.Activate()

    End If
    End Sub
    End Class

    BalasHapus
  4. Unknown17 Januari 2012 pukul 04.18

    http://ismisriwahyuni.blogspot.com/2012/01/latihan-56-public-class.html

    BalasHapus
  5. Hachiko_dede17 Januari 2012 pukul 06.33

    Public Class LATIHAN056_46109045


    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Dim laporan As New CrystalDecisions.CrystalReports.Engine.ReportDocument
    laporan = New LATIHAN045_46109045
    LATIHAN053_46109045.honda.SelectionFormula = "{barang.kodebarang}='" & CHIKO46109045.Text & "'"

    LATIHAN053_46109045.honda.ReportSource = laporan
    If LATIHAN053_46109045.Visible = False Then
    LATIHAN053_46109045.Show()
    LATIHAN053_46109045.Activate()

    End If
    End Sub
    End Class

    BalasHapus
  6. ayu wandika putri utami21 Januari 2012 pukul 03.55

    Public Class Latihan056_46109017


    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Dim laporan As New CrystalDecisions.CrystalReports.Engine.ReportDocument
    laporan = New Latihan_045_46109017
    Latihan_053_46109017.honda.SelectionFormula = "{barang.kodebarang}='" & ayu46109017.Text & "'"

    Latihan_053_46109017.honda.ReportSource = laporan
    If Latihan_053_46109017.Visible = False Then
    Latihan_053_46109017.Show()
    Latihan_053_46109017.Activate()

    End If
    End Sub
    End Class

    BalasHapus
  7. WAHDANIAH3 Februari 2012 pukul 16.12

    Public Class Latihan056_46109051


    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Dim laporan As New CrystalDecisions.CrystalReports.Engine.ReportDocument
    laporan = New Latihan045_46109051
    Latihan053_46109051.honda.SelectionFormula = "{barang.kodebarang}='" & cantik46109051.Text & "'"

    Latihan053_46109051.honda.ReportSource = laporan
    If Latihan053_46109051.Visible = False Then
    Latihan053_46109051.Show()
    Latihan053_46109051.Activate()

    End If
    End Sub
    End Class

    BalasHapus
  8. ARUL BLOG3 Februari 2012 pukul 18.50

    Komentar ini telah dihapus oleh pengarang.

    BalasHapus
  9. Joice Natalina Paginta3 Februari 2012 pukul 19.54

    Public Class Latihan056_46109041


    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Dim laporan As New CrystalDecisions.CrystalReports.Engine.ReportDocument
    laporan = New Latihan_045_46109041
    Latihan_053_46109041.honda.SelectionFormula = "{barang.kodebarang}='" & joice46109001.Text & "'"

    Latihan_053_46109041.honda.ReportSource = laporan
    If Latihan_053_46109041.Visible = False Then
    Latihan_053_46109041.Show()
    Latihan_053_46109041.Activate()

    End If
    End Sub
    End Class

    BalasHapus
  10. 4610903413 Februari 2012 pukul 22.33

    Aryandira

    Public Class Form056_46109034
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Dim laporan As New CrystalDecisions.CrystalReports.Engine.ReportDocument
    laporan = New Form045_46109034
    Form_053_46109034.honda.SelectionFormula = "{barang.kodebarang}='" & Dira46109034.Text & "'"

    Form_053_46109034.honda.ReportSource = laporan
    If Form_053_46109034.Visible = False Then
    Form_053_46109034.Show()
    Form_053_46109034.Activate()

    End If
    End Sub
    End Class

    BalasHapus
  11. Unknown27 November 2012 pukul 04.50

    http://www.wahyunirachman.blogspot.com/2012/11/latihan5646110020.html

    BalasHapus
  12. Unknown27 November 2012 pukul 06.02

    http://srikartikafanty.blogspot.com/2012/11/latihan5646110007.html

    BalasHapus
  13. Unknown14 Desember 2012 pukul 06.31

    http://sulhihusni.blogspot.com/2012/12/latihan5646110004.html

    BalasHapus
  14. Unknown15 Desember 2012 pukul 16.47

    http://idhamsyaam.blogspot.com/2012/12/latihan5646110021.html

    BalasHapus
  15. Unknown17 Desember 2012 pukul 15.31

    http://restyaccounting.blogspot.com/2012/12/latihan5646110027.html

    BalasHapus
  16. Unknown25 Desember 2012 pukul 00.11

    http://cacalisa.blogspot.com/2012/12/latihan5646110038.html

    BalasHapus
  17. Unknown25 Desember 2012 pukul 04.59

    http://hanihasan07.blogspot.com/2012/12/latihan5646110044.html

    BalasHapus
  18. Dunia Ilmu27 Desember 2012 pukul 23.39

    http://mulyawarman039.blogspot.com/2012/12/latihan5646110039.html

    BalasHapus
  19. Unknown31 Desember 2012 pukul 01.30

    http://dianmegariski.blogspot.com/2012/12/latihan5646110023.html

    BalasHapus
  20. Unknown2 Januari 2013 pukul 18.09

    http://muthmil8.blogspot.com/2012/12/latihan5646110037.html

    BalasHapus
  21. Unknown3 Januari 2013 pukul 08.47

    http://masdarwati.blogspot.com/2013/01/latihan5646110024.html

    BalasHapus
  22. Unknown5 Januari 2013 pukul 03.56

    http://bahrizj.blogspot.com/2013/01/latihan5646110001.html

    BalasHapus
  23. ildayani5 Januari 2013 pukul 04.38

    http://ildayani.blogspot.com/2012/11/latihan5646110002.html

    BalasHapus
  24. Unknown6 Januari 2013 pukul 02.27

    http://amalmaulana92.blogspot.com/2013/01/latihan5646110003.html

    BalasHapus
  25. Unknown6 Januari 2013 pukul 07.32

    http://aardianzah2.blogspot.com/2013/01/latihan-56.html

    BalasHapus
  26. Feiby Frycilia18 Januari 2013 pukul 07.02

    http://feibyfrycilia.blogspot.com/2013/01/latihan5646110055.html

    BalasHapus
  27. Unknown22 Januari 2013 pukul 06.27

    http://bothbon.blogspot.com/2013/01/laihan5646110043.html

    BalasHapus
  28. Unknown22 Januari 2013 pukul 22.52

    http://fitrianihamka.blogspot.com/2013/01/latihan5646110006.html

    BalasHapus
  29. Unknown23 Januari 2013 pukul 22.01

    http://rafidashaleh.blogspot.com/2013/01/latihan5646110041.html

    BalasHapus
  30. Unknown27 Januari 2013 pukul 00.17

    http://diyanahdina.blogspot.com/2013/01/latihan5646110045.html

    BalasHapus
  31. Unknown28 Januari 2013 pukul 07.55

    http://deodns.blogspot.com/#!/2013/01/latihan5646110040.html

    BalasHapus
  32. Unknown29 Januari 2013 pukul 05.35

    http://alfaega.blogspot.com/2013/01/latihan5646110022.html

    BalasHapus
  33. Unknown29 Januari 2013 pukul 15.03

    http://yuliaasrida427.blogspot.com/2013/01/latihan5646110009.html

    BalasHapus

Langganan: Posting Komentar (Atom)