FarPoint.Win.SpreadJ アセンブリ > FarPoint.Win.Spread 名前空間 > SheetView クラス > ClearRowFilter メソッド : ClearRowFilter() メソッド |
'Declaration Public Overloads Sub ClearRowFilter()
'使用法 Dim instance As SheetView instance.ClearRowFilter()
public void ClearRowFilter()
FarPoint.Win.Spread.FilterColumnDefinition fcd = new FarPoint.Win.Spread.FilterColumnDefinition(1, FarPoint.Win.Spread.FilterListBehavior.Default); 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.Gray; FarPoint.Win.Spread.StyleRowFilter rf = new FarPoint.Win.Spread.StyleRowFilter(fpSpread1.ActiveSheet, instyle, outstyle); rf.AddColumn(fcd); fpSpread1.ActiveSheet.RowFilter = rf; if (rf != null) { DialogResult dlg; dlg = MessageBox.Show("Reset the filter??"); if (dlg == DialogResult.OK) { fpSpread1.ActiveSheet.ClearRowFilter(); } }
Dim fcd As New FarPoint.Win.Spread.FilterColumnDefinition(1, FarPoint.Win.Spread.FilterListBehavior.Default) Dim instyle As New FarPoint.Win.Spread.NamedStyle Dim outstyle As New FarPoint.Win.Spread.NamedStyle instyle.BackColor = Color.Yellow outstyle.BackColor = Color.Gray Dim rf As New FarPoint.Win.Spread.StyleRowFilter(FpSpread1.ActiveSheet, instyle, outstyle) rf.AddColumn(fcd) FpSpread1.ActiveSheet.RowFilter = rf If Not rf Is Nothing Then Dim dlg As DialogResult dlg = MessageBox.Show("Reset the filter??") If dlg = DialogResult.OK Then FpSpread1.ActiveSheet.ClearRowFilter() End If End If