Dim Report As New CrystalReport3

Private Sub Form_Load()
    set Report = New CrystalReport3
    Screen.MousePointer = vbHourglass
    CRViewer1.ReportSource = Report
    CRViewer1.ViewReport
    Screen.MousePointer = vbDefault
End Sub

Rudi Hartono

  ----- Original Message ----- 
  From: iwan gunawan 
  To: indoprog...@yahoogroups.com ; programmer-VB@yahoogroups.com 
  Sent: Monday, August 11, 2008 1:32 PM
  Subject: [Programmer-VB] Refresh cr



  Guys, tolongin gw donk, gimana caranya kalo crviewer1 bisa langsung refresh 
tanpa hrs tekan tanda petir di cristal reportnya.
  Shre donk elmunya, thanks b4.
  di bawah ini potongan kodingnya, tambahain yah.

  Dim Report As New CrystalReport3

  Private Sub Form_Load()
      Screen.MousePointer = vbHourglass
      CRViewer1.ReportSource = Report
      CRViewer1.ViewReport
      Screen.MousePointer = vbDefault
  End Sub

  Private Sub Form_Resize()
      CRViewer1.Top = 1200
      CRViewer1.Left = 0
      CRViewer1.Height = ScaleHeight
      CRViewer1.Width = ScaleWidth
  End Sub




   

Kirim email ke