13518219792
Visualbasic代码编辑器没有这个功能，但可以用第三方的编辑软件Emedit来实现这个功能。
按需策划设计可以根据自己的需求进行定制，做网站、成都网站设计构思过程中功能建设理应排到主要部位公司做网站、成都网站设计的运用实际效果公司网站制作网站建立与制做的实际意义
1、用Emedit打开*.frm文件。
2、点工具，当前配置属性，然后勾选显示行号即可。
With Me.ReportViewer1 '初始化报表
.Dock = DockStyle.Fill
.LocalReport.DataSources.Clear()
.LocalReport.ReportPath = "Report1.rdlc"
.RefreshReport()
End With
报表在设计时，不一定要绑定数据源，但在窗体加载时，需要初始化报表控件，以上代码可以放在窗体加载的Load事件里，供你参考。
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
这样的效果用FineReport报表实现起来非常容易，只要在主报表的模板上，在需要放置子报表的单元格上右击选择“单元格元素|子报表”即插入了子报表，然后绑定子报表所需的数据源，实现让子报表的内容显示在主报表上，然后将整个cpt文件插入vb.net中。
你的数据库是出于什么模式运行，是专用模式还是共享模式呢，如果是共享模式的话可能是你的会话数达到上限，执行命令查看show
parameter
process；再查看select
county（*）
from
v$process;
比较一下这两个数值是否超过进程上限，如果要查看你的数据库是否出于共享模式还是专用模式可以执行如下语句select
distinct
server
from
v$session;如果值全是ditected
则为专用模式，如果有shared则为共享模式，共享模式经常会导致楼主这样的问题，导致会话数达到上限，资源部够用的情况
不过，个人感觉的话，报表出错太频繁会影响工作效率，你要是经常出现这类状况的话还是考虑换一下finereport，后者的出错率不会有这么高
