Foxtable(狐表)用户栏目专家坐堂 → 关于多列重复填充问题


  共有2272人关注过本帖树形打印复制链接

主题:关于多列重复填充问题

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


加好友 发短信
等级:四尾狐 帖子:851 积分:5858 威望:0 精华:0 注册:2014/5/20 17:56:00
关于多列重复填充问题  发帖心情 Post By:2023/6/3 19:59:00 [只看该作者]

下列代码,无论全局表还是当前表的KeyDown下,都无法实现多列重复填充,请帮忙看看什么原因?
If e.keycode = keys.Q AndAlso e.control = True Then
    If CurrentTable.Current IsNot Nothing Then
        Dim r As Row = CurrentTable.Rows(CurrentTable.TopPosition)
        For i As Integer = CurrentTable.TopPosition + 1 To CurrentTable.BottomPosition
            Dim nr As Row = CurrentTable.Rows(i)
            For j As Integer = CurrentTable.LeftCol To CurrentTable.RightCol
                nr(j) = r(j)
            Next
        Next
    End If 
End If

 回到顶部
帅哥哟,离线,有人找我吗?
bigeng
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:851 积分:5858 威望:0 精华:0 注册:2014/5/20 17:56:00
  发帖心情 Post By:2023/6/3 20:28:00 [只看该作者]

没问题了,可能有重复的快捷键。

 回到顶部