vb.net调用fastreport问题

m_frxReport = New FastReport.TfrxReportClass
m_frxReport.PrintOptions.ShowDialog = False
m_frxDataTable = New AgricultureESA.Report.FrxDataTable("Table")

If Not Dir(Me.m_PrintFileName) = "" Then
m_frxReport.LoadReportFromFile(Me.m_PrintFileName)
End If
Dim printCharge As DataSet = AgricultureESA.Data.InCharge.indoor(Me.DB_Oper, inChargeNum)
If Not printCharge Is Nothing Then
Try
m_printTable = printCharge.Tables(0) 'datatable
'AgricultureESA.Report.FrxDataTable
m_frxDataTable = New AgricultureESA.Report.FrxDataTable(m_printTable)
m_frxDataTable.AssignToReport(True, Me.m_frxReport)

'TfrxReportClass
m_frxReport.PrepareReport(True)
m_frxReport.PrintOptions.ShowDialog = False
m_frxReport.PrintReport()
Catch ex As Exception
MessageBox.Show("加载报表文件出错！" + ex.Message)
endTry

现在的问题是每次打印后内存都上涨，打印多了之后内存就不能Read了，产生了Bug，我想是有什么资源没有释放，有没有高人指导一下，怎么释放资源，或者我的思路和代码就是不对的，请指点。