在VB6中,如何在mshflexgrid中获取先前选择的行?

时间:2016-06-20 05:11:49

标签: vb6 grid row mshflexgrid

当用户想要更改网格中的选定行时,程序会询问他是否要继续。如果,则不得更改所选行。问题是,无论用户点击还是,所选行都会更改为用户点击的行。我不知道我是否可以使用验证功能,但请帮助我。感谢。

1 个答案:

答案 0 :(得分:0)

单独的MSFlexGrid事件似乎没有提供这种能力。您可以跟踪模块变量中的上一行。当用户转到新行时,您可以提示是否要更改行。如果他们单击否,您可以将行设置回原来的行,否则存储您现在所在的行。

像这样的东西

Private previousRow As Integer

Private Sub Form_Load()
    previousRow = MSFlexGrid1.Row
End Sub

Private Sub MSFlexGrid1_RowColChange()
    If previousRow <> MSFlexGrid1.Row Then
        If MsgBox("Do you want to change rows?", vbYesNo) = vbNo Then
            MSFlexGrid1.Row = previousRow
        Else
            previousRow = MSFlexGrid1.Row
        End If
    End If
End Sub