主题：官方自动增加行，经典代码及编程思想

If e.Table.Cols(e.Table.ColSel).Name = "第二列" Then
    e.Table.AddNew()
    e.Table.Select(e.Table.Current.Index,- 1)
End If

KeyDown

If e.KeyCode = Keys.Enter Then
    If e.Table.Cols(e.Table.ColSel).Name = "第二列" Then
        e.Table.AddNew()
        e.Table.Select(e.Table.Current.Index,- 1)
    End If
End If

好代码！