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: [email protected] ; [email protected]
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
