vb.net报表工具 vba报表系统( 三 )


dim Report as New Cystal1
Private Sub Form_Load()
 Screen.MousePointer = vbHourglass
 '调用水晶报表时置鼠标为沙漏状 CRViewer91.ReportSource = Report '该语句的赋值将在后面被修改
 CRViewer91.ViewReport
 Screen.MousePointer = vbDefault '调用水晶报表完成后置鼠标为默认形状
End Sub
Private Sub Form_Resize()
 CRViewer91.Top = 0
 CRViewer91.Left = 0
 CRViewer91.Height = ScaleHeight
 CRViewer91.Width = ScaleWidth
End Sub
关于vb.net报表工具和vba报表系统的介绍到此就结束了,不知道你从中找到你需要的信息了吗 ?如果你还想了解更多这方面的信息,记得收藏关注本站 。

推荐阅读