FarPoint.Win.SpreadJ アセンブリ > FarPoint.Win.Spread 名前空間 > PrintHeaderFooterAreaEventArgs クラス : Cells プロパティ |
'Declaration Public ReadOnly Property Cells As CellRange
'使用法 Dim instance As PrintHeaderFooterAreaEventArgs Dim value As CellRange value = instance.Cells
public CellRange Cells {get;}
private void fpSpread1_PrintHeaderFooterArea(object sender, FarPoint.Win.Spread.PrintHeaderFooterAreaEventArgs e) { FarPoint.Win.Spread.Model.CellRange cr = e.Cells; if (e.IsHeader) { e.Graphics.DrawString("Quarterly Report For " + cr.Column + " - " + cr.Row, new Font("Comic Sans MS", 8.5), Brushes.Black, e.Rectangle.X, e.Rectangle.Y); } else { e.Graphics.DrawString("FarPoint Technologies Page# " + e.PageNumber, new Font("Comic Sans MS", 8.5), Brushes.Black, e.Rectangle.X, e.Rectangle.Y); } }
Private Sub FpSpread1_PrintHeaderFooterArea(ByVal sender As Object, ByVal e As FarPoint.Win.Spread.PrintHeaderFooterAreaEventArgs) Handles FpSpread1.PrintHeaderFooterArea Dim cr As FarPoint.Win.Spread.Model.CellRange = e.Cells If e.IsHeader Then e.Graphics.DrawString("Quarterly Report For " & cr.Column & " - " & cr.Row, New Font("Comic Sans MS", 8.5), Brushes.Black, e.Rectangle.X, e.Rectangle.Y) Else e.Graphics.DrawString("FarPoint Technologies Page# " & e.PageNumber, New Font("Comic Sans MS", 8.5), Brushes.Black, e.Rectangle.X, e.Rectangle.Y) End If End Sub