- Dim cb As New FarPoint.Win.Spread.CellType.ComboBoxCellType()
- FpSpread1.ActiveSheet.Cells(0, 0).CellType = cb
- Private Sub FpSpread1_ComboCloseUp(ByVal sender As Object, ByVal e As FarPoint.Win.Spread.EditorNotifyEventArgs) Handles FpSpread1.ComboCloseUp
- ListBox1.Items.Add("ComboCloseUp event fired")
- End Sub
- Private Sub FpSpread1_ComboDropDown(ByVal sender As Object, ByVal e As FarPoint.Win.Spread.EditorNotifyEventArgs) Handles
- FpSpread1.ComboDropDown
- ListBox1.Items.Add("ComboDropDown event fired")
- End Sub
- Private Sub FpSpread1_ComboSelChange(ByVal sender As Object, ByVal e As FarPoint.Win.Spread.EditorNotifyEventArgs) Handles
- FpSpread1.ComboSelChange
- ListBox1.Items.Add("ComboSelChange event fired")
- End Sub
复制代码 |