AfterEdit
Dim t As Table = e.Table
If t.ColSel = t.Cols.Count - 1 Then
t.Select(t.Current.Index + 1,t.Cols("第六列").Index - 1)
End If
KeyDown
If e.KeyCode = Keys.Enter Then
Dim t As Table = e.Table
If t.ColSel = t.Cols.Count - 1 Then
t.Select(t.Current.Index + 1,t.Cols("第六列").Index - 1)
End If
End If
[此贴子已经被作者于2015/12/10 16:47:52编辑过]