Public Event Changed As CollectionChangeEventHandler

Dim instance As FilterColumnDefinitionCollection
Dim handler As CollectionChangeEventHandler
 
AddHandler instance.Changed, handler

public event CollectionChangeEventHandler Changed

FarPoint.Win.Spread.FilterColumnDefinitionCollection fcdc;
this.fcdc = new FarPoint.Win.Spread.FilterColumnDefinitionCollection();
 
FarPoint.Win.Spread.NamedStyle instyle = new FarPoint.Win.Spread.NamedStyle();
FarPoint.Win.Spread.NamedStyle outstyle = new FarPoint.Win.Spread.NamedStyle();
instyle.BackColor = Color.Yellow;
outstyle.BackColor = Color.Aquamarine;
FarPoint.Win.Spread.FilterColumnDefinition fcd = new FarPoint.Win.Spread.FilterColumnDefinition(1, FarPoint.Win.Spread.FilterListBehavior.SortByMostOccurrences |  
FarPoint.Win.Spread.FilterListBehavior.Default);
FarPoint.Win.Spread.FilterColumnDefinition fcd1 = new FarPoint.Win.Spread.FilterColumnDefinition(2, FarPoint.Win.Spread.FilterListBehavior.Default);
FarPoint.Win.Spread.FilterColumnDefinition fcd2 = new FarPoint.Win.Spread.FilterColumnDefinition(3);
fcdc.Insert(0, fcd);
fcdc.Insert(1, fcd1);
fcdc.Insert(2, fcd2);
FarPoint.Win.Spread.StyleRowFilter sf = new FarPoint.Win.Spread.StyleRowFilter(fpSpread1.ActiveSheet, instyle, outstyle);
foreach(FarPoint.Win.Spread.FilterColumnDefinition x in fcdc)
{
      sf.AddColumn(x);
}
fpSpread1.ActiveSheet.RowFilter = sf;

fcdc.Changed += new System.ComponentModel.CollectionChangeEventHandler(fcdcChanged);

private void fcdcChanged(object sender, System.ComponentModel.CollectionChangeEventArgs e)
{
      MessageBox.Show("The collection has changed.");
}

Friend WithEvents fcdc As New FarPoint.Win.Spread.FilterColumnDefinitionCollection

Dim instyle As New FarPoint.Win.Spread.NamedStyle
Dim outstyle As New FarPoint.Win.Spread.NamedStyle
instyle.BackColor = Color.Yellow
outstyle.BackColor = Color.Aquamarine

Dim fcd As New FarPoint.Win.Spread.FilterColumnDefinition(1, FarPoint.Win.Spread.FilterListBehavior.SortByMostOccurrences Or FarPoint.Win.Spread.FilterListBehavior.Default)
Dim fcd1 As New FarPoint.Win.Spread.FilterColumnDefinition(2, FarPoint.Win.Spread.FilterListBehavior.Default)
Dim fcd2 As New FarPoint.Win.Spread.FilterColumnDefinition(3)
fcdc.Insert(0, fcd)
fcdc.Insert(1, fcd1)
fcdc.Insert(2, fcd2)
Dim sf As New FarPoint.Win.Spread.StyleRowFilter(fpSpread1.ActiveSheet, instyle, outstyle)
Dim x As FarPoint.Win.Spread.FilterColumnDefinition
For Each x In fcdc
      sf.AddColumn(x)
Next
fpSpread1.ActiveSheet.RowFilter = sf

Private Sub fcdcChanged(ByVal sender As Object, ByVal e As System.ComponentModel.CollectionChangeEventArgs) Handles fcdc.Changed
      MessageBox.Show("The collection has changed.")
End Sub