回复 5楼恶马Maximus的帖子
VB 代码:
- Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
- Dim ck As New FarPoint.Win.Spread.CellType.CheckBoxCellType
- AddHandler ck.EditorValueChanged, AddressOf fpCheckBox_CheckStateChanged
- Me.FpSpread1.Sheets(0).Columns(0).CellType = ck
- End Sub
- Private Sub fpCheckBox_CheckStateChanged(sender As Object, e As EventArgs)
- End Sub
复制代码 |