vb farpoint SelectionCount 如何获取选中的多行和多列

如果你的 FarPoint Spread 控件版本比较旧，没有 `SelectionModel` 和 `SelectionBlock` 属性，你可以使用 `SelectionCount` 属性来获取选中的多行和多列。下面是一个示例代码，可以获取控件中选中的多行和多列：

Private Sub GetSelectedRowsAndCols()
    Dim i As Integer
    Dim iRow As Integer
    Dim iCol As Integer
    Dim sRows As String
    Dim sCols As String
    
    '获取选中的行和列
    For i = 0 To FpSpread1.ActiveSheet.SelectionCount - 1
        iRow = FpSpread1.ActiveSheet.GetSelection(i).Row
        iCol = FpSpread1.ActiveSheet.GetSelection(i).Column
        
        '将选中的行和列添加到字符串中
        sRows = sRows & iRow & ","
        sCols = sCols & iCol & ","
    Next
    
    '去除最后一个逗号
    If Len(sRows) > 0 Then
        sRows = Left(sRows, Len(sRows) - 1)
    End If
    
    If Len(sCols) > 0 Then
        sCols = Left(sCols, Len(sCols) - 1)
    End If
    
    '输出结果
    MsgBox "选中的行为：" & sRows & vbCrLf & "选中的列为：" & sCols
End Sub

其中，`FpSpread1` 为你的 FarPoint Spread 控件的名称。在示例代码中，我们通过 `SelectionCount` 属性获取选中的行和列，并将它们添加到字符串中。最后，我们输出选中的行和列。你可以根据需要修改代码来适应你的应用场景。