grazie mille pero ho aggiutno solo quella riga di comando xche mi serviva solo quella ma mi dice che asseganzione alla costante non ammessa xche?
ti scrivo il mio codice che richiama il crystal report:
Dim Report As New CrystalReport1
Private Sub Form_Load()
Report.DiscardSavedData = True
Screen.MousePointer = vbHourglass
CRViewer1.ReportSource = Report
CRViewer1.ViewReport
Screen.MousePointer = vbDefault
End Sub
Private Sub Form_Resize()
CRViewer1.Top = 0
CRViewer1.Left = 0
CRViewer1.Height = ScaleHeight
CRViewer1.Width = ScaleWidth
End Sub

Rispondi quotando