如何控制MSFlexGrid控件只能用鼠标选择单行，而不能选多行？

Question

1.设置MSFlexGrid控件的属性：
  SelectionMode = 1            'flexSelectionByRow2.添加事件处理：
  Private Sub MSFlexGrid1_SelChange()
     With MSFlexGrid1
        .Row = .RowSel         '选择范围（行）：固定为当前行
        .Col = 0               '选择范围（列）：从第一列
        .ColSel = .Cols - 1    '               至最后一列
     End With
  End Sub

Answer 1

Grid1.SelectionMode = flexSelectionByRow

Answer 2

to FreshAir:
说的对，的确可以做到，但总觉得做的不够彻底，还有没有更还好的方法？