VB.NET พอจะมีวิธีแก้ Crytal Report ค้างสถานะเปิดอยู๋มั้ยคับ

Dim rptpath As String = "E:\Report\RptBindetail.rpt"
        Dim selectFM As String = String.Empty
        selectFM = ""

        myReport.Close()
        myReport.Load(rptpath, OpenReportMethod.OpenReportByTempCopy)
        If Not cystalview.ReportSource Is Nothing Then
            cystalview.ReportSource.close()
            ' cystalview.ReportSource.dispose() ใช้ไม่ได้
            cystalview.ReportSource = Nothing

        End If

        cystalview.ReportSource = myReport
        myReport.DataDefinition.FormulaFields("TMP_DATE").Text = "'" & SFReport.prdate & "'"
        myReport.DataDefinition.FormulaFields("TMP_ST").Text = "'" & SFReport.prst & "'"
        Me.cystalview.SelectionFormula = selectFM
        Me.cystalview.RefreshReport()