如何识别grid的最后一行

Question

我想用dbgrid的右键处理一些事情，请问如何能够知道当前焦点在最后一行，也就是前边是*行的哪一行

Answer 1

此时行号为-1
dbgrid.Row = -1

Answer 2

dbgrid所绑定的记录集的最后一条就是你的grid 的最后一行，直接使用dbgrid,你可能得到是可见行最后一行，听我没错，我的FUR成本系统就是这样用的,很稳定,给分吧，

Answer 3

跟你们说，你们倒以为很厉害似的，试下面的代码就明白!
Private Sub DataGrid1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
   Dim i As Integer
   
   On Error GoTo handler
   DataGrid1.SetFocus
   
   If DataGrid1.Row = -1 Then
       MsgBox "最后一行"
   Else
      MsgBox DataGrid1.VisibleRows
      MsgBox DataGrid1.Row
   End If  ' For i = 0 To 2
  '    MsgBox DataGrid1.Columns.Item(i) '      RowArray(i) = DataGrid1.Columns.Item(i)
  ' Next i
  Exit Sub
handler:

Answer 4

'最后掉了一句，去掉多余的语句如下
Private Sub DataGrid1_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single) 
   On Error GoTo handler
   
   If DataGrid1.Row = -1 Then
       MsgBox "最后一行"
   Else
      MsgBox DataGrid1.Row
   End If  Exit Sub
handler:
  Exit SubEnd Sub