With Me.ReportViewer1 '初始化报表
你所需要的网站建设服务，我们均能行业靠前的水平为你提供.标准是产品质量的保证，主要从事网站制作、成都网站制作、企业网站建设、移动网站建设、网页设计、品牌网站设计、网页制作、做网站、建网站。创新互联建站拥有实力坚强的技术研发团队及素养的视觉设计专才。
.Dock = DockStyle.Fill
.LocalReport.DataSources.Clear()
.LocalReport.ReportPath = "Report1.rdlc"
.RefreshReport()
End With
报表在设计时，不一定要绑定数据源，但在窗体加载时，需要初始化报表控件，以上代码可以放在窗体加载的Load事件里，供你参考。
Visualbasic代码编辑器没有这个功能，但可以用第三方的编辑软件Emedit来实现这个功能。
1、用Emedit打开*.frm文件。
2、点工具，当前配置属性，然后勾选显示行号即可。
CrystalReportViewer
dataset 定义数据源
.rpt 文件描述具体报表样式
再加一个调用报表的FORM，就可以实现简单的报表功能
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
你的数据库是出于什么模式运行，是专用模式还是共享模式呢，如果是共享模式的话可能是你的会话数达到上限，执行命令查看show
parameter
process；再查看select
county（*）
from
v$process;
比较一下这两个数值是否超过进程上限，如果要查看你的数据库是否出于共享模式还是专用模式可以执行如下语句select
distinct
server
from
v$session;如果值全是ditected
则为专用模式，如果有shared则为共享模式，共享模式经常会导致楼主这样的问题，导致会话数达到上限，资源部够用的情况
不过，个人感觉的话，报表出错太频繁会影响工作效率，你要是经常出现这类状况的话还是考虑换一下finereport，后者的出错率不会有这么高
