Spread向左上角的单元格添加文本

下面的这段代码可以向左上角的单元格中添加文本。效果图如下：


[Visual Basic .NET Code]
Public Class SheetCorner 
Inherits FarPoint.Win.Spread.CellType.GeneralCellType 

    Public Overrides Sub PaintCell(ByVal g As System.Drawing.Graphics, ByVal r As System.Drawing.Rectangle, ByVal appearance As FarPoint.Win.Spread.Appearance, ByVal value As Object, ByVal isSelected As Boolean, ByVal isLocked As Boolean, ByVal zoomFactor As Single) 
        MyBase.PaintCell(g, r, appearance, "Text", isSelected, isLocked, zoomFactor) 
    End Sub 
End Class 

Dim sctextcell As New SheetCorner() 
FpSpread1.Sheets(0).SheetCornerStyle.CellType = sctextcell 


[C# Code] 
class CornerCell : FarPoint.Win.Spread.CellType.GeneralCellType
{
    public override void PaintCell(Graphics g, Rectangle r, FarPoint.Win.Spread.Appearance appearance, object value, bool isSelected, bool isLocked, float zoomFactor)
    {
        base.PaintCell(g, r, appearance, "Text", isSelected, isLocked, zoomFactor); 
    }
}

CornerCell sctextcell = new CornerCell();
fpSpread1.Sheets[0].SheetCornerStyle.CellType = sctextcell;