以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助新增行后焦点不在最后一行  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=96228)
--  作者：紫色幽魂
--  发布时间：2017/2/15 18:04:00
--  [求助新增行后焦点不在最后一行
在窗口控件中设置代码Datatables("表A").AddNews增加行为什么光标不在最后一行呢
--  作者：有点色
--  发布时间：2017/2/15 18:12:00
--  
要用Tables，不能用DataTables
--  作者：紫色幽魂
--  发布时间：2017/2/15 18:21:00
--  回复：（有点色）要用Tables，不能用DataTables
谢谢提醒，还有为什么在窗口中的表单里面不能用自动填充快捷键呢，Ctrl+D
--  作者：有点色
--  发布时间：2017/2/15 19:24:00
--  
以下是引用紫色幽魂在2017/2/15 18:21:00的发言：
谢谢提醒，还有为什么在窗口中的表单里面不能用自动填充快捷键呢，Ctrl+D

 

窗口里面不能触发快捷键 Ctrl+D 的。你可以在表的keydown事件写代码

 

If e.keycode = keys.W AndAlso e.control = True Then
    Dim t As Table = e.Table
    For i As Integer = t.TopPosition+1 To t.BottomPosition
        Dim r As Row = t.Rows(i)
        r(e.Table.cols(e.Table.colsel).name) = t.rows(i-1)(e.Table.cols(e.Table.colsel).name)
    Next
End If
--  作者：紫色幽魂
--  发布时间：2017/2/16 16:18:00
--  回复：（有点色）以下是引用紫色幽魂在2017/2/15 18:2...
谢谢