vb farpoint 获取选中的多行和多列

要获取 FarPoint Spread 控件中选中的多行和多列，你可以使用 `SelectionPolicy` 属性来设置选中策略，并通过 `SelectionModel` 属性来获取选中的行和列。下面是一个示例代码，可以获取控件中选中的多行和多列：

Private Sub GetSelectedRowsAndCols()
    Dim i As Integer
    Dim iRow As Integer
    Dim iCol As Integer
    Dim sRows As String
    Dim sCols As String
    
    '设置选中策略为行选择和列选择
    FpSpread1.ActiveSheet.SelectionPolicy = FarPoint.Win.Spread.Model.SelectionPolicy.MultiRange
    
    '获取选中的行和列
    For i = 0 To FpSpread1.ActiveSheet.SelectionModel.RowCount - 1
        iRow = FpSpread1.ActiveSheet.SelectionModel.GetRow(i)
        iCol = FpSpread1.ActiveSheet.SelectionModel.GetColumn(i)
        
        '将选中的行和列添加到字符串中
        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 控件的名称。在示例代码中，我们将选中策略设置为行选择和列选择，这样就可以选中多行和多列。然后，我们通过 `SelectionModel` 属性获取选中的行和列，并将它们添加到字符串中。最后，我们输出选中的行和列。你可以根据需要修改代码来适应你的应用场景。