FpSpread控件像excel那样选定几个单元格的数字,下面求和!
FpSpread控件像excel那样选定几个单元格的数字,下面求和!
如何能实现?
[解决办法]
- VB code
Private Sub oSpr_BlockSelected(ByVal BlockCol As Long, ByVal BlockRow As Long, ByVal BlockCol2 As Long, ByVal BlockRow2 As Long) Dim lngRow As Long Dim lngSum As Long lngSum = 0 For lngRow = BlockRow To BlockRow2 oSpr.Row = lngRow oSpr.Col = 3 lngSum = lngSum + Val(oSpr.Text) Next lngRow oLblSelectSum = Format(lngSum, "#,##0") End Sub