以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  请教!关于TAB键的问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=24822)

--  作者:shijiaxu
--  发布时间:2012/10/24 9:09:00
--  请教!关于TAB键的问题
请告手告诉一下,如果想用TAB键跳过不允许编辑的列,直接进入到下一行的编辑,能不能实现。我用表属性中,将Tab设置为向右,将回车设置为向下,但是还是觉得不够好,可不可以按回车直接进入到下一行的第一列
--  作者:lin_hailun
--  发布时间:2012/10/24 10:25:00
--  
 表事件,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