Private Sub Form_Load()
Screen.MousePointer = vbHourglass
CRViewer91.ReportSource = Report
CRViewer91.ViewReport
Screen.MousePointer = vbDefault
End Sub
...全文
901打赏收藏
数据更新后,水晶报表不更新的问题?
数据更新后,可是水晶报表中的数据还是原来的数据呀? Private Sub Form_Load() Screen.MousePointer = vbHourglass CRViewer91.ReportSource = Report CRViewer91.ViewReport Screen.MousePointer = vbDefault End Sub