怎么判断在MSHFlexGrid中选中了哪一行？急在线等待。

Question

如标题

Answer 1

Private Sub Form_Load()
    MSHFlexGrid1.Rows = 6
    MSHFlexGrid1.Cols = 3
    MSHFlexGrid1.SelectionMode = flexSelectionByRow
    '
    MSHFlexGrid1.TextMatrix(1, 1) = "a"
    MSHFlexGrid1.TextMatrix(1, 2) = "a"
    MSHFlexGrid1.TextMatrix(2, 1) = "a"
    MSHFlexGrid1.TextMatrix(2, 2) = "a"
    For I = 0 To MSHFlexGrid1.Cols - 1
        MSHFlexGrid1.ColAlignment(I) = 4  '设置列的对齐方式
    Next
End Sub
Private Sub Command1_Click()
    MsgBox MSHFlexGrid1.Row
End Sub