以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  关于多列重复填充问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=186860)

--  作者：bigeng --  发布时间：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 --  发布时间：2023/6/3 20:28:00 --   没问题了，可能有重复的快捷键。