以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  关于换行的问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=99192)
--  作者：tuohai
--  发布时间：2017/4/14 10:12:00
--  关于换行的问题
老师们，我想按回车键到“第六列”的时候就自动新增行。谢谢了！
--  作者：有点蓝
--  发布时间：2017/4/14 10:35:00
--  

KeyDown事件


If e.KeyCode = Keys.Enter AndAlso e.Table.Cols(e.Table.ColSel).Name = "第六列"
    e.Cancel = True
    e.Table.Addnew
End If
[此贴子已经被作者于2017/4/14 10:35:37编辑过]
--  作者：有点色
--  发布时间：2017/4/14 10:46:00
--  

keydownedit事件

 

If e.Col.Name = "第六列" AndAlso e.KeyCode = 13 Then
    e.cancel = True
    Dim nr As Row = e.Table.AddNew
    e.Table.Select(nr.Index, e.Col.Index)
    e.Table.StartEditing
End If
--  作者：tuohai
--  发布时间：2017/4/14 12:55:00
--  实现不了

为什么实现不了？？
--  作者：有点色
--  发布时间：2017/4/14 14:44:00
--  
以下是引用tuohai在2017/4/14 12:55:00的发言：

为什么实现不了？？

 

2楼、3楼的代码，都没问题。请认真测试。