请问：如何在MSHFlexGrid中得到选中的一个区域内的所有单元格的row,col的值？

Question

Dim intStartRow, intEndRow As Integer
Dim intStartCol, intEndCol As Integer
If mshflexgrid1.RowSel <= mshflexgrid1.Row Then
        intStartRow = mshflexgrid1.RowSel
        intEndRow = mshflexgrid1.Row
    Else
        intStartRow = mshflexgrid1.Row
        intEndRow = mshflexgrid1.RowSel
End If
If mshflexgrid1.ColSel <= mshflexgrid1.ColThen
        intStartCol = mshflexgrid1.ColSel
        intEndCol = mshflexgrid1.Col
    Else
        intStartCol = mshflexgrid1.Col
        intEndCol = mshflexgrid1.ColSel
End If
接下来就比较容易了，你要的cell就在(intStartRow,intStartCol)-(intEndRow,intEndCol)之间了