Sub grpLaborSummaryHeader_Format If Not isBindLaborTypeSubReport Then ReportUtilities.BindSubReport(rpt, "grpLaborSummaryHeader", "laborTypeSubReport") isBindLaborTypeSubReport = True Else ReportUtilities.UnbindSubReport(rpt, "grpLaborSummaryHeader", "laborTypeSubReport") End If End Sub