如何在程序中设定在MSFlexGrid控件中某一特定的行被选中呀!!!!!!!!!!!

Question

如何在程序中设定在MSFlexGrid控件中某一特定的行被选中呀!!!!!!!!!!!

Answer 1

with Msflexgrid1
     .Row   = lngNeedSelect
     .col   = 0
     .RowSel= lngNeedSelect
     .ColSel= .Cols-1
End With

Answer 2

Private Sub Command1_Click()
    Dim i, j As Long
    With MSHFlexGrid1
        For i = 1 To .Rows - 1
            For j = 1 To .Cols - 1
                If j Mod 2 = 0 Then
                    .TextMatrix(i, j) = "a"
                Else
                    .TextMatrix(i, j) = "b"
                End If
            Next j
        Next i
    End With
End SubPrivate Sub MSHFlexGrid1_RowColChange()
    Dim i, j As Long
    Dim iRow As Long
    
    With MSHFlexGrid1
        iRow = .Row  '---------------------'選中的行
        .Col = 0
        For i = 1 To .Rows - 1
            .Row = i
            For j = 1 To .Cols - 1
                .Col = j    '----------列
                .CellBackColor = RGB(255, 255, 255)  '原來的顏色
            Next j
        Next i
    End With
    
    With MSHFlexGrid1
        .Row = iRow      '---------------------'選中的行
        For j = 1 To .Cols - 1
            .Col = j     '--------------列
            .CellBackColor = RGB(0, 200, 100) '選中後的顏色
        Next j
    End WithEnd Sub