Foxtable(狐表)用户栏目专家坐堂 → [求助如何使用Ctrl+D填充功能对所有表单都有效


  共有2435人关注过本帖平板打印复制链接

主题:[求助如何使用Ctrl+D填充功能对所有表单都有效

帅哥哟,离线,有人找我吗?
紫色幽魂
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:682 积分:5382 威望:0 精华:0 注册:2015/1/23 0:31:00
[求助如何使用Ctrl+D填充功能对所有表单都有效  发帖心情 Post By:2020/1/12 9:33:00 [只看该作者]

如何使用Ctrl+D填充功能对所有表单都有效,不用每个表和每个窗口中的表都设置一遍
If e.keycode = Keys.D 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

 回到顶部