以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助] (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=129104) |
-- 作者:weianfu -- 发布时间:2018/12/21 15:07:00 -- [求助] 老师! 我在窗口表中设置“重复填充”快捷键, If e.keycode = Keys.Q AndAlso e.control = True Then For i As Integer = e.Table.topposition + 1 To e.Table.bottomposition e.Table.rows(i)(e.Table.colsel) = e.Table.rows(i-1)(e.Table.colsel) Next e.cancel = True End If 但是,我想让快捷键在选中表A 字段名等于“二次分配号”时才生效,代码应该怎么编?
|
-- 作者:有点甜 -- 发布时间:2018/12/21 15:10:00 -- If e.keycode = Keys.Q AndAlso e.control = True AndAlso e.Table.cols(e.Table.colsel).name = "二次分配号" Then
For i As Integer = e.Table.topposition + 1 To e.Table.bottomposition
e.Table.rows(i)(e.Table.colsel) = e.Table.rows(i-1)(e.Table.colsel)
Next
e.cancel = True
End If
|