VB中水晶报表使用.docVIP

VB中水晶报表使用 　第一步： 　　在VB工程中Project菜单加入Add Crystal Report 9，报表名使用默认即可。这时Form2（Crystal　Rerport自动添加的Form，假设名为Form2）被自动分配了如下代码： Option Explicit 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 　　第二步： 　　点击Crystal Report设计器的数据库字段，选定数据库专家...，然后点创建新连接，再点仅字段定义，创建数据库定义文件，字段名和宽度和原数据库表保持一致。最后，在数据库字段中获