zoukankan      html  css  js  c++  java
  • FarPoint Spread如何像EXCEL一样显示单元格的批注

    EXCEL如果对一个单元格进行了批注后,点击单元格时,会自动显示批注信息!

    对于FarPoint Spread控件也可以实现类似的功能,需要结合控件的EnterCell,LeaveCell两个事件!EnterCell是单元格具有焦点时,LeavelCell是单元格失去焦点时引发的事件

    代码如下:

    ''' <summary>
    ''' 单元格有焦点时
    ''' </summary>
    ''' <param name="sender"></param>
    ''' <param name="e"></param>
    ''' <remarks></remarks>
    Private Sub FpSpread1_EnterCell(ByVal sender As Object, ByVal e As FarPoint.Win.Spread.EnterCellEventArgs) Handles FpSpread1.EnterCell
        If Not Me.FpSpread1.ActiveSheet.Cells(e.Row, e.Column).Note Is Nothing _
            And Me.FpSpread1.ActiveSheet.Cells(e.Row, e.Column).Note.Length > 0 Then
            Me.FpSpread1.ActiveSheet.Cells(e.Row, e.Column).NoteStyle = FarPoint.Win.Spread.NoteStyle.StickyNote
        End If
    End Sub
    ''' <summary>
    ''' 单元格失去焦点时
    ''' </summary>
    ''' <param name="sender"></param>
    ''' <param name="e"></param>
    ''' <remarks></remarks>
    Private Sub FpSpread1_LeaveCell(ByVal sender As Object, ByVal e As FarPoint.Win.Spread.LeaveCellEventArgs) Handles FpSpread1.LeaveCell
        If Not Me.FpSpread1.ActiveSheet.Cells(e.Row, e.Column).Note Is Nothing _
                    And Me.FpSpread1.ActiveSheet.Cells(e.Row, e.Column).Note.Length > 0 Then
            Me.FpSpread1.ActiveSheet.Cells(e.Row, e.Column).NoteStyle = FarPoint.Win.Spread.NoteStyle.PopupNote
        End If
    End Sub

  • 相关阅读:
    提交上了,却在iTunes Connect没有新版本的任何消息
    真机调试 —— An unknown error occurred.
    UI第二节——UIButton详解
    UI第一节—— UILable
    OC第九节——协议与代理
    补10月26日
    我看互联网第一约战
    接受自己的不完美---写在毕业之后的总结
    写给自己的学习之道
    越过山丘
  • 原文地址:https://www.cnblogs.com/zqonline/p/1359829.html
Copyright © 2011-2022 走看看