以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 怎么样才能让窗口表和数据表有一样的快捷输入功能 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=47257) |
||||
-- 作者:xvkewen -- 发布时间:2014/3/6 23:33:00 -- 怎么样才能让窗口表和数据表有一样的快捷输入功能 如题,我新建窗口表为什么不能用系统数据表的CTRL+D的功能实现快捷输入呢? |
||||
-- 作者:y2287958 -- 发布时间:2014/3/7 6:15:00 -- KeyDown: If e.Control = True AndAlso e.KeyCode = keys.D Dim t As Table = Tables("表C") For i As Integer = t.TopRow To t.BottomRow t.Rows(i)(t.ColSel) = t.Current(t.ColSel) Next End If
|
||||
-- 作者:xvkewen -- 发布时间:2014/3/7 20:34:00 -- 我的窗口表是绑定表,一个是绑定的主表,一个是绑定的关联表,这两个在窗口中没有独立的事件可以设置,但是在主表KeyDown事件中加了上面的那段代码,但还是不行呀? |
||||
-- 作者:有点甜 -- 发布时间:2014/3/7 21:25:00 -- 我测试可以,你没有改代码吧?
If e.Control = True AndAlso e.KeyCode = keys.D
Dim t As Table = e.Table
For i As Integer = t.TopRow To t.BottomRow
t.Rows(i)(t.ColSel) = t.Current(t.ColSel)
Next
End If
|
||||
-- 作者:xvkewen -- 发布时间:2014/3/7 21:44:00 -- 放在哪?全局事件里可以吗? |
||||
-- 作者:有点甜 -- 发布时间:2014/3/7 22:18:00 -- 以下是引用xvkewen在2014-3-7 21:44:00的发言:
放在哪?全局事件里可以吗?
可以放在全局表事件里,或者是直接放在表事件里。
如果放在库表事件,记得给表开启这个事件 http://www.foxtable.com/help/topics/0671.htm
|
||||
-- 作者:xvkewen -- 发布时间:2014/3/9 20:07:00 -- 还是不行呀,能帮忙做了例子吗?
|
||||
-- 作者:有点酸 -- 发布时间:2014/3/9 22:50:00 -- 代码逻辑有问题。
|
||||
-- 作者:xvkewen -- 发布时间:2014/3/9 23:43:00 -- 有点酸老师,能帮忙解释一下吗? |
||||
-- 作者:有点酸 -- 发布时间:2014/3/9 23:47:00 -- 是从上一行复制数据到选定行,不是从选定行复制,选定行复制到选定行,就是什么也没有复制。 |