Public Event StickyNoteCreated As StickyNoteEventHandler

Dim instance As SheetView
Dim handler As StickyNoteEventHandler
 
AddHandler instance.StickyNoteCreated, handler

public event StickyNoteEventHandler StickyNoteCreated

private void Form1_Load(object sender, System.EventArgs e)
{
    fpSpread1.ActiveSheet.SetNote(2, 0, "Head of Development");
    fpSpread1.ActiveSheet.Cells[2, 0].NoteStyle = FarPoint.Win.Spread.NoteStyle.StickyNote;
    FarPoint.Win.Spread.DrawingSpace.StickyNoteStyleInfo nsinfo = new FarPoint.Win.Spread.DrawingSpace.StickyNoteStyleInfo();
    nsinfo = fpSpread1.ActiveSheet.GetStickyNoteStyleInfo(2, 0);
    nsinfo.BackColor = Color.Bisque;
    nsinfo.Font = new Font("Tahoma", 24);
    nsinfo.ForeColor = Color.Cyan;
    nsinfo.Width = 320;
    nsinfo.ShapeOutlineColor = Color.Cyan;
    nsinfo.ShapeOutlineThickness = 1;
    nsinfo.ShadowOffsetX = 3;
    nsinfo.ShadowOffsetY = 3;
    fpSpread1.ActiveSheet.SetStickyNoteStyleInfo(2, 0, nsinfo);
}
 
private void fpSpread1_Sheet1_StickyNoteCreated(object sender, FarPoint.Win.Spread.StickyNoteEventArgs e)
{
    MessageBox.Show("The thickness of the outline is " + e.StickyNoteStyleInfo.ShapeOutlineThickness.ToString());
}

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    FpSpread1.ActiveSheet.SetNote(2, 0, "Head of Development")
    FpSpread1.ActiveSheet.Cells(2, 0).NoteStyle = FarPoint.Win.Spread.NoteStyle.StickyNote
    Dim nsinfo As FarPoint.Win.Spread.DrawingSpace.StickyNoteStyleInfo = New FarPoint.Win.Spread.DrawingSpace.StickyNoteStyleInfo
    nsinfo = FpSpread1.ActiveSheet.GetStickyNoteStyleInfo(2, 0)
    nsinfo.BackColor = Color.Bisque
    nsinfo.Font = New Font("Tahoma", 24)
    nsinfo.ForeColor = Color.Cyan
    nsinfo.Width = 320
    nsinfo.ShapeOutlineColor = Color.Cyan
    nsinfo.ShapeOutlineThickness = 1
    nsinfo.ShadowOffsetX = 3
    nsinfo.ShadowOffsetY = 3
    FpSpread1.ActiveSheet.SetStickyNoteStyleInfo(2, 0, nsinfo)
End Sub

Private Sub FpSpread1_Sheet1_StickyNoteCreated(ByVal sender As Object, ByVal e As FarPoint.Win.Spread.StickyNoteEventArgs) Handles FpSpread1_Sheet1.StickyNoteCreated
    MessageBox.Show("The thickness of the outline is " & e.StickyNoteStyleInfo.ShapeOutlineThickness.ToString())
End Sub