高分求教：请问spread选择一行的问题。
spread的OperationMode的属性已经设置为RowMode（这个前提不能改变）,
这个时候在选择一行的时候，该行会反显，但是被选中的cell却没有反显，
请问，该如何让选中的cell也反显而能够使被选中的整行都反显，
（OperationMode选其他属性比如SingleSelect也可以达到这个目的，但是这个时候会有一些其他的弊端，比如在选中一行之后再选其他行的时候，会使滚动条里克会滚到最左边。想回避这样的情况的发生）
万分感谢。得到答案立即结贴！分不够可以再补 ^_^
问题点数：100、回复次数：3Top
1 楼freelycoder（乖乖火箭炮）回复于 2004-12-04 20:02:36 得分 0
没有人知道吗？自己顶一下。Top
2 楼earlsen（earlsen）回复于 2004-12-05 09:37:07 得分 100
直接得到当前行的ID后，然后再Select。不行啊？Top
3 楼freelycoder（乖乖火箭炮）回复于 2004-12-05 12:37:37 得分 0
这个问题我自己解决了 ：）
Public Sub psSetSpreadCellColor(ByVal spdTemp As FarPoint.Win.Spread.FpSpread, ByVal e As FarPoint.Win.Spread.EnterCellEventArgs)
Try
Dim intCol As Integer
Dim intRow As Integer
For intRow = 0 To spdTemp.ActiveSheet.RowCount - 1
For intCol = 0 To spdTemp.ActiveSheet.Columns.Count - 1
spdTemp.ActiveSheet.Cells(intRow, intCol).BackColor = Color.FromArgb(224, 224, 224)
Next
Next
intRow = e.Row
intCol = e.Column
If spdTemp.ActiveSheet.ActiveCell.Row.Index = intRow And spdTemp.ActiveSheet.ActiveCell.Column.Index = intCol Then
spdTemp.ActiveSheet.Cells(intRow, intCol).BackColor = Color.FromArgb(140, 150, 178)
End If
Catch ex As Exception
End Try
End SubTop
