' フィルタが変更されたときに発生します
Private Sub C1TrueDBGrid1_FilterChange(ByVal sender As Object, ByVal e As System.EventArgs) Handles C1TrueDBGrid1.FilterChange
  ' フィルタ式を構築します
  Dim sb As New System.Text.StringBuilder()
  
  Dim dc As C1.Win.C1TrueDBGrid.C1DisplayColumn
  
  For Each dc In Me.C1TrueDBGrid1.Splits(0).DisplayColumns
    ' 列のフィルタ式を取得します
    Dim cond As String = dc.GetFilterExpression()
    If cond <> "" Then
      If sb.ToString() <> "" Then
        sb.Append(" AND ")
      End If
      sb.Append(cond)
    End If
  Next dc
  
  ' データをフィルタ処理します
  Me.DataSet11.Tables(0).DefaultView.RowFilter = sb.ToString()
End Sub