主题：请教！关于TAB键的问题

 表事件，keydown，代码如下

Select Case e.KeyCode
    Case 9
        With e.Table
            If .ColSel = .Cols.Count - 1 Then Return
            If .Cols(.ColSel+1).DataCol.AllowEdit = False Then
                Sendkeys.Send(Chr(9))
            End If
        End With
    Case 13
        With e.Table
             If .RowSel = .Rows.Count - 1 Then Return
            .Select(.RowSel+1, 0)
            e.Cancel = True
        End With
End Select