Public Class XtraReport3
    Private Sub GroupHeaderBand3_BeforePrint(sender As Object, e As Printing.PrintEventArgs) Handles GroupHeaderBand3.BeforePrint, Detail.BeforePrint, GroupHeaderBand1.BeforePrint
        Dim oGroupType As String = GetCurrentColumnValue("GroupType")
        Dim oGroupTypeID As Integer = GetCurrentColumnValue("GroupTypeID")
        If oGroupType = "HEAD" Then
            e.Cancel = True
        End If
    End Sub
End Class